Trailing-Edge
-
PDP-10 Archives
-
BB-JF18A-BM
-
sources/rms/rmsdlb.mac
There are 3 other files named rmsdlb.mac in the archive. Click here to see a list.
;
; COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION 1986.
; ALL RIGHTS RESERVED.
;
; 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 THAT IS NOT SUPPLIED BY DIGITAL.
;
TITLE RMSDLB -- Definitions for master dynamic library block
SEARCH DYNSYM,RMSDYN,RMSINT,RMSMAC,MONSYM,MACSYM
INTERNAL RMS
EXTERNAL RMS$10
EXTERNAL ENASTK
EXTERNAL RMSDYI
$DLBLK RMSDYN
PRGEND
TITLE RMSDYI
RMSDYI::
SETZB 1,INTFLG## ;Init on next RMS call and return success
POPJ 17,
PRGEND
TITLE ENASTK
ENASTK:: BLOCK 100 ;SO ITS IN THE LOSEG, IT HAS ITS OWN SECTION
END