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
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>