1
0
mirror of https://github.com/PDP-10/stacken.git synced 2026-03-05 10:43:43 +00:00
Files
Lars Brinkhoff 6e18f5ebef Extract files from tape images.
Some tapes could not be extracted.
2021-01-29 10:47:33 +01:00

63 lines
1.9 KiB
Plaintext
Raw Permalink Blame History

This file contains invisible Unicode characters
This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.
!DSKT:[10,6026,NML703]SYSTYP.T10 16-Mar-84 11:27:22, Edit by DAVENPORT
!
! Set X25 true.
!
! SYSTYP - System type macros
!
! COPYRIGHT (C) 1981 BY
! DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS 01754
!
! THIS SOFTWARE IS FURNISHED UNDER A LICENSE FOR USE ONLY ON A SINGLE
! COMPUTER SYSTEM AND MAY BE COPIED ONLY WITH THE INCLUSION OF THE
! ABOVE COPYRIGHT NOTICE. THIS SOFTWARE, OR ANY OTHER COPIES THEREOF
! MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY OTHER PERSON
! EXCEPT FOR USE ON SUCH SYSTEM AND TO ONE WHO AGREES TO THESE LICENSE
! TERMS. TITLE TO AND OWNERSHIP OF THE SOFTWARE SHALL AT ALL TIMES
! REMAIN IN DEC.
!
! THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE
! AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT
! CORPORATION.
!
! DEC ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS
! SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC.
!
!++
! Facility: LSG DECnet Network Management
!
! Abstract: This file contains macros that are used for
! conditional compilation depending on operating
! system type.
!
! Environment: BLISS-36, BLISS-32 and BLISS-16
!
! Author: Steven M. Jenness, Creation date: 10-Dec-80
!
!--
literal $TRUE = (1 eql 1),
$FALSE = (1 eql 0);
literal $TOPS10 = $TRUE, ! 1 for TOPS10
$TOPS20 = $FALSE, ! 1 for TOPS20
$MCB = $FALSE, ! 1 for MCB
$X25 = $TRUE; ! 1 for X25
%if not ($TOPS10 or $TOPS20 or $MCB) %then
%error ('SYSTYP - No feature test selected') %fi
%if $TOPS10 + $TOPS20 + $MCB gtr 1 %then
%error ('SYSTYP - More than one feature test selected') %fi
undeclare $TRUE, $FALSE;
%if $TOPS10 %then %print ('Building NML for Tops-10') %fi
%if $TOPS20 %then %print ('Building NML for TOPS-20') %fi
%if $MCB %then %print ('Building NML for MCB') %fi
!
! [End of SYSTYP.REQ]