; This file updates SRDATA.MAC;1 from SRD V6.4. SRDATA.MAC;2/AU=SRDATA.MAC;1 \ -/.IDENT/,. .IDENT -6.5- ; Jan-85 -/for-selective-delete/ ; ; ; VERSION 6.5 - 16-Jan-85 (;WG001) ; ; SRD Working Group ; ; Add information to the /ID message telling which operating ; system and support features were specified when this task ; was generated. ; Add support for named directories for P/OS and Micro/RSX. ; Spawn ...HEL for help on P/OS systems since there is no CLI. ; ;= -.,.+1 % -,,/;WG001/ -/UICHD::/,.+1 UICHD:: .BLKB 12. ; Area for UIC string [g,m] without leading zeros, ; or directory name [xxxxxxxxx] if named directories ; supported, terminating with zero byte -/HLSPWN::/,/HELCMD::/ .IF DF P$$OS ; If on P/OS HLSPWN:: SPWN$ ...HEL,,,,,1,,,HELCMD,HELCML ;No CLI on P/OS HELCMD:: .ASCII "HELP/DCL SRD" .IFF ;P$$OS HLSPWN:: SPWN$ CLI...,,,,,1,,,HELCMD,HELCML HELCMD:: .ASCII "HELP/MCR SRD" .ENDC ;P$$OS .IFF ;R$$MV4 HLSPWN:: SPWN$ MCR...,,,,,1,,,HELCMD,HELCML HELCMD:: .ASCII "HELP SRD" .ENDC ;R$$MV4 -/SRDVER::/,. SRDVER::.ASCII <12><15>"SRD -- Version WG-6.5, January 1985" .IF DF P$$OS .ASCII <12><15>" Built for P/OS" .IFF ;P$$OS .IF DF M$$CRO .ASCII <12><15>" Built for Micro/RSX" .IFF ;M$$CRO .IF DF R$$MPL .ASCII <12><15>" Built for RSX-11M-PLUS" .IFF ;R$$MPL .IF DF R$$11M .ASCII <12><15>" Built for RSX-11M" .IFTF ;R$$11M .IF DF I$$AS .ASCII <12><15>" Built for IAS or RSX-11D" .ENDC ;I$$AS .IIF DF E$$IS .ASCII <12><15>" with EIS instruction support" .IIF DF D$$CAL .ASCII <12><15>" with dynamic checkpoint support" .ENDC ;R$$11M .IFTF ;R$$MPL .IIF DF M$$CLI .ASCII <12><15>" with spawn to CLI... support" .ENDC ;R$$MPL .ENDC ;M$$CRO .ENDC ;P$$OS .ASCII <12><15> /