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 ERRR(RESERVE(0,1,2,3),SREG=#17,FREG=#16,VREG=#15,DREGS=4)=
BEGIN

!AUTHOR: NORMA ABEL / D.TOLMAN

!MODULE CONTAINING ALLOCATION ERRORS

	BIND ERROR=PLIT( ERRMSG GLOBALLY NAMES


%57%	E57 GLOBALLY INDEXES
		'MVC?E?A NUMBER OF VARIABLES DOES NOT EQUAL THE NUMBER OF CONSTANTS IN DATA STATEMENT?0',
%64%	E64 GLOBALLY INDEXES
		'CUO?E?A CONSTANT UNDERFLOW OR OVERFLOW?0',
%98%	E98 GLOBALLY INDEXES
		'CTR?E?A COMPLEX TERMS USED IN A RELATIONAL OTHER THAN EQ OR NE?0',
%135%	E135 GLOBALLY INDEXES
		'DXB?E?A DATA STATEMENT EXCEEDS BOUNDS OF ARRAY ?D?0',

	WOPTMSG  GLOBALLY INDEXES

	WARMSG  GLOBALLY INDEXES

%33%	E33 GLOBALLY INDEXES
		'EXB?E?A EQUIVALENCE EXTENDS COMMON BLOCK ?C BACKWARD?0',
%48%	E48 GLOBALLY INDEXES
		'MCE?E?A MORE THAN 1 COMMON VARIABLE IN EQUIVALENCE GROUP?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',
%61%	E61 GLOBALLY INDEXES
		'CER?E?A COMPILER ERROR IN ROUTINE ?B?0',
%26%	E26 GLOBALLY INDEXES
		'ISD?E?A ILLEGAL SUBSCRIPT EXPRESSION IN DATA STATEMENT?0',
%60%	E60 GLOBALLY INDEXES
		'IXM?E?A ILLEGAL MIXED MODE ARITHMETIC?0',
%27%	E27 GLOBALLY INDEXES
		'AWN?E?A ARRAY REFERENCE ?C HAS WRONG NUMBER OF SUBSCRIPTS?0',
%53%	E53 GLOBALLY INDEXES
		'VSE?E?A EQUIVALENCE SUBSCRIPTS MUST BE INTEGER CONSTANTS?0',
%103%	E103 GLOBALLY INDEXES
		'SOR?E?A SUBSCRIPT OUT OF RANGE?0',

	0);


GLOBAL BIND BACKTYPE =0;

GLOBAL BIND  NXTFIL = 0;

GLOBAL BIND  ENDUNIT = 0,  FINALCHAR = 0;

GLOBAL BIND LEXNAM=0;

END
ELUDOM