-static inline void write_short(short v)
-{
- write_bytes((char *)&v, sizeof(short));
-}
+ if(fd<0)
+ {
+ const char *var = getenv("GLWRAP_FD");
+ if(var)
+ fd = strtol(var, NULL, 0);
+ else
+ {
+ var = getenv("GLWRAP_FILE");
+ if(var)
+ {
+ fd = open(var, O_WRONLY|O_CREAT|O_TRUNC, 0644);
+ if(fd==-1)
+ {
+ fprintf(stderr, "Couldn't open dumpfile %s for output: %s", var, strerror(errno));
+ abort();
+ }
+ }
+ else
+ fd = 2;
+ }
+ }