!---------------------------------------------------------------! ! Concantentated RSX-11M Executive - Step 1 Macro ! ! ! ! This macro inputs the RSXBLD.CMD file and produces a ! ! PIP command file to append the necessary sources into ! ! one file. ! !---------------------------------------------------------------! !---------------------------------------------------------------! ! Open input and output files. ! !---------------------------------------------------------------! ERRSXBLD.CMD HK Y EWRSXPIP.CMD !---------------------------------------------------------------! ! Strip garbage from RSXBLD.CMD. ! !---------------------------------------------------------------! K S,[1,1]EXELIB/LB/SS -18D L .,ZK !---------------------------------------------------------------! ! Strip library names from RSXBLD.CMD. ! !---------------------------------------------------------------! 0J !---------------------------------------------------------------! ! Convert remaining names to one/line. ! !---------------------------------------------------------------! 0J !---------------------------------------------------------------! ! Format module names into correct PIP commands. ! !---------------------------------------------------------------! 0J !---------------------------------------------------------------! ! Process special cases of files, output, and exit. ! !---------------------------------------------------------------! 0JI PIP RSX11M.MAC/ME=SY0:MACRO.MAC PIP RSX11M.MAC/AP=SY0:RSXMC.MAC 0J SC5TA 0L FSIN0:[11,10]SY0:0J SSYSTB 0L FSIN0:[11,10]SY0:EX