Trailing-Edge
-
PDP-10 Archives
-
bb-bt99e-bb
-
act1.c11
There are 2 other files named act1.c11 in the archive. Click here to see a list.
REP 26/1 ;11C1
GLOBAL BIND ACT1V = #10^24 + 0^18 + #2520; ! Version Date: 12-Feb-85
WIT
GLOBAL BIND ACT1V = #10^24 + 0^18 + #2531; ! Version Date: 30-Apr-85
INS 524/1 ;11C2
2531 CDM 10-Apr-85
Produce an error message if trying to put a subroutine name in an
I/O statement list.
INS 152/2 ;11C3
![2531] moved from NAMCHK
! For use with the E15 "xxx is not yyy" error message
BIND DUMO = PLIT (
VAORAY NAMES 'a variable or array?0',
VARIB NAMES 'a scalar variable?0',
AAY NAMES 'an array?0',
AFN NAMES 'a subprogram name?0' );
DEL 26/6 ;11C4
BIND DUMO = PLIT (
VAORAY NAMES 'a variable or array?0',
VARIB NAMES 'a scalar variable?0',
AAY NAMES 'an array?0',
AFN NAMES 'a subprogram name?0' );
REP 33/21 ;11C5
![rvm] There is an error here.There needs to be check for external name
WIT
%2531% ! Check for subroutine name! Function references (with paren's)
%2531% ! are fine, but subroutine names or function names without paren's
%2531% ! are definitely not allowable in I/O lists.
%2531% IF .NODE[OPRCLS] EQL DATAOPR ! Symbol name
%2531% THEN IF .NODE[IDATTRIBUT(INEXTERN)] ! User-callable
%2531% THEN FATLEX (VAORAY, NODE[IDSYMBOL], E15<0,0> );
SUM 242144