vcs.maemo.org Git - gnuplot/blob - config/make_vms.com

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