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