$!----------------------------------------------------------------------------- $! BUILD_ISAPIEXAMPLE.COM $! $! P1 == LINK or BUILD or empty (builds) $! $! 14-MAR-1999 MGD initial re-development $!----------------------------------------------------------------------------- $! $ APPLICATION = "ISAPIEXAMPLE" $! $ ON CONTROLY THEN EXIT 44 $! $ WRITE SYS$OUTPUT "" $ WRITE SYS$OUTPUT "Building ""''APPLICATION'""" +- " for ""''F$GETSYI("ARCH_NAME")'"" architecture" $! $ ARCH_NAME = F$EDIT(F$GETSYI("ARCH_NAME"),"UPCASE") $ IF ARCH_NAME .EQS. "ALPHA" THEN ARCH_NAME = "AXP" $! $ DEFINES = "/DEFINE=(__VMS_VER=70000000,__CRTL_VER=70000000)" $! $ IF F$SEARCH("OBJ_''ARCH_NAME'.DIR") .EQS. "" - THEN CREATE /DIR [.OBJ_'ARCH_NAME'] $ OBJECT_DIR = "[.OBJ_''ARCH_NAME']" $! $ IF F$EDIT(F$GETSYI("ARCH_NAME"),"UPCASE") .EQS. "VAX" $ THEN $ CC_OPTIONS = "/DECC /NOOPT /STAND=VAXC 'DEFINES' /OBJECT=''OBJECT_DIR'" $ ELSE $ CC_OPTIONS = "/DECC /NOOPT /STAND=VAXC 'DEFINES' /OBJECT=''OBJECT_DIR'" $ ENDIF $! $ IF P1 .EQS. "" .OR. P1 .EQS. "BUILD" .OR. P1 .EQS. "COMPILE" $ THEN $ SET NOON $ SET VERIFY $ CC 'CC_OPTIONS' 'APPLICATION' $! 'F$VERIFY(0) $ SET ON $ ENDIF $! $ IF P1 .EQS. "" .OR. P1 .EQS. "BUILD" .OR. P1 .EQS. "LINK" $ THEN $ IF F$EDIT(F$GETSYI("ARCH_NAME"),"UPCASE") .EQS. "VAX" $ THEN $ SET NOON $ SET VERIFY $ LINK /NOTRACE /SHARE=WASD_EXE:'APPLICATION'.DLL - 'OBJECT_DIR''APPLICATION',SYS$INPUT/OPTIONS UNIVERSAL=GetExtensionVersion,HttpExtensionProc $! 'F$VERIFY(0) $ SET ON $ ELSE $ SET NOON $ SET VERIFY $ LINK /NOTRACE /SHARE=WASD_EXE:'APPLICATION'.DLL - 'OBJECT_DIR''APPLICATION',SYS$INPUT/OPTIONS SYMBOL_VECTOR=(GetExtensionVersion=PROCEDURE,HttpExtensionProc=PROCEDURE) $! 'F$VERIFY(0) $ SET ON $ ENDIF $ PURGE /NOLOG 'OBJECT_DIR' $! $!-----------------------------------------------------------------------------