.; RSX-11M Executive Extensions Library build command file. .; By .; Bob Denny .; 9-FEB-82 .; .; 9-Feb-82 Added hacks for AST handling .; .; Note: EXIT.MAC has been moved to the "standard" library. .; Some of these directives will not build on earlier versions .; of RSX-11M (or IAS or RSTS/E). .; .; 21-Oct-82 (RBD) New V4.0 library and build procedure. ; ; Build the RSX-11M V4.0 Executive C Extensions Library CX.OLB. ; .ENABLE SUBSTITUTION .SETS $C "" .IF NE "MCR" .SETS $C "MCR " .IFNINS MAC '$C'INS $MAC .IFNINS LBR '$C'INS $LBR/INC=20000 .SETS LDEV "NL:" .ASK LISTS Do you want listings .IFT LISTS .SETS LDEV "SY:" '$C'ASN 'LDEV'=LS: ; ; We need to delete all (old) object files now. .ASK OK Is this OK .IFF OK .EXIT ; '$C'PIP *.OBJ;*/DE/NM .ASK DOB Delete objects when done ; ; Assemble the CX library modules ; ; '$C'MAC @CXMAC ; .IF NE 1 .GOTO ERROR ; ; Merge the objects into a single file and ; create the CX library locally. ; ; '$C'PIP CX.OB=*.OBJ ; .IF NE 1 .GOTO ERROR ; '$C'LBR CX/CR:45.=CX.OB ; .IF NE 1 .GOTO ERROR ; .IFT DOB '$C'PIP *.OBJ;0/DE/NM,CX.OB;0 ; .IF NE 1 .GOTO ERROR ; ; .ASK OK Move CX.OLB into LB:[1,1] .IFT OK '$C'PIP LB:[1,1]/FO/CO/NV=CX.OLB .IF NE 1 .GOTO ERROR .IFT OK '$C'PIP CX.OLB;*/DE '$C'ASN =LS: ; ; Build Complete. Don''t forget to copy the ".H" ; files into LB:[1,1] or your libuic. ; .DISABLE DISPLAY .EXIT .ERROR: ; ; An error has occurred. Fix the problem and ; try again. ; .DISABLE DISPLAY .EXIT