Trailing-Edge
-
PDP-10 Archives
-
FORTRAN-10_V7wLink_Feb83
-
errova.bli
There are 6 other files named errova.bli in the archive. Click here to see a list.
!THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY ONLY BE USED
! OR COPIED IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE.
!COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION 1974, 1983
! Author: *
MODULE ERRA(RESERVE(0,1,2,3),SREG=#17,FREG=#16,VREG=#15,DREGS=4)=
BEGIN
GLOBAL BIND ERRAV = 6^24 + 0^18 + 3; ! Version Date: 30-Jul-81
%(
***** Begin Revision History *****
***** Begin Version 5B *****
1 723 ----- ADD /NOWARN: SELECTIVITY
2 741 ----- NEW WARNING (E145)
***** Begin Version 6 *****
3 1115 EGM 30-Jul-81 --------
Remove error binds for /NOWARN selectivity
***** End Revision History *****
)%
% THIS BIND IS SO THAT THERE ARE NO UNDEFINED GLOBALS CAUSED
BY THE INCLUSION OF INOUT IN FORTRA %
GLOBAL BIND
WARMSG =0,
BACKTY =0,
LEXNAM =0,
ERRMSG =0,
WOPTMS =0,
CORMAN =0;
END
ELUDOM