; This module can be used to log all overlay calls made by a program. ; The program should also contain a routine PRINT which accepts and outputs ; three integer parameters - start address of overlay, length of overlay, ; and transfer address of overlay ; ; TO USE THIS YOUR BUILD FILE MUST CONTAIN A LINE AS FOLLOWS:- ; GBLPAT=.MAIN.:$AUTX+40:4777:177732 ; SAVR5: .WORD I: .WORD J: .WORD K: .WORD PAR: .WORD 3,I,J,K LOG:: MOV R5,SAVR5 MOV 2(R2),I MOV 4(R2),J MOV (R5),K MOV #PAR,R5 CALL PRINT MOV SAVR5,R5 JMP $MRKS .PSECT $$MRKS,RO,I,LCL,REL,OVR $MRKS==. .PSECT $$AUTO,RW,I,LCL,REL,CON .WORD LOG $AUTX==. .END