Enter your search terms Submit search form
	Web pdp-10.trailing-edge.com

!THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY ONLY BE USED
!  OR COPIED IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE.

!COPYRIGHT (C) 1974,1977 BY DIGITAL EQUIPMENT CORPORATION

MODULE ERRG(RESERVE(0,1,2,3),SREG=#17,FREG=#16,VREG=#15,DREGS=4)=
BEGIN

!AUTHOR: NORMA ABEL / D. TOLMAN/DCE

!MODULE CONTAINING CODE GENERATION ERRORS

	GLOBAL BIND ERRGV = 5^24 + 0^18 + 1;	!VERSION DATE: 24-SEP-76

%(
REVISION HISTORY
	BEGIN VERSION 5

1	461	19477	ADD ERROR MESSAGE FOR PROGRAM TOO LARGE

)%
	BIND ERROR=PLIT( ERRMSG GLOBALLY NAMES

%64%	E64 GLOBALLY INDEXES
		'CUO?E?A CONSTANT UNDERFLOW OR OVERFLOW?0',
%131%	E131 GLOBALLY INDEXES
		'VND?E?A FUNCTION RETURN VALUE IS NEVER DEFINED?0',

	WOPTMSG  GLOBALLY INDEXES

	WARMSG  GLOBALLY INDEXES  % END OF WARNINGS %

%33%	E33 GLOBALLY INDEXES
		'EXB?E?A EQUIVALENCE EXTENDS COMMON BLOCK ?C BACKWARD?0',
%49%	E49 GLOBALLY INDEXES
		'IED?E?A INCONSISTENT EQUIVALENCE DECLARATION?0',
%93%	E93 GLOBALLY INDEXES
		'VNA?E?A SUBSCRIPTED VARIABLE IN EQUIVALENCE BUT NOT AN ARRAY?0',
%91%	E91 GLOBALLY INDEXES
		'ENF?E?A LABEL ?A MUST REFER TO AN EXECUTABLE STATEMENT, NOT A FORMAT?0',
%48%	E48 GLOBALLY INDEXES
		'MCE?E?A MORE THAN 1 COMMON VARIABLE IN EQUIVALENCE GROUP?0',
%96%	E96 GLOBALLY INDEXES
		'LNI?E?A LIST DIRECTED IO WITH NO IOLIST?0',
%130%	E130 GLOBALLY INDEXES
		'MWL?E?A ATTEMPT TO DEFINE MULTIPLE RETURN WITHOUT FORMAT LABEL ARGUMENTS?0',
!**;[461], ERROVG @35, DCE, 24-SEP-76
%142%	E142 GLOBALLY INDEXES
		'PTL?E?A PROGRAM TOO LARGE?0',

	0);


GLOBAL BIND BACKTYPE =0;

GLOBAL BIND NXTFIL = 0;

GLOBAL BIND  ENDUNIT = 0,  FINALCHAR = 0;

GLOBAL BIND LEXNAM=0;

END
ELUDOM