Trailing-Edge
-
PDP-10 Archives
-
TOPS-20_V6.1_DECnetSrc_7-23-85
-
mcb/tkb36/texth.req
There are 2 other files named texth.req in the archive. Click here to see a list.
! COPYRIGHT (c) 1980, 1981, 1982
! DIGITAL EQUIPMENT CORPORATION
! Maynard, Massachusetts
!
! 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 which is not supplied by
! DIGITAL.
!
! DEFINE THE STORAGE BLOCK USED TO DESCRIBE THE HEADER FOR OBJECT TEXT
!
SBLOCK (TEXTH, 12) !HEADER FOR TEXT
HEADER (TEXTH) !
ABLOCK (TEXTH_MODU, %BPADDR, 1) !POINTER TO MODULE BLOCK FOR TEXT
ABLOCK (TEXTH_PSECT, %BPADDR, 2) ! SET BY RLD TYPE 7
ABLOCK (TEXTH_OFFSET, 16, 1) ! SET BY LOAD ADDRESS
ABLOCK (TEXTH_NEXT, %BPADDR, 1) ! NEXT TEXT HEADER
ABLOCK (TEXTH_PREV, %BPADDR, 1) !PREVIOUS ...
ABLOCK (TEXTH_DATA, %BPADDR, 1) !POINTER TO TEXT DATA
EBLOCK (TEXTH) !
!