$! 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