.TITLE KBDATA ; This module is used to establish the link with the various ; variables which PAC needs to access in KBCOM. It moves the ; information to an area which is accessable to PAC. .PSECT COMDAT,D,GBL,OVR,REL POOL: .WORD 0 ; Base address of KBPOOL FREE: .WORD 0 ; Base address of KB free list .PSECT KBDATA:: MOV #TTPOOL,POOL ; Get KB's pool base address MOV #FREEB,FREE ; Get beginning of KB's free list RETURN .END