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.2

1.1.1.2 ! maekawa     1: $!
1.1       maekawa     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"
1.1.1.2 ! maekawa    14: $ AXP = 0
        !            15: $ IF F$GETSYI("ARCH_TYPE") .NE. 1 THEN AXP = 1
1.1       maekawa    16: $!
1.1.1.2 ! maekawa    17: $ P1 = F$EDIT(P1,"UPCASE")
        !            18: $ IF P2 .NES. ""
        !            19: $ THEN D_FILE = P2
        !            20: $ ELSE D_FILE = "MAKEFILE.VMS"
1.1       maekawa    21: $ ENDIF
                     22: $!
1.1.1.2 ! maekawa    23: $ COMPILER = ""
        !            24: $ IF P1 .EQS. "DECC" .OR. P1 .EQS. ""
        !            25: $ THEN
1.1       maekawa    26: $   DECC = 1
1.1.1.2 ! maekawa    27: $   COMPILER = "DECC"
1.1       maekawa    28: $ ELSE
1.1.1.2 ! maekawa    29: $   IF P1 .EQS. "VAXC"
        !            30: $   THEN
1.1       maekawa    31: $     VAXC = 1
1.1.1.2 ! maekawa    32: $     COMPILER = "VAXC"
        !            33: $   ELSE
        !            34: $     IF P1 .EQS. "GNUC"
        !            35: $     THEN
        !            36: $       GNUC = 1
        !            37: $       COMPILER = "GNUC"
        !            38: $     ENDIF
1.1       maekawa    39: $   ENDIF
1.1.1.2 ! maekawa    40: $ ENDIF
        !            41: $ IF COMPILER .EQS. ""
        !            42: $ THEN
1.1       maekawa    43: $   DECC = 1
1.1.1.2 ! maekawa    44: $   COMPILER = "DECC"
        !            45: $   D_FILE = P1
1.1       maekawa    46: $ ENDIF
                     47: $!
                     48: $ DCL_PROC = "BUILDVMS.COM"
1.1.1.2 ! maekawa    49: $ COMMAND = ""
1.1       maekawa    50: $ IF F$TYPE(MMK) .NES. ""
1.1.1.2 ! maekawa    51: $   THEN COMMAND = "MMK"
1.1       maekawa    52: $ ELSE
                     53: $   IF F$SEARCH("SYS$SYSTEM:MMS.EXE") .NES. "" THEN COMMAND = "MMS"
                     54: $ ENDIF
                     55: $!
1.1.1.2 ! maekawa    56: $ MACRO = ""
        !            57: $ IF AXP THEN MACRO = "/MACRO=__ALPHA__=1"
        !            58: $ IF COMMAND .NES. ""
        !            59: $ THEN
        !            60: $   SAY "Make Gnuplot with ''COMMAND' and ''COMPILER'."
1.1       maekawa    61: $   SAY ""
1.1.1.2 ! maekawa    62: $   'COMMAND' /DESCRIPTION='D_FILE' 'MACRO' /IGNORE=WARNING
1.1       maekawa    63: $ ELSE
                     64: $   SAY "Make Gnuplot with DCL procedure ''DCL_PROC'."
                     65: $   SAY ""
                     66: $   @'DCL_PROC'
                     67: $ ENDIF
                     68: $ EXIT