1
0
mirror of https://github.com/dschmenk/PLASMA.git synced 2026-01-25 22:16:17 +00:00

Adjust native compiler buffer sizes for best useage

This commit is contained in:
David Schmenk
2025-01-19 07:43:43 -08:00
parent 18812f9b67
commit 4c4924a34b
3 changed files with 16 additions and 5 deletions

View File

@@ -47,9 +47,18 @@ demos: $(PENGUINS)
cp $(PENGUINS) prodos/dhgr.tk/demos/penguins/
cp dhgr.tk/demos/penguins/*.BIN prodos/dhgr.tk/demos/penguins/
bld: $(DHGRLIB) $(DHGRUTILS) $(DHGRTEST) $(DHGRRGB) $(DHGRSHOW)
-mkdir prodos/bld/dhgr.tk/
-mkdir prodos/bld/dhgr.tk/inc/
cp dhgr.tk/inc/dhgrlib.plh prodos/bld/dhgr.tk/inc/DHGRLIB.PLH.TXT
cp dhgr.tk/inc/dhgrutils.plh prodos/bld/dhgr.tk/inc/DHGRUTILS.PLH.TXT
cp dhgr.tk/test/dhgrtest.pla prodos/bld/dhgr.tk/DHGRTEST.PLA.TXT
cp dhgr.tk/utils/dhgrrgb.pla prodos/bld/dhgr.tk/DHGRRGB.PLA.TXT
cp dhgr.tk/utils/dhgrshow.pla prodos/bld/dhgr.tk/DHGRSHOW.PLA.TXT
fontconv: $(TTFCONV) $(IIGSCONV) $(A2CONV) $(A2DEFAULT) $(DDCONV)
all: libs test utils demos
all: libs test utils demos bld
clean:
-rm dhgr.tk/demos/pengiuns/*.o dhgr.tk/demos/pengiuns/*.REL dhgr.tk/demos/pengiuns/*.a

View File

@@ -565,9 +565,9 @@ def init_idglobal#0
dfd_num = DFDNUM/2
tag_num = TAGNUM/2
fixup_num = FIXUPNUM/2
globalbufsz = IDGLOBALSZ/2
globalbufsz = IDGLOBALSZ-1024
localbufsz = IDLOCALSZ/2
inbuff_len = MAX_INPUT_LEN/2
inbuff_len = MAX_INPUT_LEN/2
fin
//
//Init free op sequence list

View File

@@ -284,7 +284,7 @@ word srcline // Saved source line number
//
// Scanner variables
//
const MAX_INPUT_LEN = 1024
const MAX_INPUT_LEN = 512
word inbuff, inbuff_len = MAX_INPUT_LEN
word scanptr
byte token = EOL_TKN
@@ -512,6 +512,7 @@ include "toolsrc/parse.pla"
// Look at command line arguments and compile module
//
puts("PLASMA Compiler, Version 2.20\n")
arg = argNext(argFirst)
if ^arg and ^(arg + 1) == '-'
opt = arg + 2
@@ -582,12 +583,13 @@ if srcfile and relfile
refnum = srcref
parsefile = @srcfile
strconstbuff = heapalloc(80)
if isult(heapavail, $6000); inbuff_len = MAX_INPUT_LEN/2; fin
if isult(heapavail, $6000); inbuff_len = MAX_INPUT_LEN/2; fin
inbuff = heapalloc(inbuff_len)
scanptr = inbuff
^inbuff = NULL
exit = heapalloc(t_except)
if not except(exit)
// puts("Available mem size = $"); puth(heapavail); putln
//
// Parse source code module
//