Web   ·   Wiki   ·   Activities   ·   Blog   ·   Lists   ·   Chat   ·   Meeting   ·   Bugs   ·   Git   ·   Translate   ·   Archive   ·   People   ·   Donate
summaryrefslogtreecommitdiffstats
path: root/pdf/goo/vms_make.com
diff options
context:
space:
mode:
Diffstat (limited to 'pdf/goo/vms_make.com')
-rw-r--r--pdf/goo/vms_make.com82
1 files changed, 0 insertions, 82 deletions
diff --git a/pdf/goo/vms_make.com b/pdf/goo/vms_make.com
deleted file mode 100644
index 676643f..0000000
--- a/pdf/goo/vms_make.com
+++ /dev/null
@@ -1,82 +0,0 @@
-$!========================================================================
-$!
-$! Goo library compile script for VMS.
-$!
-$! Written by Patrick Moreau, Martin P.J. Zinser.
-$!
-$! Copyright 1996-2003 Glyph & Cog, LLC
-$!
-$!========================================================================
-$!
-$ GOO_CXXOBJS = "GString.obj,gmempp.obj,gfile.obj,ghash.obj,glist.obj"
-$ GOO_CCOBJS = "gmem.obj,parseargs.obj,vms_directory.obj,vms_unix_times.obj"
-$!
-$ if f$extract(1,3,f$getsyi("Version")) .lts. "7.0"
-$ then
-$ GOO_CCOBJS = GOO_CCOBJS + ",vms_unlink.obj"
-$ endif
-$!
-$ i = 0
-$ j = 0
-$COMPILE_CXX_LOOP:
-$ file = f$element(i, ",",GOO_CXXOBJS)
-$ if file .eqs. "," then goto COMPILE_CC_LOOP
-$ i = i + 1
-$ name = f$parse(file,,,"NAME")
-$ call make 'file "CXXCOMP ''name'.cc" -
- 'name'.cc
-$ goto COMPILE_CXX_LOOP
-$!
-$COMPILE_CC_LOOP:
-$ file = f$element(j, ",",GOO_CCOBJS)
-$ if file .eqs. "," then goto COMPILE_END
-$ j = j + 1
-$ name = f$parse(file,,,"NAME")
-$ call make 'file "CCOMP ''name'.c" -
- 'name'.c
-$ goto COMPILE_CC_LOOP
-$!
-$COMPILE_END:
-$ call make libgoo.olb "lib/cre libgoo.olb ''GOO_CXXOBJS',''GOO_CCOBJS'" *.obj
-$!
-$ exit
-$!
-$MAKE: SUBROUTINE !SUBROUTINE TO CHECK DEPENDENCIES
-$ V = 'F$Verify(0)
-$! P1 = What we are trying to make
-$! P2 = Command to make it
-$! P3 - P8 What it depends on
-$
-$ If F$Search(P1) .Eqs. "" 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(0)
-$ write sys$output P2
-$ 'P2
-$ VV='F$Verify(VV)
-$Exit:
-$ If V Then Set Verify
-$ENDSUBROUTINE