Google
 

Trailing-Edge - PDP-10 Archives - BB-KL11K-BM_1990 - t20src/m20typ.r36
There are 7 other files named m20typ.r36 in the archive. Click here to see a list.
!	COPYRIGHT (c) DIGITAL EQUIPMENT CORPORATION 1985, 1989.
!	ALL RIGHTS RESERVED.
!
!	THIS SOFTWARE IS FURNISHED UNDER A  LICENSE AND MAY BE USED AND  COPIED
!	ONLY IN  ACCORDANCE  WITH  THE  TERMS OF  SUCH  LICENSE  AND  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.  NO  TITLE TO  AND OWNERSHIP  OF THE  SOFTWARE IS  HEREBY
!	TRANSFERRED.
!
!	THE INFORMATION IN THIS  SOFTWARE IS SUBJECT  TO CHANGE WITHOUT  NOTICE
!	AND SHOULD  NOT  BE CONSTRUED  AS  A COMMITMENT  BY  DIGITAL  EQUIPMENT
!	CORPORATION.
!
!	DIGITAL ASSUMES NO  RESPONSIBILITY FOR  THE USE OR  RELIABILITY OF  ITS
!	SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL.
!++
! 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
!
!--
	%sbttl 'Feature tests'

literal	$TRUE = (1 eql 1),
	$FALSE = (1 eql 0);

literal	$TOPS10 = $FALSE,		! 1 for TOPS10
	$TOPS20 = $TRUE,		! 1 for TOPS20
	$MCB = $FALSE,			! 1 for MCB
	$X25 = $TRUE;			! 1 for MCB with X25
	%sbttl 'Feature test tests'

%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]