blob: 232b759419dda2b575d450f6ffb477cea1077674 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
$! CLP_ENV.COM: Sets the logicals CLiP$SRC_DIR and CLiP$MOD_DIR used !$
$! by the CLP command procedure. !$
$! PAR1: Directory specification of source files. !$
$! PAR2: Directory specification of terget modules. !$
$!
$ IF P1 .NES. "" THEN GOTO PARAMS_OK
$ READ/PROMPT="CLiP source directory? " SYS$COMMAND P1
$ READ/PROMPT="CLiP module directory? " SYS$COMMAND P2
$ PARAMS_OK:
$ DEFINE CLiP$SRC_DIR 'P1
$ DEFINE CLiP$MOD_DIR 'P2
$ EXIT
|
