summaryrefslogtreecommitdiff
path: root/web/clip/vax_vms/clp.com
diff options
context:
space:
mode:
Diffstat (limited to 'web/clip/vax_vms/clp.com')
-rw-r--r--web/clip/vax_vms/clp.com48
1 files changed, 48 insertions, 0 deletions
diff --git a/web/clip/vax_vms/clp.com b/web/clip/vax_vms/clp.com
new file mode 100644
index 0000000000..131b37f6b0
--- /dev/null
+++ b/web/clip/vax_vms/clp.com
@@ -0,0 +1,48 @@
+$! CLP.COM: Commandfile for quick CLiP run on files specified by !$
+$! up to eight parameters. Generates all modules. !$
+$! PAR1 - PAR8: Sourcefiles to be scanned by CLiP. !$
+$! Note 1: !$
+$! The global logicals CLiP$SRC_DIR and CLiP$MOD_DIR are used !$
+$! to determine the source and target directories, respectively. !$
+$! Use the CLIP_ENV command procedure to set these logicals. !$
+$! NOTE 2:
+$! This command-procedure is tailored to Pascal-use of CLiP. !$
+$! The "Left/right comment string" have to be edited to accomodate !$
+$! other languages. !$
+$!
+$ OPEN/WRITE CLIP_INI CLIP.INI
+$ WRITE CLIP_INI "This file contains data that is needed to run CLiP_2"
+$ WRITE CLIP_INI "And is generated by CLiP_1"
+$ WRITE CLIP_INI "Modifying this file at own risk."
+$ WRITE CLIP_INI "Using CLiP_1 is definitely recommended."
+$ WRITE CLIP_INI ""
+$ WRITE CLIP_INI "INTERACTIVE_MODE Mode (INTERACTIVE/DEBUG/HELPFUL/AUTO)"
+$ WRITE CLIP_INI "NO Interactive fault correction (YES/NO)"
+$ WRITE CLIP_INI "FILE Error message destination (TERMINAL/FILE/BOTH/NONE)"
+$ WRITE CLIP_INI "(* Left comment string"
+$ WRITE CLIP_INI "*) Right comment string"
+$ WRITE CLIP_INI "* Command character"
+$ WRITE CLIP_INI "ENDOF END string"
+$ WRITE CLIP_INI "# Option marker"
+$ WRITE CLIP_INI "OMITTED The specified modules are (OMITTED/EXTRACTED)"
+$ WRITE CLIP_INI "------------ REPORT FILE -----------"
+$ WRITE CLIP_INI "CLIP.RPT"
+$ WRITE CLIP_INI "------------ INPUT FILES -----------"
+$ CLIP_SRC_DIR = F$TRNLNM("CLIP$SRC_DIR")
+$ IF P1 .NES. "" THEN WRITE CLIP_INI CLIP_SRC_DIR+P1
+$ IF P2 .NES. "" THEN WRITE CLIP_INI CLIP_SRC_DIR+P2
+$ IF P3 .NES. "" THEN WRITE CLIP_INI CLIP_SRC_DIR+P3
+$ IF P4 .NES. "" THEN WRITE CLIP_INI CLIP_SRC_DIR+P4
+$ IF P5 .NES. "" THEN WRITE CLIP_INI CLIP_SRC_DIR+P5
+$ IF P6 .NES. "" THEN WRITE CLIP_INI CLIP_SRC_DIR+P6
+$ IF P7 .NES. "" THEN WRITE CLIP_INI CLIP_SRC_DIR+P7
+$ IF P8 .NES. "" THEN WRITE CLIP_INI CLIP_SRC_DIR+P8
+$ WRITE CLIP_INI "------------ MODULES ---------------"
+$ WRITE CLIP_INI "------------ MODULE DIRECTORY ------"
+$ CLIP_MOD_DIR = F$TRNLNM("CLIP$MOD_DIR")
+$ WRITE CLIP_INI CLIP_MOD_DIR
+$ WRITE CLIP_INI "------------ END OF INI FILE -------"
+$ CLOSE CLIP_INI
+$ CL
+$! DELETE CLIP.INI.
+$ EXIT