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