ASMB,L,C HED COMPILER LIBRARY - GET MAIN MEMORY * *************************************************************** * (C) COPYRIGHT HEWLETT-PACKARD COMPANY 1977. ALL RIGHTS * * RESERVED. NO PART OF THIS PROGRAM MAY BE PHOTOCOPIED, RE- * * REPRODUCED, OR TRANSLATED TO ANOTHER PROGRAM LANGUAGE WITH- * * OUT THE PRIOR WRITTEN CONSENT OF HEWLETT-PACKARD COMPANY. * *************************************************************** * * SOURCE: 92060-18066 * * * NAM GMS.C,7 92060-16103 781006 REV. 1901 $CLIB EXT COR.A,ID.AD EXT C.OLY ADDRESS OF LAST SEGMENT LOADED * ENT GMS.C * * THIS COMPILER LIBRARY ROUTINE RETURNS THE FREE MEMORY BOUNDS FOR * THE CURRENT SEGMENT OF A SEGMENTED PROGRAM. * * CALLING SEQUENCE: JSB GMS.C * RETURNS: A = FWAM * B = LWAM * * GMS.C NOP ENTRY LDB C.OLY GET THE ADDRESS OF THE CURRENT OVERLAY JSB ID.AD TRANSLATE TO AN ID SEGMENT ADDRESS LDA B PUT IN A SZA,RSS IF NONE LDA XEQT USE THE MAIN JSB COR.A GET THE FWAM TO A LDB BKLWA B=LWAM JMP GMS.C,I EXIT * BKLWA EQU 1777B XEQT EQU 1717B A EQU 0 B EQU 1 END