-58,,/;EJCMPLS/
;
;	7-oct-82 ed cetron	center for biomedical design                    ;EJC001
;	ejc01	variable memory size display                                    ;EJC001
;                                                                               ;EJC001
-143,148,/;EJCMPLS/
	tst	$dssiz		; new size?                                     ;EJC001
	beq	99$		; no, check against $sysiz                      ;EJC001
	CMP	$dssiz,$MDSIZ	; HAS MACHINE SIZE CHANGED	;ejc01		;EJC001
	BEQ	1$		; NO						;**-1
	MOV	#$REPLT,$CTL	; YES - START PAGE FROM BEGINNING		;AG023
	RETURN									;AG023
99$:	cmp	$sysiz,$mdsiz	; has machine size changed                      ;EJC001
	beq	1$		; no                                            ;EJC001
	mov	#$replt,$ctl	; yes - start page from beginning               ;EJC001
	return									;EJC001
1$:										;**-1
/