$!----------------------------------------------------------------------------- $! BUILD_CGILIB_EXAMPLE.COM $! $! P1 == LINK or BUILD or empty (builds) $! P2 == Optional location of CGILIB object library (defaults to [.MISC]) $! $! 27-NOV-2004 MGD non-VAX link against CGILIBSHR32 sharable image $! 28-OCT-2000 MGD use CGILIB object library $!----------------------------------------------------------------------------- $! $ ON CONTROLY THEN EXIT 44 $! $ @WASD_ROOT:[SRC]ARCHER.COM "CGILIB_EXAMPLE" $! $ DEFINES = " /DEFINE=(__VMS_VER=70000000,__CRTL_VER=70000000)" $ INCLUDES = " /INCLUDE=[SRC.MISC]" $ WARNINGS= " /WARNING=(DISABLE=(PREOPTW,IMPLICITFUNC," +- "NEEDCONSTEXT,ADDRCONSTEXT))" $ CC_OPTIONS = "/DECC /OPTIMIZE /STAND=RELAXED_ANSI /PREFIX=ALL" +- INCLUDES + DEFINES + WARNINGS $! $ IF P1 .EQS. "" .OR. P1 .EQS. "BUILD" .OR. P1 .EQS. "COMPILE" $ THEN $ SET NOON $ SET VERIFY $ CC 'CC_OPTIONS' /OBJECT='OBJECT_DIR' CGILIB_EXAMPLE $! 'F$VERIFY(0) $ SET ON $ ENDIF $! $ IF P1 .EQS. "" .OR. P1 .EQS. "BUILD" .OR. P1 .EQS. "LINK" $ THEN $ CGILIBSHR32 = "WASD_EXE:CGILIBSHR32.EXE" $ DEFINE /USER WASD_CGILIBSHR32 'CGILIBSHR32' $ SET NOON $ SET VERIFY $ LINK /EXECUTABLE=WASD_EXE:CGILIB_EXAMPLE.EXE - 'OBJECT_DIR'CGILIB_EXAMPLE,SYS$INPUT/OPTIONS WASD_CGILIBSHR32/SHARE $! 'F$VERIFY(0) $ SET ON $ ENDIF $ PURGE /NOLOG 'OBJECT_DIR' $! $!-----------------------------------------------------------------------------