Trailing-Edge
-
PDP-10 Archives
-
TOPS-20_V6.1_DECnetDistr_7-23-85
-
dn20/dtrllc.m11
There are 15 other files named dtrllc.m11 in the archive. Click here to see a list.
.TITLE DTRLLC - DTR LLC data base
.IDENT /001010/
.ENABL LC
;
;
; COPYRIGHT (c) 1980, 1981, 1982
; DIGITAL EQUIPMENT CORPORATION
;
; 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.
;
;+
; LLC data base for DTR process
;-
DR.lnk = 3. ; Number of links to handle.
ULA = 0
.MCALL DAT$
DAT$ DSR
.WORD 0
.WORD DR.lnk
DSR$W
.REPT DR.lnk
ULA = ULA + 1
.BYTE ULA,0
.BYTE 0
.BYTE 0,0,0
.WORD 0
.BYTE 0,0
.WORD 0,0,0
.WORD 0,0
.WORD 0,0
.WORD 0,0
.WORD 0
.WORD 0
.IF EQ,<ULA-1>
VFY$ L.LEN
.ENDC
.ENDR
END$
END$ D.LEN
.END