added quit routine

SCCS-vsn: usr.bin/pascal/pdx/main.h 1.3

diff --git a/usr/src/usr.bin/pascal/pdx/main.h b/usr/src/usr.bin/pascal/pdx/main.h
index 1b3fe71..d0b5246 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.3 %G%"; */

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


@@ -17,3 +17,4 @@ BOOLEAN opt[26];      /* true if command line option given */
 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 */