Mercurial > mm7
diff lib/swig/swigwin-2.0.11/vms/scripts/compil_doh.com @ 1899:b3009adc0e2f
Adding swig, gitignore, hgignore
author | Nomad |
---|---|
date | Mon, 21 Oct 2013 10:42:27 +0200 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/lib/swig/swigwin-2.0.11/vms/scripts/compil_doh.com Mon Oct 21 10:42:27 2013 +0200 @@ -0,0 +1,106 @@ +$! +$! Generated by genbuild.py +$! +$ libname = "swig_root:[vms.o_alpha]swig.olb" +$ +$ set default SWIG_ROOT:[SOURCE.DOH.DOH] +$ +$ idir := swig_root:[source.swig] +$ idir = idir + ",swig_root:[source.doh.include]" +$ idir = idir + ",swig_root:[source.include]" +$ idir = idir + ",swig_root:[source.preprocessor]" +$ +$ iflags = "/include=(''idir', sys$disk:[])" +$ oflags = "/object=swig_root:[vms.o_alpha] +$ cflags = "''oflags'''iflags'''dflags'" +$ cxxflags = "''oflags'''iflags'''dflags'" +$ +$ call make swig_root:[vms.o_alpha]base.obj - + "cc ''cflags'" base.c +$ call make swig_root:[vms.o_alpha]file.obj - + "cc ''cflags'" file.c +$ call make swig_root:[vms.o_alpha]fio.obj - + "cc ''cflags'" fio.c +$ call make swig_root:[vms.o_alpha]hash.obj - + "cc ''cflags'" hash.c +$ call make swig_root:[vms.o_alpha]list.obj - + "cc ''cflags'" list.c +$ call make swig_root:[vms.o_alpha]memory.obj - + "cc ''cflags'" memory.c +$ call make swig_root:[vms.o_alpha]string.obj - + "cc ''cflags'" string.c +$ call make swig_root:[vms.o_alpha]void.obj - + "cc ''cflags'" void.c +$ exit +$! +$! +$MAKE: SUBROUTINE !SUBROUTINE TO CHECK DEPENDENCIES +$ V = 'F$Verify(0) +$! P1 = What we are trying to make +$! P2 = Command to make it +$! P3 = Source file +$! P4 - P8 What it depends on +$ +$ modname = f$parse(p3,,,"name") +$ set noon +$ set message/nofacility/noident/noseverity/notext +$ libr/lis=swig_root:[vms]swiglib.tmp/full/width=132/only='modname' 'libname' +$ set message/facility/ident/severity/text +$ on error then exit +$ open/read swigtmp swig_root:[vms]swiglib.tmp +$! skip header +$ read swigtmp r +$ read swigtmp r +$ read swigtmp r +$ read swigtmp r +$ read swigtmp r +$ read swigtmp r +$ read swigtmp r +$ read swigtmp r +$ read swigtmp r +$! +$ +$ read/end=module_not_found swigtmp r +$ modfound = 1 +$ Time = f$cvtime(f$extract(49, 20, r)) +$ goto end_search_module +$ module_not_found: +$ modfound = 0 +$ +$ end_search_module: +$ close swigtmp +$ delete swig_root:[vms]swiglib.tmp;* +$ +$ if modfound .eq. 0 then $ goto Makeit +$ +$! Time = F$CvTime(F$File(P1,"RDT")) +$arg=3 +$Loop: +$ Argument = P'arg +$ If Argument .Eqs. "" Then Goto Exit +$ El=0 +$Loop2: +$ File = F$Element(El," ",Argument) +$ If File .Eqs. " " Then Goto Endl +$ AFile = "" +$Loop3: +$ OFile = AFile +$ AFile = F$Search(File) +$ If AFile .Eqs. "" .Or. AFile .Eqs. OFile Then Goto NextEl +$ If F$CvTime(F$File(AFile,"RDT")) .Ges. Time Then Goto Makeit +$ Goto Loop3 +$NextEL: +$ El = El + 1 +$ Goto Loop2 +$EndL: +$ arg=arg+1 +$ If arg .Le. 8 Then Goto Loop +$ Goto Exit +$ +$Makeit: +$ VV=F$VERIFY(1) +$ 'P2' 'P3' +$ VV='F$Verify(VV) +$Exit: +$ If V Then Set Verify +$ENDSUBROUTINE