6502/PLASMA
1
0
Fork 0
mirror of https://github.com/dschmenk/PLASMA.git synced 2025-01-10 06:30:41 +00:00
Code Issues Projects Releases Wiki Activity

More room for recursion

Browse Source
This commit is contained in:
dschmenk 2024-02-14 13:42:00 -08:00
parent c6220f389d
commit a6c94440a2
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
images/apple/PLASMA-2.1-INST.po
View File

Binary file not shown.

4
src/utilsrc/apple/copy.pla
View File

@ -226,12 +226,12 @@ if not except(exit)
return
fin
fileio:iobufalloc(2) // Reserve two I/O buffers
if isule(heapavail, MINBUFSIZE + 4096)
if isule(heapavail, MINBUFSIZE + 6144)
puts(" No available memory for copy buffer\n")
return
fin
copysize = MAXBUFSIZE
while isult(heapavail, copysize + 4096) // Leave lots of room for recursion
while isult(heapavail, copysize + 6144) // Leave lots of room for recursion
copysize = copysize - 1024
loop
copyrel = heapalloc(copysize + 256)