.;
.; Quickie CN Library gen procedure
.;
.; Use GETCMD tool to get a CNASM.MAC file built for this UIC!!
.;
.ENABLE SUBSTITUTION
.SETS $C ""
.IF <CLI> NE "MCR" .SETS $C "MCR "
;	Generate CN library
;
; All .OB files, as well as old versions of CN.OLB will be
; deleted by this procedure ...
;
.ASK OK Is this OK
.IFF OK .EXIT
;
; Clean up old junk
;
'$C'PIP *.OB;*/DE/NM,CN.OLB;*
;
; Assemble the library modules
;
.IFNINS MAC INS $MAC
'$C'MAC @CNASM
.IF <EXSTAT> NE 1 .GOTO ERR
;
; Concatenate objects and build new library
;
'$C'PIP T.TMP=*.OB
.IFNINS LBR '$C'INS $LBR/INC=10000
'$C'LBR CN/CR=T.TMP
.IF <EXSTAT> NE 1 .GOTO ERR
'$C'PIP T.TMP;*/DE,*.OB;*
;
; New CN library built.
;
.EXIT
.ERR:
;
;  There has been an error.  Correct the problem and try again.
;
.EXIT
