ack/util/ceg/defaults/pseudo/C_open.c
1989-01-26 13:24:23 +00:00

20 lines
288 B
C

#define CODE_EXPANDER
#include <em.h>
#include <assert.h>
#include <system.h>
extern int B_busy;
int C_open( filename)
char *filename;
{
assert( !B_busy);
if ( !open_back( filename)) {
fprint( STDERR, "Couldn't open %s\n", filename);
return( 0);
}
else
return( 1);
}