| ; | |
| ; 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 |