1991-09-20 18:14:05 +00:00
|
|
|
#include "header.h"
|
|
|
|
|
|
|
|
|
|
open_back( filename)
|
|
|
|
|
char *filename;
|
|
|
|
|
{
|
|
|
|
|
if ( filename == (char *) 0)
|
|
|
|
|
codefile= STDOUT;
|
|
|
|
|
else
|
1991-09-27 14:58:31 +00:00
|
|
|
#ifndef sys_close
|
1991-09-20 18:14:05 +00:00
|
|
|
return( sys_open( filename, OP_WRITE, &codefile));
|
1991-09-27 14:58:31 +00:00
|
|
|
#else
|
|
|
|
|
return (codefile = fopen(filename, "w")) != NULL;
|
|
|
|
|
#endif
|
1991-09-20 18:14:05 +00:00
|
|
|
return 1;
|
|
|
|
|
}
|
