Return to make_vms.com CVS log

Up to [local] / OpenXM_contrib / gnuplot

Annotation of OpenXM_contrib/gnuplot/make_vms.com, Revision 1.1.1.1

1.1       maekawa     1: $!
                      2: $! GNUPLOT make program for VMS, Vers. 1.2, 1996/07/03
                      3: $! (Rolf Niepraschk, niepraschk@ptb.de)
                      4: $!
                      5: $! This command procedure compiles and links GNUPLOT with MMS or MMK or
                      6: $! invokes the dcl procedure BUILDVMS.COM
                      7: $!
                      8: $! Usage: @MAKE_VMS P1 [P2]
                      9: $!    P1 = compiler ("DECC" or "VAXC" or "GNUC" or special make file if P2 = "")
                     10: $!         default is "DECC"
                     11: $!    P2 = special make file (eg. for testing), default is "DESCRIP.MMS"
                     12: $!
                     13: $ SAY = "WRITE SYS$OUTPUT"
                     14: $ IF F$GETSYI("ARCH_TYPE") .NE. 1
                     15: $ THEN
                     16: $   AXP = 1
                     17: $ ENDIF
                     18: $!
                     19: $ P1 = F$EDIT(P1,"UPCASE")
                     20: $ IF P2 .NES. ""
                     21: $ THEN D_FILE = P2
                     22: $ ELSE D_FILE := DESCRIP.MMS
                     23: $ ENDIF
                     24: $!
                     25: $ COMPILER := DECC
                     26: $!
                     27: $ IF (P1 .EQS. "DECC") .OR. (P1 .EQS. "")
                     28: $ THEN
                     29: $   DECC = 1
                     30: $   COMPILER := DECC
                     31: $ ELSE
                     32: $   IF P1 .EQS. "VAXC"
                     33: $   THEN
                     34: $     VAXC = 1
                     35: $     COMPILER := VAXC
                     36: $   ENDIF
                     37: $ ELSE
                     38: $   IF P1 .EQS. "GNUC"
                     39: $   THEN
                     40: $     GNUC = 1
                     41: $     COMPILER := VAXC
                     42: $   ENDIF
                     43: $ ELSE
                     44: $   D_FILE = P1
                     45: $   DECC = 1
                     46: $ ENDIF
                     47: $!
                     48: $ DCL_PROC = "BUILDVMS.COM"
                     49: $ COMMAND = ""
                     50: $ IF F$TYPE(MMK) .NES. ""
                     51: $   THEN COMMAND = "MMS"
                     52: $ ELSE
                     53: $   IF F$SEARCH("SYS$SYSTEM:MMS.EXE") .NES. "" THEN COMMAND = "MMS"
                     54: $ ENDIF
                     55: $!
                     56: $ IF COMMAND .NES. ""
                     57: $ THEN
                     58: $   SAY "Make Gnuplot with ''COMMAND' and ''COMPILER'."
                     59: $   SAY ""
                     60: $   'COMMAND' /DESCRIPTION='D_FILE' /IGNORE=WARNING
                     61: $ ELSE
                     62: $   SAY "Make Gnuplot with DCL procedure ''DCL_PROC'."
                     63: $   SAY ""
                     64: $   @'DCL_PROC'
                     65: $ ENDIF
                     66: $ EXIT