mirror of
https://github.com/dschmenk/PLASMA.git
synced 2025-02-20 17:29:11 +00:00
Make sure all module functin tables are at the beginning of the module
This commit is contained in:
parent
80a7805be1
commit
f48d6c5336
@ -4,5 +4,5 @@ import testlib
|
||||
const hex = 2
|
||||
const newln = 4
|
||||
const str = 6
|
||||
const char = 8
|
||||
const chr = 8
|
||||
end
|
||||
|
@ -22,6 +22,9 @@ const hgr1 = $2000
|
||||
const hgr2 = $4000
|
||||
const page1 = 0
|
||||
const page2 = 1
|
||||
//
|
||||
// External interface
|
||||
//
|
||||
struc t_conio
|
||||
word keypressed
|
||||
word home
|
||||
@ -39,6 +42,22 @@ end
|
||||
predef a2keypressed,a2home,a2gotoxy(x,y),a2viewport(left, top, width, height),a2texttype(type)
|
||||
predef a2textmode(cols),a2grmode(mix),a2grcolor(color),a2grplot(x,y)
|
||||
//
|
||||
// Exported function table.
|
||||
//
|
||||
export word conio[]
|
||||
//
|
||||
// Function pointers.
|
||||
//
|
||||
word = @a2keypressed
|
||||
word = @a2home
|
||||
word = @a2gotoxy
|
||||
word = @a2viewport
|
||||
word = @a2texttype
|
||||
word = @a2textmode
|
||||
word = @a2grmode
|
||||
word = @a2grcolor
|
||||
word = @a2grplot
|
||||
//
|
||||
// Screen row address arrays.
|
||||
//
|
||||
word txt1scrn[] = $0400,$0480,$0500,$0580,$0600,$0680,$0700,$0780
|
||||
@ -61,22 +80,6 @@ byte textclrmode[] = 2, 16, 1
|
||||
byte grcharset[] = 1, 0, $7F, $7F, $7F, $7F, $00, $00, $00, $00
|
||||
byte devcons
|
||||
//
|
||||
// Exported function table.
|
||||
//
|
||||
export word conio[]
|
||||
//
|
||||
// Function pointers.
|
||||
//
|
||||
word = @a2keypressed
|
||||
word = @a2home
|
||||
word = @a2gotoxy
|
||||
word = @a2viewport
|
||||
word = @a2texttype
|
||||
word = @a2textmode
|
||||
word = @a2grmode
|
||||
word = @a2grcolor
|
||||
word = @a2grplot
|
||||
//
|
||||
// Native routines.
|
||||
//
|
||||
asm equates
|
||||
|
@ -20,7 +20,7 @@ const O_READ_WRITE = 3
|
||||
//
|
||||
const sysbuf = $0800
|
||||
//
|
||||
// All our file I/O routines
|
||||
// External interface
|
||||
//
|
||||
struc t_fileio
|
||||
word getpfx
|
||||
|
Loading…
x
Reference in New Issue
Block a user