[unix-history] / usr / src / usr.bin / pascal / pdx / main.h

/* Copyright (c) 1982 Regents of the University of California */

/* static char sccsid[] = "@(#)main.h 1.3 %G%"; */

/*
 * Definitions for main program.
 *
 * The main program just handles the command arguments and then
 * gives control to the command module.  It's also the center of
 * error recovery, since non-fatal errors longjmp into the main routine.
 */

BOOLEAN opt[26];	/* true if command line option given */

#define option(c)	opt[(c)-'a']

main();			/* debugger main routine */
init();			/* read in source and object data */
erecover();		/* does non-local goto for error recovery */
quit();			/* clean-up before exiting */
Commit	Line	Data
58e9ea3e ML	1	/* Copyright (c) 1982 Regents of the University of California */
58e9ea3e ML	2
c82c5043	3	/* static char sccsid[] = "@(#)main.h 1.3 %G%"; */
58e9ea3e ML	4
	5	/*
	6	* Definitions for main program.
	7	*
	8	* The main program just handles the command arguments and then
	9	* gives control to the command module. It's also the center of
	10	* error recovery, since non-fatal errors longjmp into the main routine.
	11	*/
	12
	13	BOOLEAN opt[26]; /* true if command line option given */
	14
	15	#define option(c) opt[(c)-'a']
	16
	17	main(); /* debugger main routine */
	18	init(); /* read in source and object data */
	19	erecover(); /* does non-local goto for error recovery */
c82c5043	20	quit(); /* clean-up before exiting */