|
1899
|
1 $!
|
|
|
2 $! Generated by genbuild.py
|
|
|
3 $!
|
|
|
4 $ libname = "swig_root:[vms.o_alpha]swig.olb"
|
|
|
5 $
|
|
|
6 $ set default SWIG_ROOT:[SOURCE.DOH.DOH]
|
|
|
7 $
|
|
|
8 $ idir := swig_root:[source.swig]
|
|
|
9 $ idir = idir + ",swig_root:[source.doh.include]"
|
|
|
10 $ idir = idir + ",swig_root:[source.include]"
|
|
|
11 $ idir = idir + ",swig_root:[source.preprocessor]"
|
|
|
12 $
|
|
|
13 $ iflags = "/include=(''idir', sys$disk:[])"
|
|
|
14 $ oflags = "/object=swig_root:[vms.o_alpha]
|
|
|
15 $ cflags = "''oflags'''iflags'''dflags'"
|
|
|
16 $ cxxflags = "''oflags'''iflags'''dflags'"
|
|
|
17 $
|
|
|
18 $ call make swig_root:[vms.o_alpha]base.obj -
|
|
|
19 "cc ''cflags'" base.c
|
|
|
20 $ call make swig_root:[vms.o_alpha]file.obj -
|
|
|
21 "cc ''cflags'" file.c
|
|
|
22 $ call make swig_root:[vms.o_alpha]fio.obj -
|
|
|
23 "cc ''cflags'" fio.c
|
|
|
24 $ call make swig_root:[vms.o_alpha]hash.obj -
|
|
|
25 "cc ''cflags'" hash.c
|
|
|
26 $ call make swig_root:[vms.o_alpha]list.obj -
|
|
|
27 "cc ''cflags'" list.c
|
|
|
28 $ call make swig_root:[vms.o_alpha]memory.obj -
|
|
|
29 "cc ''cflags'" memory.c
|
|
|
30 $ call make swig_root:[vms.o_alpha]string.obj -
|
|
|
31 "cc ''cflags'" string.c
|
|
|
32 $ call make swig_root:[vms.o_alpha]void.obj -
|
|
|
33 "cc ''cflags'" void.c
|
|
|
34 $ exit
|
|
|
35 $!
|
|
|
36 $!
|
|
|
37 $MAKE: SUBROUTINE !SUBROUTINE TO CHECK DEPENDENCIES
|
|
|
38 $ V = 'F$Verify(0)
|
|
|
39 $! P1 = What we are trying to make
|
|
|
40 $! P2 = Command to make it
|
|
|
41 $! P3 = Source file
|
|
|
42 $! P4 - P8 What it depends on
|
|
|
43 $
|
|
|
44 $ modname = f$parse(p3,,,"name")
|
|
|
45 $ set noon
|
|
|
46 $ set message/nofacility/noident/noseverity/notext
|
|
|
47 $ libr/lis=swig_root:[vms]swiglib.tmp/full/width=132/only='modname' 'libname'
|
|
|
48 $ set message/facility/ident/severity/text
|
|
|
49 $ on error then exit
|
|
|
50 $ open/read swigtmp swig_root:[vms]swiglib.tmp
|
|
|
51 $! skip header
|
|
|
52 $ read swigtmp r
|
|
|
53 $ read swigtmp r
|
|
|
54 $ read swigtmp r
|
|
|
55 $ read swigtmp r
|
|
|
56 $ read swigtmp r
|
|
|
57 $ read swigtmp r
|
|
|
58 $ read swigtmp r
|
|
|
59 $ read swigtmp r
|
|
|
60 $ read swigtmp r
|
|
|
61 $!
|
|
|
62 $
|
|
|
63 $ read/end=module_not_found swigtmp r
|
|
|
64 $ modfound = 1
|
|
|
65 $ Time = f$cvtime(f$extract(49, 20, r))
|
|
|
66 $ goto end_search_module
|
|
|
67 $ module_not_found:
|
|
|
68 $ modfound = 0
|
|
|
69 $
|
|
|
70 $ end_search_module:
|
|
|
71 $ close swigtmp
|
|
|
72 $ delete swig_root:[vms]swiglib.tmp;*
|
|
|
73 $
|
|
|
74 $ if modfound .eq. 0 then $ goto Makeit
|
|
|
75 $
|
|
|
76 $! Time = F$CvTime(F$File(P1,"RDT"))
|
|
|
77 $arg=3
|
|
|
78 $Loop:
|
|
|
79 $ Argument = P'arg
|
|
|
80 $ If Argument .Eqs. "" Then Goto Exit
|
|
|
81 $ El=0
|
|
|
82 $Loop2:
|
|
|
83 $ File = F$Element(El," ",Argument)
|
|
|
84 $ If File .Eqs. " " Then Goto Endl
|
|
|
85 $ AFile = ""
|
|
|
86 $Loop3:
|
|
|
87 $ OFile = AFile
|
|
|
88 $ AFile = F$Search(File)
|
|
|
89 $ If AFile .Eqs. "" .Or. AFile .Eqs. OFile Then Goto NextEl
|
|
|
90 $ If F$CvTime(F$File(AFile,"RDT")) .Ges. Time Then Goto Makeit
|
|
|
91 $ Goto Loop3
|
|
|
92 $NextEL:
|
|
|
93 $ El = El + 1
|
|
|
94 $ Goto Loop2
|
|
|
95 $EndL:
|
|
|
96 $ arg=arg+1
|
|
|
97 $ If arg .Le. 8 Then Goto Loop
|
|
|
98 $ Goto Exit
|
|
|
99 $
|
|
|
100 $Makeit:
|
|
|
101 $ VV=F$VERIFY(1)
|
|
|
102 $ 'P2' 'P3'
|
|
|
103 $ VV='F$Verify(VV)
|
|
|
104 $Exit:
|
|
|
105 $ If V Then Set Verify
|
|
|
106 $ENDSUBROUTINE
|
