mirror of
https://github.com/badvision/lawless-legends.git
synced 2024-07-07 14:29:16 +00:00
Merge branch 'master' of https://github.com/badvision/lawless-legends
This commit is contained in:
commit
2d06dc337a
@ -101,11 +101,27 @@ public enum FillPattern {
|
||||
White_PC(false, 1, false, "+++++++"),
|
||||
White_Lo(true, 1, false, "+++++++"),
|
||||
White_Hi(true, 1, true, "+++++++"),
|
||||
BW1(false, 4, false,
|
||||
BW1_PC(false, 4, false,
|
||||
"++--++--++--++--++--++--++--",
|
||||
"--++--++--++--++--++--++--++"
|
||||
),
|
||||
BW2(false, 4, false,
|
||||
BW1_Lo(true, 4, false,
|
||||
"++--++--++--++--++--++--++--",
|
||||
"--++--++--++--++--++--++--++"
|
||||
),
|
||||
BW1_Hi(true, 4, true,
|
||||
"++--++--++--++--++--++--++--",
|
||||
"--++--++--++--++--++--++--++"
|
||||
),
|
||||
BW2_PC(false, 4, false,
|
||||
"--++--++--++--++--++--++--++",
|
||||
"++--++--++--++--++--++--++--"
|
||||
),
|
||||
BW2_Lo(true, 4, false,
|
||||
"--++--++--++--++--++--++--++",
|
||||
"++--++--++--++--++--++--++--"
|
||||
),
|
||||
BW2_Hi(true, 4, true,
|
||||
"--++--++--++--++--++--++--++",
|
||||
"++--++--++--++--++--++--++--"
|
||||
);
|
||||
|
5
Platform/Apple/tools/PLASMA/src/cmd.pla
Normal file → Executable file
5
Platform/Apple/tools/PLASMA/src/cmd.pla
Normal file → Executable file
@ -1075,6 +1075,9 @@ def loadmod(mod)
|
||||
else
|
||||
modend = init - defofst + defaddr
|
||||
fin
|
||||
if fixup < 0
|
||||
perr = -fixup
|
||||
fin
|
||||
else
|
||||
fixup = fixup & ~modinitkeep
|
||||
fin
|
||||
@ -1264,7 +1267,7 @@ def execmod(modfile)
|
||||
^lastsym = 0
|
||||
systemflags = saveflags
|
||||
fin
|
||||
return perr
|
||||
return -perr
|
||||
end
|
||||
//
|
||||
// Get heap start.
|
||||
|
25
Platform/Apple/tools/PLASMA/src/cmdsys.plh
Normal file
25
Platform/Apple/tools/PLASMA/src/cmdsys.plh
Normal file
@ -0,0 +1,25 @@
|
||||
import cmdsys
|
||||
predef putc, putln, puts, getc, gets
|
||||
predef call, syscall
|
||||
predef heapmark, heapallocallign, heapalloc, heaprelease, heapavail
|
||||
predef memset, memcpy
|
||||
predef isugt, isuge, isult, isule
|
||||
predef modload, modexec, modaddr
|
||||
word MACHID, sysvars
|
||||
//
|
||||
// System flags: memory allocator screen holes.
|
||||
//
|
||||
const restxt1 = $0001
|
||||
const restxt2 = $0002
|
||||
const resxtxt1 = $0004
|
||||
const resxtxt2 = $0008
|
||||
const reshgr1 = $0010
|
||||
const reshgr2 = $0020
|
||||
const resxhgr1 = $0040
|
||||
const resxhgr2 = $0080
|
||||
//
|
||||
// Module don't free memory
|
||||
//
|
||||
const modkeep = $2000
|
||||
const modinitkeep = $4000
|
||||
end
|
@ -14,7 +14,7 @@ static int locals = 0;
|
||||
static int predefs = 0;
|
||||
static int defs = 0;
|
||||
static int asmdefs = 0;
|
||||
static int codetags = 0;
|
||||
static int codetags = 1; // Fix check for break_tag and cont_tag
|
||||
static int fixups = 0;
|
||||
static char idconst_name[1024][17];
|
||||
static int idconst_value[1024];
|
||||
|
@ -168,7 +168,7 @@ t_token scan(void)
|
||||
constval = 0x0D;
|
||||
break;
|
||||
case 'r':
|
||||
constval = '\r';
|
||||
constval = 0x0A;
|
||||
break;
|
||||
case 't':
|
||||
constval = '\t';
|
||||
@ -212,7 +212,7 @@ t_token scan(void)
|
||||
*scanpos = 0x0D;
|
||||
break;
|
||||
case 'r':
|
||||
*scanpos = '\r';
|
||||
*scanpos = 0x0A;
|
||||
break;
|
||||
case 't':
|
||||
*scanpos = '\t';
|
||||
|
Loading…
Reference in New Issue
Block a user