Add copyright

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

diff --git a/usr/src/usr.bin/pascal/pdx/main.h b/usr/src/usr.bin/pascal/pdx/main.h
index 1b3fe71..acb73d6 100644 (file)
--- a/usr/src/usr.bin/pascal/pdx/main.h
+++ b/usr/src/usr.bin/pascal/pdx/main.h
@@ -1,6 +1,6 @@
 /* Copyright (c) 1982 Regents of the University of California */
 
 /* Copyright (c) 1982 Regents of the University of California */
 

-/* static char sccsid[] = "@(#)main.h 1.2 %G%"; */
+/* static char sccsid[] = "@(#)main.h 1.4 %G%"; */

 
 /*
  * Definitions for main program.
 
 /*
  * Definitions for main program.


@@ -13,7 +13,9 @@
 BOOLEAN opt[26];       /* true if command line option given */
 
 #define option(c)      opt[(c)-'a']
 BOOLEAN opt[26];       /* true if command line option given */
 
 #define option(c)      opt[(c)-'a']

+#define isterm(file)   (option('i') || isatty(fileno(file)))

 
 main();                        /* debugger main routine */
 init();                        /* read in source and object data */
 erecover();            /* does non-local goto for error recovery */
 
 main();                        /* debugger main routine */
 init();                        /* read in source and object data */
 erecover();            /* does non-local goto for error recovery */

+quit();                        /* clean-up before exiting */