generic-library/openssl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

DCL logic bugs fixed.

Browse Source 
(I really need to review my knowledge of the language)
This commit is contained in:
Richard Levitte 2002-11-14 15:38:47 +00:00
parent c7faede37b
commit cb21d001c9
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
engines/makeengines.com
View File

@ -369,7 +369,7 @@ $!
$! Else, Check To See If OPT_PHASE Has A Valid Arguement. $! Else, Check To See If OPT_PHASE Has A Valid Arguement.
$! $!
$ IF ("," + ACCEPT_PHASE + ",") - ("," + OPT_PHASE + ",") - $ IF ("," + ACCEPT_PHASE + ",") - ("," + OPT_PHASE + ",") -
.EQS. ("," + ACCEPT_PHASE + ",") .NES. ("," + ACCEPT_PHASE + ",")
$ THEN $ THEN
$! $!
$! A Valid Arguement. $! A Valid Arguement.
@ -385,9 +385,11 @@ $!
$ WRITE SYS$OUTPUT "" $ WRITE SYS$OUTPUT ""
$ WRITE SYS$OUTPUT "The option ",OPT_PHASE," is invalid. The valid options are:" $ WRITE SYS$OUTPUT "The option ",OPT_PHASE," is invalid. The valid options are:"
$ WRITE SYS$OUTPUT "" $ WRITE SYS$OUTPUT ""
$ IF ("," + ACCEPT_PHASE + ",") - ",ALL," THEN - $ IF ("," + ACCEPT_PHASE + ",") - ",ALL," -
.NES. ("," + ACCEPT_PHASE + ",") THEN -
WRITE SYS$OUTPUT " ALL : just build everything." WRITE SYS$OUTPUT " ALL : just build everything."
$ IF ("," + ACCEPT_PHASE + ",") - ",ENGINES," THEN - $ IF ("," + ACCEPT_PHASE + ",") - ",ENGINES," -
.NES. ("," + ACCEPT_PHASE + ",") THEN -
WRITE SYS$OUTPUT " ENGINES : to compile just the [.xxx.EXE.ENGINES]*.EXE hareable images." WRITE SYS$OUTPUT " ENGINES : to compile just the [.xxx.EXE.ENGINES]*.EXE hareable images."
$ WRITE SYS$OUTPUT "" $ WRITE SYS$OUTPUT ""
$ WRITE SYS$OUTPUT " where 'xxx' stands for:" $ WRITE SYS$OUTPUT " where 'xxx' stands for:"