ack/mach/vax4/ce/do_open.c

#include <system.h>
#include <back.h>

File *B_out_file;

open_back( filename)
char *filename;
{
	if ( filename == (char *) '\0')
		return( 0);
	else
		return( sys_open( filename, OP_WRITE, &B_out_file));
}
Initial revision 1988-09-15 09:49:22 +00:00			`#include <system.h>`
hidden names, made arg_error dependant on DEBUG 1989-02-02 12:29:14 +00:00			`#include <back.h>`
Initial revision 1988-09-15 09:49:22 +00:00
hidden names, made arg_error dependant on DEBUG 1989-02-02 12:29:14 +00:00			`File *B_out_file;`
Initial revision 1988-09-15 09:49:22 +00:00
Many changes: - added floating point - improved assembler part, now uses short encodings when possible - reduced generated relocation - and name table 1988-10-20 14:21:37 +00:00			`open_back( filename)`
Initial revision 1988-09-15 09:49:22 +00:00			`char *filename;`
			`{`
			`if ( filename == (char *) '\0')`
			`return( 0);`
			`else`
hidden names, made arg_error dependant on DEBUG 1989-02-02 12:29:14 +00:00			`return( sys_open( filename, OP_WRITE, &B_out_file));`
Initial revision 1988-09-15 09:49:22 +00:00			`}`