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