1
0
mirror of https://github.com/dschmenk/PLASMA.git synced 2025-03-22 01:30:45 +00:00

Fix compiler allocations for 64K machine

This commit is contained in:
David Schmenk 2018-04-14 12:48:12 -07:00
parent ed280b3584
commit 45b3560040

@ -180,7 +180,7 @@ def emit_select(tag)#0
end
def emit_caseblock(cnt, oflist, taglist)#0
byte i
if not cnt or cnt > 256; exit_err(ERR_OVER|ERR_STATE); fin
emit_pending_seq
emit_byte(cnt)
@ -534,7 +534,7 @@ def init_idglobal#0
fixup_num = FIXUPNUM
globalbufsz = IDGLOBALSZ
localbufsz = IDLOCALSZ
if isult(heapavail, $4000)
if isult(heapavail, $6000)
dfd_num = DFDNUM/2
tag_num = TAGNUM/2
fixup_num = FIXUPNUM/2