blob: 7d968e7b40aca81c7cb30784c1281ef00d4db3ba (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
;
; Transfer vector for VAX shareable image
;
.TITLE ENGINE
.IDENT /ENGINE/
;
; Define macro to assist in building transfer vector entries. Each entry
; should take no more than 8 bytes.
;
.MACRO FTRANSFER_ENTRY routine
.ALIGN QUAD
.TRANSFER routine
.MASK routine
JMP routine+2
.ENDM FTRANSFER_ENTRY
;
; Place entries in own program section.
;
.PSECT $$ENGINE,QUAD,PIC,USR,CON,REL,LCL,SHR,EXE,RD,NOWRT
ENGINE_xfer:
FTRANSFER_ENTRY bind_engine
FTRANSFER_ENTRY v_check
.BLKB 32768-<.-ENGINE_xfer> ; 64 pages total.
.END
|