$! VGTDOC.COM
$!
$! Build C documentation, run as an indirect command file
$!
$! Note that usage is currently disabled as the library document
$! is pretty big already.
$!
$! The following accounts are used:
$!
$ ASSIGN [-.COMMAND]	DOC		! Documentation (.RNO, etc.)
$ ASSIGN [-]		OUT		! C library output
$ ASSIGN [-.OTSCOM]	OTSCOM		! Common library
$ ASSIGN [-.OTSIO]	OTSIO		! I/O library
$ ASSIGN [-.TOOLS]	TOOLS		! Tools library
$ ASSIGN [-.USEFUL]	USEFUL		! Useful subroutines
$!
$! The GETRNO, GETKWK, FIXDOC, RNOIDX, and KWIK programs are assumed to be
$! stored in BIN: which has previously been allocated by the user.
$!
$ GETRNO := $BIN:GETRNO.EXE
$ GETKWK := $BIN:GETKWK.EXE
$ FIXDOC := $BIN:FIXDOC.EXE
$ KWIK   := $BIN:KWIK.EXE
$ RNOIDX := $BIN:RNOIDX.EXE
$!
$ WAS_VERIFY = 'F$VERIFY(1)'
$!
$! Do the library
$!
$ GETRNO    >NORM.TMP  -R -M -H DOC:CLIBHD.RNO OTSCOM:*.MAC OTSIO:*.MAC
$!! GETRNO -U >USAGE.TMP  -R -M -H DOC:CLIBAP.RNO OTSCOM:*.MAC OTSIO:*.MAC
$ GETRNO -W >WIZ.TMP  -R -M -H DOC:CLIBHD.RNO OTSCOM:*.MAC OTSIO:*.MAC
$ GETRNO    >HNORM.TMP -R -H DOC:CLIHDR.RNO DOC:*.H
$ GETRNO -W >HWIZ.TMP  -R -H DOC:CLIHDR.RNO DOC:*.H
$ COPY NORM.TMP,HNORM.TMP NORMAL.TMP
$ DELETE NORM.TMP;*,HNORM.TMP;*
$ COPY WIZ.TMP,HWIZ.TMP WIZARD.TMP
$ DELETE WIZ.TMP;*,HWIZ.TMP;*
$!
$! Now for the index
$!
$ GETKWK >GETKWK.TMP OTSCOM:*.MAC OTSIO:*.MAC	! Extract index from .MAC
$ KWIK -T 16 -W 64 <GETKWK.TMP >KWIK.TMP	! Make kwik index
$ DELETE GETKWK.TMP;*				! Dump unneeded file
$ RNOIDX <KWIK.TMP >RNOIDX.TMP			! Mark '.' etc.
$ DELETE KWIK.TMP;*				! Dump unneeded file
$ COPY DOC:IXLIBR.RNO,RNOIDX.TMP INDEX.TMP	! Concatenate index
$ DELETE RNOIDX.TMP;*				! Dump unneeded file
$!
$ GETKWK -W >GETKWK.TMP OTSCOM:*.MAC OTSIO:*.MAC
$ KWIK -T 16 -W 64 <GETKWK.TMP >KWIK.TMP
$ DELETE GETKWK.TMP;*
$ RNOIDX <KWIK.TMP >RNOIDX.TMP
$ DELETE KWIK.TMP;*
$ COPY DOC:IXLIBR.RNO,RNOIDX.TMP WIZDEX.TMP
$ DELETE RNOIDX.TMP;*
$!
$! Make the library documentation
$!
$ GETRNO >KIT.TMP				-R -H DOC:KIT.RNO
$ GETRNO >NEW.TMP				-R -H DOC:NEW.RNO
$ COPY NORMAL.TMP,INDEX.TMP			DOC:CLIB.RNO
$ COPY WIZARD.TMP,KIT.TMP,WIZDEX.TMP		DOC:WIZARD.RNO
$ DELETE NORMAL.TMP;*,WIZARD.TMP;*
$ DELETE INDEX.TMP;*,WIZDEX.TMP;*
$ PURGE DOC:*.RNO
$!
$! This presupposes "DEC-standard" RUNOFF, available on VMS V2.0
$!
$ RUNOFF/NOUNDERLINE/OUT=DOC:DOC.TMP README.RNO
$ FIXDOC <DOC.TMP		>DOC:README.1ST
$ DELETE DOC.TMP;*
$!
$ RUNOFF/NOUNDERLINE/OUT=DOC:DOC.TMP KIT.TMP
$ FIXDOC <DOC.TMP		>DOC:KIT.DOC
$ DELETE KIT.TMP;*,DOC.TMP;*
$!
$ RUNOFF/UNDERLINE/OUT=DOC:DOC.TMP NEW.TMP
$ FIXDOC <DOC.TMP		>DOC:NEW.DOC
$ DELETE NEW.TMP;*,DOC.TMP;*
$!
$ COPY DOC:CC.RNO,DOC:CBUGS.RNO	CC.TMP
$ GETRNO >GTRNO.TMP		-R -H CC.TMP
$ DELETE CC.TMP;*
$ RUNOFF/UNDERLINE/OUT=DOC.TMP	GTRNO.TMP
$ DELETE GTRNO.TMP;*
$ FIXDOC <DOC.TMP		>OUT:CC.DOC
$ DELETE DOC.TMP;*
$!
$ GETRNO >GTRNO.TMP		-R -H DOC:AS.RNO
$ RUNOFF/UNDERLINE/OUT=DOC.TMP	GTRNO.TMP
$ DELETE GTRNO.TMP;*
$ FIXDOC <DOC.TMP		>OUT:AS.DOC
$ DELETE DOC.TMP;*
$!
$ GETRNO >GTRNO.TMP		-R -H DOC:CBUGS.RNO
$ RUNOFF/NOUNDERLINE/OUT=DOC.TMP GTRNO.TMP
$ DELETE GTRNO.TMP;*
$ FIXDOC <DOC.TMP		>OUT:CBUGS.DOC
$ DELETE DOC.TMP;*
$!
$ GETRNO >GTRNO.TMP -R -H TOOLHD.RNO -C TOOLS:*.C
$ GETKWK >GETKWK.TMP -C TOOLS:*.C
$ KWIK -T 16 -W 64 <GETKWK.TMP >KWIK.TMP
$ DELETE GETKWK.TMP;*
$ RNOIDX <KWIK.TMP >RNOIDX.TMP
$ DELETE KWIK.TMP;*
$ COPY GTRNO.TMP,DOC:IXTOOL.RNO,RNOIDX.TMP TOOLS.TMP
$ DELETE GTRNO.TMP;*,RNOIDX.TMP;*
$ RUNOFF/UNDERLINE/OUT=DOC.TMP TOOLS.TMP
$ DELETE TOOLS.TMP;*
$ FIXDOC <DOC.TMP		>OUT:TOOLS.DOC
$ DELETE DOC.TMP;*
$!
$ RUNOFF/UNDERLINE/OUT=DOC.TMP	DOC:CLIB.RNO
$ FIXDOC <DOC.TMP		>OUT:CLIB.DOC
$ DELETE DOC.TMP;*
$!
$ RUNOFF/UNDERLINE/OUT=DOC.TMP	DOC:WIZARD.RNO
$ FIXDOC <DOC.TMP		>OUT:WIZARD.DOC
$ DELETE DOC.TMP;*
$!
$ PURGE OUT:*.DOC
$ SET NOON
$ DELETE SORT.TMP;*		! Leftover from KWIK
$ SET ON
$!
$! Build tools documentation
$!
$ GETRNO >TOOL1.TMP -R -H DOC:TOOLHD.RNO -C TOOLS:*.C
$ RUNOFF/UNDERLINE/OUT=TOOL2.TMP	TOOL1.TMP
$ DELETE TOOL1.TMP;*
$ FIXDOC <TOOL2.TMP			>OUT:TOOLS.DOC
$ DELETE TOOL2.TMP;*
$!
$! Useful stuff
$!
$ GETRNO -CW >WIZARD.TMP -H USEFUL:ULIBHD.RNO -R USEFUL:*.H USEFUL:*.C
$!
$! Now for the index
$!
$ GETKWK -W >GETKWK.TMP USEFUL:*.H USEFUL:*.C
$ KWIK -T 16 -W 64 <GETKWK.TMP >KWIK.TMP
$ DELETE GETKWK.TMP;*
$ RNOIDX <KWIK.TMP >RNOIDX.TMP
$ DELETE KWIK.TMP;*
$ COPY USEFUL:UINXHD.RNO WIZDEX.TMP
$ APPEND RNOIDX.TMP WIZDEX.TMP
$ DELETE RNOIDX.TMP;*
$!
$! Make the documentation
$!
$ COPY WIZARD.TMP,WIZDEX.TMP			DOC:CU.RNO
$ DELETE WIZARD.TMP;*,WIZDEX.TMP;*
$ PURGE DOC:*.RNO
$!
$! This presupposes "DEC-standard" RUNOFF, available on VMS V2.0
$!
$ RUNOFF/UNDERLINE/OUT=DOC.TMP	DOC:CU.RNO
$ FIXDOC <DOC.TMP		>OUT:CU.DOC
$ DELETE DOC.TMP;*
$!
$ IF .NOT. 'WAS_VERIFY' THEN SET VERIFY
$!
$! Documentation built.
$!