6502/PLASMA
1
0
Fork 0
mirror of https://github.com/dschmenk/PLASMA.git synced 2024-06-01 19:41:36 +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 return
fin fin
fileio:iobufalloc(2) // Reserve two I/O buffers 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") puts(" No available memory for copy buffer\n")
return return
fin fin
copysize = MAXBUFSIZE 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 copysize = copysize - 1024
loop loop
copyrel = heapalloc(copysize + 256) copyrel = heapalloc(copysize + 256)