.RIGHT MARGIN 72 .LEFT MARGIN 0 .TAB STOPS 8,16,24,32,40,48,56,64,72 .CENTER ^^COMPIL\\ .SKIP 1 ^^COMPIL\\ IS A PROGRAM THAT TAKES A LIST OF FILES AND ONLY COMPILES THOSE FILES THAT NEED IT. ^THIS IS DONE BY LOOKING AT THE CREATION DATE OF THE FILE. ^IF THE SOURCE FILE IS NEWER THAT THE OBJECT FILE, THE PROGRAM IS RECOMPILED; OTHERWISE IT IS SKIPPED. ^THIS IS A VERY USEFUL FEATURE WHEN COMPILING MANY DIFFERENT FILES. .SKIP 1 ^TO USE THE ^^COMPIL\\ PROGRAM THE USER SHOULD ENTER THE SYSTEM COMMAND: .SKIP 1 .CENTER ^^$COM\\ */SWITCHES FILE1, FILE2, FILE3, ..., FILE^N .SKIP 1 WHERE '/SWITCHES' CAN BE ANY COMBINATION OF: ^^/COMPILE\\, TO FORCE A RECOMPILATION; ^^/DEBUG\\, TO COMPILE THE PROGRAM WITH DEBUGGING; ^^/LIST\\, TO PRODUCE LISTING FILES. (^PLEASE NOTE THAT ^^/DEBUG\\ AND ^^/LIST\\ ^^DO NOT\\ FORCE A RECOMPILATION.) 'FILE1, FILE2, FILE3, ..., FILE^N' IS A LIST OF FILES TO COMPILE. ^THE FILES MAY BE SPECIFIED WITH OR WITHOUT AN EXTENSION. ^IF THE EXTENSION IS OMITTED, THE THE FOLLOWING EXTENSION ARE TRIED IN THE ORDER SHOWN: .SKIP 1 .LEFT MARGIN 16 .NOFILL .NOJUSTIFY ^^.FOR\\ FOR ^^FORTRAN\\ FILES ^^.MAR\\ FOR ^^MACRO-32\\ FILES ^^.B32\\ FOR ^^BLISS-32\\ FILES ^^.BLI\\ FOR ^^BLISS-32\\ FILES ^^.MAC\\ FOR ^^MACRO-11\\ FILES .FILL .JUSTIFY .LEFT MARGIN 0 .SKIP 1 ^SINCE NO LANGUAGE SWICHES ARE SUPPORTED (I.E., ^^/NOI4\\ FOR ^^FORTRAN\\ OR ^^/SHOW\\ FOR ^^MACRO-32\\) ^^COMPIL\\ LOOKS FOR THE FOLLOWING SYMBOLS TO OBTAIN THE LANGUAGE SWITCHES: .SKIP 1 .LEFT MARGIN 16 .NOFILL .NOJUSTIFY ^^FTNSWI\\ FOR ^^FORTRAN\\ ^^MARSWI\\ FOR ^^MACRO-32\\ ^^BLISWI\\ FOR ^^BLISS-32\\ ^^MACSWI\\ FOR ^^MACRO-11\\ .FILL .JUSTIFY .SKIP 1 .LEFT MARGIN 0 ^THESE SYMBOLS MUST BE DEFINED AS GLOBAL STRINGS. ^FOR EXAMPLE: .SKIP 1 .CENTER ^^$FTNSWI:=="/NOI4/NOWARN"\\