diff --git a/images/apple/PLASMA-2.1-INST.po b/images/apple/PLASMA-2.1-INST.po index f7303d8..67ba95f 100644 Binary files a/images/apple/PLASMA-2.1-INST.po and b/images/apple/PLASMA-2.1-INST.po differ diff --git a/images/apple/PLASMA-2.1.po b/images/apple/PLASMA-2.1.po index e9b2c21..c6d8067 100644 Binary files a/images/apple/PLASMA-2.1.po and b/images/apple/PLASMA-2.1.po differ diff --git a/images/apple/PLASMA2.2mg b/images/apple/PLASMA2.2mg index 3d35bd2..84e40af 100644 Binary files a/images/apple/PLASMA2.2mg and b/images/apple/PLASMA2.2mg differ diff --git a/images/apple/PLFORTH.PO b/images/apple/PLFORTH.PO index 35ad29c..2050f62 100644 Binary files a/images/apple/PLFORTH.PO and b/images/apple/PLFORTH.PO differ diff --git a/images/apple/apple3.hd b/images/apple/apple3.hd index d0627f2..2eca199 100644 Binary files a/images/apple/apple3.hd and b/images/apple/apple3.hd differ diff --git a/src/toolsrc/plforth.pla b/src/toolsrc/plforth.pla index 0252c3c..3f40921 100644 --- a/src/toolsrc/plforth.pla +++ b/src/toolsrc/plforth.pla @@ -1210,7 +1210,7 @@ def _fill_(a,b,c)#0 memset(a, c | (c << 8), b) end def _pad_#1 - return heapmark + 512 + return heapmark + 768 // Make sure to avoid JIT heap usage end def _trailing_(a,b)#2 while b and ^(a + b - 1) == ' '