the10thwiz/cc65
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Removed (pretty inconsistently used) tab chars from source code base.

Browse Source
This commit is contained in:
Oliver Schmidt
2013-05-09 13:56:54 +02:00
parent 44fd1082ae
commit 85885001b1
1773 changed files with 62864 additions and 62868 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
libsrc/geos-common/system/callroutine.s
View File

@@ -5,8 +5,8 @@
; void CallRoutine (myRoutine);
.export _CallRoutine
.export _CallRoutine
.include "jumptab.inc"
.include "jumptab.inc"
_CallRoutine = CallRoutine
_CallRoutine = CallRoutine

62
libsrc/geos-common/system/crt0.s
View File

@@ -4,23 +4,23 @@
; Maciej 'YTM/Elysium' Witkowiak
; 26.10.99, 10.3.2000, 15.8.2001, 23.12.2002
.export _exit
.export __STARTUP__ : absolute = 1 ; Mark as startup
.import __STACKADDR__, __STACKSIZE__ ; Linker generated
.import __BACKBUFSIZE__ ; Linker generated
.import initlib, donelib
.import callmain
.import zerobss
.importzp sp
.export _exit
.export __STARTUP__ : absolute = 1 ; Mark as startup
.import __STACKADDR__, __STACKSIZE__ ; Linker generated
.import __BACKBUFSIZE__ ; Linker generated
.import initlib, donelib
.import callmain
.import zerobss
.importzp sp
.include "jumptab.inc"
.include "geossym.inc"
.include "const.inc"
.include "jumptab.inc"
.include "geossym.inc"
.include "const.inc"
; ------------------------------------------------------------------------
; Place the startup code in a special segment.
.segment "STARTUP"
.segment "STARTUP"
; GEOS 64/128 initializes the screen before starting an application while
; Apple GEOS does not. In order to provide identical startup conditions
@@ -28,40 +28,40 @@
; the pattern and dispBufferOn even on GEOS 64/128 although we don't use
; them here.
lda #2 ; Checkerboard pattern
jsr SetPattern
lda #<(ST_WR_FORE | .MIN (ST_WR_BACK, __BACKBUFSIZE__))
sta dispBufferOn
lda #2 ; Checkerboard pattern
jsr SetPattern
lda #<(ST_WR_FORE | .MIN (ST_WR_BACK, __BACKBUFSIZE__))
sta dispBufferOn
.ifdef __GEOS_APPLE__
jsr i_Rectangle
.byte 0
.byte SC_PIX_HEIGHT-1
.word 0
.word SC_PIX_WIDTH-1
jsr i_Rectangle
.byte 0
.byte SC_PIX_HEIGHT-1
.word 0
.word SC_PIX_WIDTH-1
.endif
; Clear the BSS data.
jsr zerobss
jsr zerobss
; Setup stack.
lda #<(__STACKADDR__ + __STACKSIZE__)
ldx #>(__STACKADDR__ + __STACKSIZE__)
sta sp
stx sp+1
lda #<(__STACKADDR__ + __STACKSIZE__)
ldx #>(__STACKADDR__ + __STACKSIZE__)
sta sp
stx sp+1
; Call module constructors.
jsr initlib
jsr initlib
; Push arguments and call main().
cli
jsr callmain
cli
jsr callmain
; Call module destructors.
_exit: jsr donelib
_exit: jsr donelib
jmp EnterDeskTop ; Return control to the system
jmp EnterDeskTop ; Return control to the system

514
libsrc/geos-common/system/ctype.s
View File

@@ -5,7 +5,7 @@
; Character specification table.
;
.include "ctype.inc"
.include "ctype.inc"
.rodata
@@ -23,259 +23,259 @@
; * We save some code in the isxxx functions.
__ctype:
.byte CT_CTRL ; 0/00 ____NULL___
.byte CT_CTRL ; 1/01 ____N/A____
.byte CT_CTRL ; 2/02 ____N/A____
.byte CT_CTRL ; 3/03 ____N/A____
.byte CT_CTRL ; 4/04 ____N/A____
.byte CT_CTRL ; 5/05 ____N/A____
.byte CT_CTRL ; 6/06 ____N/A____
.byte CT_CTRL ; 7/07 ____N/A____
.byte CT_CTRL ; 8/08 __BAKSPACE_
.byte CT_CTRL | CT_OTHER_WS | CT_SPACE_TAB ; 9/09 __FWDSPACE_
.byte CT_CTRL | CT_OTHER_WS ; 10/0a _____LF____
.byte CT_CTRL ; 11/0b ____HOME___
.byte CT_CTRL ; 12/0c ___UPLINE__
.byte CT_CTRL | CT_OTHER_WS ; 13/0d _____CR____
.byte CT_CTRL ; 14/0e __ULINEON__
.byte CT_CTRL ; 15/0f __ULINEOFF_
.byte CT_CTRL ; 16/10 _ESC_GRAPH_
.byte CT_CTRL ; 17/11 ____N/A____
.byte CT_CTRL ; 18/12 ___REVON___
.byte CT_CTRL ; 19/13 ___REVOFF__
.byte CT_CTRL ; 20/14 ___GOTOX___
.byte CT_CTRL ; 21/15 ___GOTOY___
.byte CT_CTRL ; 22/16 ___GOTOXY__
.byte CT_CTRL ; 23/17 _NEWCRDSET_
.byte CT_CTRL ; 24/18 ___BOLDON__
.byte CT_CTRL ; 25/19 __ITALICON_
.byte CT_CTRL ; 26/1a _OUTLINEON_
.byte CT_CTRL ; 27/1b _PLAINTEXT_
.byte CT_CTRL ; 28/1c ____N/A____
.byte CT_CTRL ; 29/1d ____N/A____
.byte CT_CTRL ; 30/1e ____N/A____
.byte CT_CTRL ; 31/1f ____N/A____
.byte CT_SPACE_TAB | CT_SPACE ; 32/20 ___SPACE___
.byte CT_NONE ; 33/21 _____!_____
.byte CT_NONE ; 34/22 _____"_____
.byte CT_NONE ; 35/23 _____#_____
.byte CT_NONE ; 36/24 _____$_____
.byte CT_NONE ; 37/25 _____%_____
.byte CT_NONE ; 38/26 _____&_____
.byte CT_NONE ; 39/27 _____'_____
.byte CT_NONE ; 40/28 _____(_____
.byte CT_NONE ; 41/29 _____)_____
.byte CT_NONE ; 42/2a _____*_____
.byte CT_NONE ; 43/2b _____+_____
.byte CT_NONE ; 44/2c _____,_____
.byte CT_NONE ; 45/2d _____-_____
.byte CT_NONE ; 46/2e _____._____
.byte CT_NONE ; 47/2f _____/_____
.byte CT_DIGIT | CT_XDIGIT ; 48/30 _____0_____
.byte CT_DIGIT | CT_XDIGIT ; 49/31 _____1_____
.byte CT_DIGIT | CT_XDIGIT ; 50/32 _____2_____
.byte CT_DIGIT | CT_XDIGIT ; 51/33 _____3_____
.byte CT_DIGIT | CT_XDIGIT ; 52/34 _____4_____
.byte CT_DIGIT | CT_XDIGIT ; 53/35 _____5_____
.byte CT_DIGIT | CT_XDIGIT ; 54/36 _____6_____
.byte CT_DIGIT | CT_XDIGIT ; 55/37 _____7_____
.byte CT_DIGIT | CT_XDIGIT ; 56/38 _____8_____
.byte CT_DIGIT | CT_XDIGIT ; 57/39 _____9_____
.byte CT_NONE ; 58/3a _____:_____
.byte CT_NONE ; 59/3b _____;_____
.byte CT_NONE ; 60/3c _____<_____
.byte CT_NONE ; 61/3d _____=_____
.byte CT_NONE ; 62/3e _____>_____
.byte CT_NONE ; 63/3f _____?_____
.byte CT_NONE ; 64/40 _____@_____
.byte CT_UPPER | CT_XDIGIT ; 65/41 _____A_____
.byte CT_UPPER | CT_XDIGIT ; 66/42 _____B_____
.byte CT_UPPER | CT_XDIGIT ; 67/43 _____C_____
.byte CT_UPPER | CT_XDIGIT ; 68/44 _____D_____
.byte CT_UPPER | CT_XDIGIT ; 69/45 _____E_____
.byte CT_UPPER | CT_XDIGIT ; 70/46 _____F_____
.byte CT_UPPER ; 71/47 _____G_____
.byte CT_UPPER ; 72/48 _____H_____
.byte CT_UPPER ; 73/49 _____I_____
.byte CT_UPPER ; 74/4a _____J_____
.byte CT_UPPER ; 75/4b _____K_____
.byte CT_UPPER ; 76/4c _____L_____
.byte CT_UPPER ; 77/4d _____M_____
.byte CT_UPPER ; 78/4e _____N_____
.byte CT_UPPER ; 79/4f _____O_____
.byte CT_UPPER ; 80/50 _____P_____
.byte CT_UPPER ; 81/51 _____Q_____
.byte CT_UPPER ; 82/52 _____R_____
.byte CT_UPPER ; 83/53 _____S_____
.byte CT_UPPER ; 84/54 _____T_____
.byte CT_UPPER ; 85/55 _____U_____
.byte CT_UPPER ; 86/56 _____V_____
.byte CT_UPPER ; 87/57 _____W_____
.byte CT_UPPER ; 88/58 _____X_____
.byte CT_UPPER ; 89/59 _____Y_____
.byte CT_UPPER ; 90/5a _____Z_____
.byte CT_NONE ; 91/5b _____[_____
.byte CT_NONE ; 92/5c _____\_____
.byte CT_NONE ; 93/5d _____]_____
.byte CT_NONE ; 94/5e _____^_____
.byte CT_NONE ; 95/5f _UNDERLINE_
.byte CT_NONE ; 96/60 _____`_____
.byte CT_LOWER | CT_XDIGIT ; 97/61 _____a_____
.byte CT_LOWER | CT_XDIGIT ; 98/62 _____b_____
.byte CT_LOWER | CT_XDIGIT ; 99/63 _____c_____
.byte CT_LOWER | CT_XDIGIT ; 100/64 _____d_____
.byte CT_LOWER | CT_XDIGIT ; 101/65 _____e_____
.byte CT_LOWER | CT_XDIGIT ; 102/66 _____f_____
.byte CT_LOWER ; 103/67 _____g_____
.byte CT_LOWER ; 104/68 _____h_____
.byte CT_LOWER ; 105/69 _____i_____
.byte CT_LOWER ; 106/6a _____j_____
.byte CT_LOWER ; 107/6b _____k_____
.byte CT_LOWER ; 108/6c _____l_____
.byte CT_LOWER ; 109/6d _____m_____
.byte CT_LOWER ; 110/6e _____n_____
.byte CT_LOWER ; 111/6f _____o_____
.byte CT_LOWER ; 112/70 _____p_____
.byte CT_LOWER ; 113/71 _____q_____
.byte CT_LOWER ; 114/72 _____r_____
.byte CT_LOWER ; 115/73 _____s_____
.byte CT_LOWER ; 116/74 _____t_____
.byte CT_LOWER ; 117/75 _____u_____
.byte CT_LOWER ; 118/76 _____v_____
.byte CT_LOWER ; 119/77 _____w_____
.byte CT_LOWER ; 120/78 _____x_____
.byte CT_LOWER ; 121/79 _____y_____
.byte CT_LOWER ; 122/7a _____z_____
.byte CT_NONE ; 123/7b _____{_____
.byte CT_NONE ; 124/7c _____|_____
.byte CT_NONE ; 125/7d _____}_____
.byte CT_NONE ; 126/7e _____~_____
.byte CT_CTRL ; 127/7f __USELAST__
.byte CT_NONE ; 128/80 __SHORTCUT_
.byte CT_NONE ; 129/81 ____N/A____
.byte CT_NONE ; 130/82 ____N/A____
.byte CT_NONE ; 131/83 ____N/A____
.byte CT_NONE ; 132/84 ____N/A____
.byte CT_NONE ; 133/85 ____N/A____
.byte CT_NONE ; 134/86 ____N/A____
.byte CT_NONE ; 135/87 ____N/A____
.byte CT_NONE ; 136/88 ____N/A____
.byte CT_NONE ; 137/89 ____N/A____
.byte CT_NONE ; 138/8a ____N/A____
.byte CT_NONE ; 139/8b ____N/A____
.byte CT_NONE ; 140/8c ____N/A____
.byte CT_NONE ; 141/8d ____N/A____
.byte CT_NONE ; 142/8e ____N/A____
.byte CT_NONE ; 143/8f ____N/A____
.byte CT_NONE ; 144/90 ____N/A____
.byte CT_NONE ; 145/91 ____N/A____
.byte CT_NONE ; 146/92 ____N/A____
.byte CT_NONE ; 147/93 ____N/A____
.byte CT_NONE ; 148/94 ____N/A____
.byte CT_NONE ; 149/95 ____N/A____
.byte CT_NONE ; 150/96 ____N/A____
.byte CT_NONE ; 151/97 ____N/A____
.byte CT_NONE ; 152/98 ____N/A____
.byte CT_NONE ; 153/99 ____N/A____
.byte CT_NONE ; 154/9a ____N/A____
.byte CT_NONE ; 155/9b ____N/A____
.byte CT_NONE ; 156/9c ____N/A____
.byte CT_NONE ; 157/9d ____N/A____
.byte CT_NONE ; 158/9e ____N/A____
.byte CT_NONE ; 159/9f ____N/A____
.byte CT_NONE ; 160/a0 ____N/A____
.byte CT_NONE ; 161/a1 ____N/A____
.byte CT_NONE ; 162/a2 ____N/A____
.byte CT_NONE ; 163/a3 ____N/A____
.byte CT_NONE ; 164/a4 ____N/A____
.byte CT_NONE ; 165/a5 ____N/A____
.byte CT_NONE ; 166/a6 ____N/A____
.byte CT_NONE ; 167/a7 ____N/A____
.byte CT_NONE ; 168/a8 ____N/A____
.byte CT_NONE ; 169/a9 ____N/A____
.byte CT_NONE ; 170/aa ____N/A____
.byte CT_NONE ; 171/ab ____N/A____
.byte CT_NONE ; 172/ac ____N/A____
.byte CT_NONE ; 173/ad ____N/A____
.byte CT_NONE ; 174/ae ____N/A____
.byte CT_NONE ; 175/af ____N/A____
.byte CT_NONE ; 176/b0 ____N/A____
.byte CT_NONE ; 177/b1 ____N/A____
.byte CT_NONE ; 178/b2 ____N/A____
.byte CT_NONE ; 179/b3 ____N/A____
.byte CT_NONE ; 180/b4 ____N/A____
.byte CT_NONE ; 181/b5 ____N/A____
.byte CT_NONE ; 182/b6 ____N/A____
.byte CT_NONE ; 183/b7 ____N/A____
.byte CT_NONE ; 184/b8 ____N/A____
.byte CT_NONE ; 185/b9 ____N/A____
.byte CT_NONE ; 186/ba ____N/A____
.byte CT_NONE ; 187/bb ____N/A____
.byte CT_NONE ; 188/bc ____N/A____
.byte CT_NONE ; 189/bd ____N/A____
.byte CT_NONE ; 190/be ____N/A____
.byte CT_NONE ; 191/bf ____N/A____
.byte CT_NONE ; 192/c0 ____N/A____
.byte CT_NONE ; 193/c1 ____N/A____
.byte CT_NONE ; 194/c2 ____N/A____
.byte CT_NONE ; 195/c3 ____N/A____
.byte CT_NONE ; 196/c4 ____N/A____
.byte CT_NONE ; 197/c5 ____N/A____
.byte CT_NONE ; 198/c6 ____N/A____
.byte CT_NONE ; 199/c7 ____N/A____
.byte CT_NONE ; 200/c8 ____N/A____
.byte CT_NONE ; 201/c9 ____N/A____
.byte CT_NONE ; 202/ca ____N/A____
.byte CT_NONE ; 203/cb ____N/A____
.byte CT_NONE ; 204/cc ____N/A____
.byte CT_NONE ; 205/cd ____N/A____
.byte CT_NONE ; 206/ce ____N/A____
.byte CT_NONE ; 207/cf ____N/A____
.byte CT_NONE ; 208/d0 ____N/A____
.byte CT_NONE ; 209/d1 ____N/A____
.byte CT_NONE ; 210/d2 ____N/A____
.byte CT_NONE ; 211/d3 ____N/A____
.byte CT_NONE ; 212/d4 ____N/A____
.byte CT_NONE ; 213/d5 ____N/A____
.byte CT_NONE ; 214/d6 ____N/A____
.byte CT_NONE ; 215/d7 ____N/A____
.byte CT_NONE ; 216/d8 ____N/A____
.byte CT_NONE ; 217/d9 ____N/A____
.byte CT_NONE ; 218/da ____N/A____
.byte CT_NONE ; 219/db ____N/A____
.byte CT_NONE ; 220/dc ____N/A____
.byte CT_NONE ; 221/dd ____N/A____
.byte CT_NONE ; 222/de ____N/A____
.byte CT_NONE ; 223/df ____N/A____
.byte CT_NONE ; 224/e0 ____N/A____
.byte CT_NONE ; 225/e1 ____N/A____
.byte CT_NONE ; 226/e2 ____N/A____
.byte CT_NONE ; 227/e3 ____N/A____
.byte CT_NONE ; 228/e4 ____N/A____
.byte CT_NONE ; 229/e5 ____N/A____
.byte CT_NONE ; 230/e6 ____N/A____
.byte CT_NONE ; 231/e7 ____N/A____
.byte CT_NONE ; 232/e8 ____N/A____
.byte CT_NONE ; 233/e9 ____N/A____
.byte CT_NONE ; 234/ea ____N/A____
.byte CT_NONE ; 235/eb ____N/A____
.byte CT_NONE ; 236/ec ____N/A____
.byte CT_NONE ; 237/ed ____N/A____
.byte CT_NONE ; 238/ee ____N/A____
.byte CT_NONE ; 239/ef ____N/A____
.byte CT_NONE ; 240/f0 ____N/A____
.byte CT_NONE ; 241/f1 ____N/A____
.byte CT_NONE ; 242/f2 ____N/A____
.byte CT_NONE ; 243/f3 ____N/A____
.byte CT_NONE ; 244/f4 ____N/A____
.byte CT_NONE ; 245/f5 ____N/A____
.byte CT_NONE ; 246/f6 ____N/A____
.byte CT_NONE ; 247/f7 ____N/A____
.byte CT_NONE ; 248/f8 ____N/A____
.byte CT_NONE ; 249/f9 ____N/A____
.byte CT_NONE ; 250/fa ____N/A____
.byte CT_NONE ; 251/fb ____N/A____
.byte CT_NONE ; 252/fc ____N/A____
.byte CT_NONE ; 253/fd ____N/A____
.byte CT_NONE ; 254/fe ____N/A____
.byte CT_NONE ; 255/ff ____N/A____
.byte CT_CTRL ; 0/00 ____NULL___
.byte CT_CTRL ; 1/01 ____N/A____
.byte CT_CTRL ; 2/02 ____N/A____
.byte CT_CTRL ; 3/03 ____N/A____
.byte CT_CTRL ; 4/04 ____N/A____
.byte CT_CTRL ; 5/05 ____N/A____
.byte CT_CTRL ; 6/06 ____N/A____
.byte CT_CTRL ; 7/07 ____N/A____
.byte CT_CTRL ; 8/08 __BAKSPACE_
.byte CT_CTRL | CT_OTHER_WS | CT_SPACE_TAB ; 9/09 __FWDSPACE_
.byte CT_CTRL | CT_OTHER_WS ; 10/0a _____LF____
.byte CT_CTRL ; 11/0b ____HOME___
.byte CT_CTRL ; 12/0c ___UPLINE__
.byte CT_CTRL | CT_OTHER_WS ; 13/0d _____CR____
.byte CT_CTRL ; 14/0e __ULINEON__
.byte CT_CTRL ; 15/0f __ULINEOFF_
.byte CT_CTRL ; 16/10 _ESC_GRAPH_
.byte CT_CTRL ; 17/11 ____N/A____
.byte CT_CTRL ; 18/12 ___REVON___
.byte CT_CTRL ; 19/13 ___REVOFF__
.byte CT_CTRL ; 20/14 ___GOTOX___
.byte CT_CTRL ; 21/15 ___GOTOY___
.byte CT_CTRL ; 22/16 ___GOTOXY__
.byte CT_CTRL ; 23/17 _NEWCRDSET_
.byte CT_CTRL ; 24/18 ___BOLDON__
.byte CT_CTRL ; 25/19 __ITALICON_
.byte CT_CTRL ; 26/1a _OUTLINEON_
.byte CT_CTRL ; 27/1b _PLAINTEXT_
.byte CT_CTRL ; 28/1c ____N/A____
.byte CT_CTRL ; 29/1d ____N/A____
.byte CT_CTRL ; 30/1e ____N/A____
.byte CT_CTRL ; 31/1f ____N/A____
.byte CT_SPACE_TAB | CT_SPACE ; 32/20 ___SPACE___
.byte CT_NONE ; 33/21 _____!_____
.byte CT_NONE ; 34/22 _____"_____
.byte CT_NONE ; 35/23 _____#_____
.byte CT_NONE ; 36/24 _____$_____
.byte CT_NONE ; 37/25 _____%_____
.byte CT_NONE ; 38/26 _____&_____
.byte CT_NONE ; 39/27 _____'_____
.byte CT_NONE ; 40/28 _____(_____
.byte CT_NONE ; 41/29 _____)_____
.byte CT_NONE ; 42/2a _____*_____
.byte CT_NONE ; 43/2b _____+_____
.byte CT_NONE ; 44/2c _____,_____
.byte CT_NONE ; 45/2d _____-_____
.byte CT_NONE ; 46/2e _____._____
.byte CT_NONE ; 47/2f _____/_____
.byte CT_DIGIT | CT_XDIGIT ; 48/30 _____0_____
.byte CT_DIGIT | CT_XDIGIT ; 49/31 _____1_____
.byte CT_DIGIT | CT_XDIGIT ; 50/32 _____2_____
.byte CT_DIGIT | CT_XDIGIT ; 51/33 _____3_____
.byte CT_DIGIT | CT_XDIGIT ; 52/34 _____4_____
.byte CT_DIGIT | CT_XDIGIT ; 53/35 _____5_____
.byte CT_DIGIT | CT_XDIGIT ; 54/36 _____6_____
.byte CT_DIGIT | CT_XDIGIT ; 55/37 _____7_____
.byte CT_DIGIT | CT_XDIGIT ; 56/38 _____8_____
.byte CT_DIGIT | CT_XDIGIT ; 57/39 _____9_____
.byte CT_NONE ; 58/3a _____:_____
.byte CT_NONE ; 59/3b _____;_____
.byte CT_NONE ; 60/3c _____<_____
.byte CT_NONE ; 61/3d _____=_____
.byte CT_NONE ; 62/3e _____>_____
.byte CT_NONE ; 63/3f _____?_____
.byte CT_NONE ; 64/40 _____@_____
.byte CT_UPPER | CT_XDIGIT ; 65/41 _____A_____
.byte CT_UPPER | CT_XDIGIT ; 66/42 _____B_____
.byte CT_UPPER | CT_XDIGIT ; 67/43 _____C_____
.byte CT_UPPER | CT_XDIGIT ; 68/44 _____D_____
.byte CT_UPPER | CT_XDIGIT ; 69/45 _____E_____
.byte CT_UPPER | CT_XDIGIT ; 70/46 _____F_____
.byte CT_UPPER ; 71/47 _____G_____
.byte CT_UPPER ; 72/48 _____H_____
.byte CT_UPPER ; 73/49 _____I_____
.byte CT_UPPER ; 74/4a _____J_____
.byte CT_UPPER ; 75/4b _____K_____
.byte CT_UPPER ; 76/4c _____L_____
.byte CT_UPPER ; 77/4d _____M_____
.byte CT_UPPER ; 78/4e _____N_____
.byte CT_UPPER ; 79/4f _____O_____
.byte CT_UPPER ; 80/50 _____P_____
.byte CT_UPPER ; 81/51 _____Q_____
.byte CT_UPPER ; 82/52 _____R_____
.byte CT_UPPER ; 83/53 _____S_____
.byte CT_UPPER ; 84/54 _____T_____
.byte CT_UPPER ; 85/55 _____U_____
.byte CT_UPPER ; 86/56 _____V_____
.byte CT_UPPER ; 87/57 _____W_____
.byte CT_UPPER ; 88/58 _____X_____
.byte CT_UPPER ; 89/59 _____Y_____
.byte CT_UPPER ; 90/5a _____Z_____
.byte CT_NONE ; 91/5b _____[_____
.byte CT_NONE ; 92/5c _____\_____
.byte CT_NONE ; 93/5d _____]_____
.byte CT_NONE ; 94/5e _____^_____
.byte CT_NONE ; 95/5f _UNDERLINE_
.byte CT_NONE ; 96/60 _____`_____
.byte CT_LOWER | CT_XDIGIT ; 97/61 _____a_____
.byte CT_LOWER | CT_XDIGIT ; 98/62 _____b_____
.byte CT_LOWER | CT_XDIGIT ; 99/63 _____c_____
.byte CT_LOWER | CT_XDIGIT ; 100/64 _____d_____
.byte CT_LOWER | CT_XDIGIT ; 101/65 _____e_____
.byte CT_LOWER | CT_XDIGIT ; 102/66 _____f_____
.byte CT_LOWER ; 103/67 _____g_____
.byte CT_LOWER ; 104/68 _____h_____
.byte CT_LOWER ; 105/69 _____i_____
.byte CT_LOWER ; 106/6a _____j_____
.byte CT_LOWER ; 107/6b _____k_____
.byte CT_LOWER ; 108/6c _____l_____
.byte CT_LOWER ; 109/6d _____m_____
.byte CT_LOWER ; 110/6e _____n_____
.byte CT_LOWER ; 111/6f _____o_____
.byte CT_LOWER ; 112/70 _____p_____
.byte CT_LOWER ; 113/71 _____q_____
.byte CT_LOWER ; 114/72 _____r_____
.byte CT_LOWER ; 115/73 _____s_____
.byte CT_LOWER ; 116/74 _____t_____
.byte CT_LOWER ; 117/75 _____u_____
.byte CT_LOWER ; 118/76 _____v_____
.byte CT_LOWER ; 119/77 _____w_____
.byte CT_LOWER ; 120/78 _____x_____
.byte CT_LOWER ; 121/79 _____y_____
.byte CT_LOWER ; 122/7a _____z_____
.byte CT_NONE ; 123/7b _____{_____
.byte CT_NONE ; 124/7c _____|_____
.byte CT_NONE ; 125/7d _____}_____
.byte CT_NONE ; 126/7e _____~_____
.byte CT_CTRL ; 127/7f __USELAST__
.byte CT_NONE ; 128/80 __SHORTCUT_
.byte CT_NONE ; 129/81 ____N/A____
.byte CT_NONE ; 130/82 ____N/A____
.byte CT_NONE ; 131/83 ____N/A____
.byte CT_NONE ; 132/84 ____N/A____
.byte CT_NONE ; 133/85 ____N/A____
.byte CT_NONE ; 134/86 ____N/A____
.byte CT_NONE ; 135/87 ____N/A____
.byte CT_NONE ; 136/88 ____N/A____
.byte CT_NONE ; 137/89 ____N/A____
.byte CT_NONE ; 138/8a ____N/A____
.byte CT_NONE ; 139/8b ____N/A____
.byte CT_NONE ; 140/8c ____N/A____
.byte CT_NONE ; 141/8d ____N/A____
.byte CT_NONE ; 142/8e ____N/A____
.byte CT_NONE ; 143/8f ____N/A____
.byte CT_NONE ; 144/90 ____N/A____
.byte CT_NONE ; 145/91 ____N/A____
.byte CT_NONE ; 146/92 ____N/A____
.byte CT_NONE ; 147/93 ____N/A____
.byte CT_NONE ; 148/94 ____N/A____
.byte CT_NONE ; 149/95 ____N/A____
.byte CT_NONE ; 150/96 ____N/A____
.byte CT_NONE ; 151/97 ____N/A____
.byte CT_NONE ; 152/98 ____N/A____
.byte CT_NONE ; 153/99 ____N/A____
.byte CT_NONE ; 154/9a ____N/A____
.byte CT_NONE ; 155/9b ____N/A____
.byte CT_NONE ; 156/9c ____N/A____
.byte CT_NONE ; 157/9d ____N/A____
.byte CT_NONE ; 158/9e ____N/A____
.byte CT_NONE ; 159/9f ____N/A____
.byte CT_NONE ; 160/a0 ____N/A____
.byte CT_NONE ; 161/a1 ____N/A____
.byte CT_NONE ; 162/a2 ____N/A____
.byte CT_NONE ; 163/a3 ____N/A____
.byte CT_NONE ; 164/a4 ____N/A____
.byte CT_NONE ; 165/a5 ____N/A____
.byte CT_NONE ; 166/a6 ____N/A____
.byte CT_NONE ; 167/a7 ____N/A____
.byte CT_NONE ; 168/a8 ____N/A____
.byte CT_NONE ; 169/a9 ____N/A____
.byte CT_NONE ; 170/aa ____N/A____
.byte CT_NONE ; 171/ab ____N/A____
.byte CT_NONE ; 172/ac ____N/A____
.byte CT_NONE ; 173/ad ____N/A____
.byte CT_NONE ; 174/ae ____N/A____
.byte CT_NONE ; 175/af ____N/A____
.byte CT_NONE ; 176/b0 ____N/A____
.byte CT_NONE ; 177/b1 ____N/A____
.byte CT_NONE ; 178/b2 ____N/A____
.byte CT_NONE ; 179/b3 ____N/A____
.byte CT_NONE ; 180/b4 ____N/A____
.byte CT_NONE ; 181/b5 ____N/A____
.byte CT_NONE ; 182/b6 ____N/A____
.byte CT_NONE ; 183/b7 ____N/A____
.byte CT_NONE ; 184/b8 ____N/A____
.byte CT_NONE ; 185/b9 ____N/A____
.byte CT_NONE ; 186/ba ____N/A____
.byte CT_NONE ; 187/bb ____N/A____
.byte CT_NONE ; 188/bc ____N/A____
.byte CT_NONE ; 189/bd ____N/A____
.byte CT_NONE ; 190/be ____N/A____
.byte CT_NONE ; 191/bf ____N/A____
.byte CT_NONE ; 192/c0 ____N/A____
.byte CT_NONE ; 193/c1 ____N/A____
.byte CT_NONE ; 194/c2 ____N/A____
.byte CT_NONE ; 195/c3 ____N/A____
.byte CT_NONE ; 196/c4 ____N/A____
.byte CT_NONE ; 197/c5 ____N/A____
.byte CT_NONE ; 198/c6 ____N/A____
.byte CT_NONE ; 199/c7 ____N/A____
.byte CT_NONE ; 200/c8 ____N/A____
.byte CT_NONE ; 201/c9 ____N/A____
.byte CT_NONE ; 202/ca ____N/A____
.byte CT_NONE ; 203/cb ____N/A____
.byte CT_NONE ; 204/cc ____N/A____
.byte CT_NONE ; 205/cd ____N/A____
.byte CT_NONE ; 206/ce ____N/A____
.byte CT_NONE ; 207/cf ____N/A____
.byte CT_NONE ; 208/d0 ____N/A____
.byte CT_NONE ; 209/d1 ____N/A____
.byte CT_NONE ; 210/d2 ____N/A____
.byte CT_NONE ; 211/d3 ____N/A____
.byte CT_NONE ; 212/d4 ____N/A____
.byte CT_NONE ; 213/d5 ____N/A____
.byte CT_NONE ; 214/d6 ____N/A____
.byte CT_NONE ; 215/d7 ____N/A____
.byte CT_NONE ; 216/d8 ____N/A____
.byte CT_NONE ; 217/d9 ____N/A____
.byte CT_NONE ; 218/da ____N/A____
.byte CT_NONE ; 219/db ____N/A____
.byte CT_NONE ; 220/dc ____N/A____
.byte CT_NONE ; 221/dd ____N/A____
.byte CT_NONE ; 222/de ____N/A____
.byte CT_NONE ; 223/df ____N/A____
.byte CT_NONE ; 224/e0 ____N/A____
.byte CT_NONE ; 225/e1 ____N/A____
.byte CT_NONE ; 226/e2 ____N/A____
.byte CT_NONE ; 227/e3 ____N/A____
.byte CT_NONE ; 228/e4 ____N/A____
.byte CT_NONE ; 229/e5 ____N/A____
.byte CT_NONE ; 230/e6 ____N/A____
.byte CT_NONE ; 231/e7 ____N/A____
.byte CT_NONE ; 232/e8 ____N/A____
.byte CT_NONE ; 233/e9 ____N/A____
.byte CT_NONE ; 234/ea ____N/A____
.byte CT_NONE ; 235/eb ____N/A____
.byte CT_NONE ; 236/ec ____N/A____
.byte CT_NONE ; 237/ed ____N/A____
.byte CT_NONE ; 238/ee ____N/A____
.byte CT_NONE ; 239/ef ____N/A____
.byte CT_NONE ; 240/f0 ____N/A____
.byte CT_NONE ; 241/f1 ____N/A____
.byte CT_NONE ; 242/f2 ____N/A____
.byte CT_NONE ; 243/f3 ____N/A____
.byte CT_NONE ; 244/f4 ____N/A____
.byte CT_NONE ; 245/f5 ____N/A____
.byte CT_NONE ; 246/f6 ____N/A____
.byte CT_NONE ; 247/f7 ____N/A____
.byte CT_NONE ; 248/f8 ____N/A____
.byte CT_NONE ; 249/f9 ____N/A____
.byte CT_NONE ; 250/fa ____N/A____
.byte CT_NONE ; 251/fb ____N/A____
.byte CT_NONE ; 252/fc ____N/A____
.byte CT_NONE ; 253/fd ____N/A____
.byte CT_NONE ; 254/fe ____N/A____
.byte CT_NONE ; 255/ff ____N/A____

10
libsrc/geos-common/system/enterdesktop.s
View File

@@ -5,10 +5,10 @@
; void EnterDeskTop (void);
.import _exit
.export _EnterDeskTop
.import _exit
.export _EnterDeskTop
_EnterDeskTop:
lda #0
tax
jmp _exit
lda #0
tax
jmp _exit

14
libsrc/geos-common/system/extzp.s
View File

@@ -5,17 +5,17 @@
; zeropage locations for exclusive use by the library
;
.exportzp cursor_x, cursor_y
.exportzp cursor_c, cursor_r
.exportzp cursor_x, cursor_y
.exportzp cursor_c, cursor_r
.segment "EXTZP" : zeropage
.segment "EXTZP" : zeropage
cursor_x:
.res 2 ; Cursor column (0-319/639)
.res 2 ; Cursor column (0-319/639)
cursor_y:
.res 1 ; Cursor row (0-199)
.res 1 ; Cursor row (0-199)
cursor_c:
.res 1 ; Cursor column (0-39/79)
.res 1 ; Cursor column (0-39/79)
cursor_r:
.res 1 ; Cursor row (0-24)
.res 1 ; Cursor row (0-24)

6
libsrc/geos-common/system/firstinit.s
View File

@@ -5,8 +5,8 @@
; void FirstInit (void);
.export _FirstInit
.export _FirstInit
.include "jumptab.inc"
.include "jumptab.inc"
_FirstInit = FirstInit
_FirstInit = FirstInit

10
libsrc/geos-common/system/getrandom.s
View File

@@ -5,11 +5,11 @@
; char GetRandom (void);
.export _GetRandom
.export _GetRandom
.include "jumptab.inc"
.include "jumptab.inc"
_GetRandom:
jsr GetRandom
ldx #0
rts
jsr GetRandom
ldx #0
rts

4
libsrc/geos-common/system/joy_stddrv.s
View File

@@ -6,10 +6,10 @@
; const char joy_stddrv[];
;
.export _joy_stddrv
.export _joy_stddrv
.rodata
_joy_stddrv:
.asciiz "geos-stdjoy.joy"
.asciiz "geos-stdjoy.joy"

72
libsrc/geos-common/system/mainargs.s
View File

@@ -12,66 +12,66 @@
; on icon of your application
;
.constructor initmainargs, 24
.import __argc, __argv
.constructor initmainargs, 24
.import __argc, __argv
.include "const.inc"
.include "geossym.inc"
.include "const.inc"
.include "geossym.inc"
.segment "INIT"
.segment "INIT"
; Setup arguments for main
initmainargs:
; Setup a pointer to our argv vector
lda #<argv
sta __argv
lda #>argv
sta __argv+1
lda #<argv
sta __argv
lda #>argv
sta __argv+1
; Copy program name
ldy #0
ldy #0
@fn_loop:
lda dirEntryBuf+OFF_FNAME,y
lda dirEntryBuf+OFF_FNAME,y
.ifdef __GEOS_CBM__
cmp #$a0
cmp #$a0
.else
cmp #0
cmp #0
.endif
beq @fn_end
sta argv0,y
iny
cpy #16+1
bne @fn_loop
beq @fn_end
sta argv0,y
iny
cpy #16+1
bne @fn_loop
@fn_end:
lda #0
sta argv0,y
sta __argc+1
lda #0
sta argv0,y
sta __argc+1
; Check if there are any more arguments
lda dataFileName
bne @threeargs
ldx #0 ; no dataFileName - NULL the 2nd argument
stx argv+2
stx argv+3
inx ; there is only one argument
bne @setargc
lda dataFileName
bne @threeargs
ldx #0 ; no dataFileName - NULL the 2nd argument
stx argv+2
stx argv+3
inx ; there is only one argument
bne @setargc
@threeargs:
ldx #3 ; there are three arguments
ldx #3 ; there are three arguments
@setargc:
stx __argc
rts
stx __argc
rts
.data
argv:
.word argv0 ; Pointer to program name
.word dataFileName ; dataFileName or NULL if last one
.word dataDiskName ; dataDiskName
.word $0000 ; last one must be NULL
.word argv0 ; Pointer to program name
.word dataFileName ; dataFileName or NULL if last one
.word dataDiskName ; dataDiskName
.word $0000 ; last one must be NULL
.bss
argv0:
.res 17 ; Program name
.res 17 ; Program name

6
libsrc/geos-common/system/mainloop.s
View File

@@ -5,8 +5,8 @@
; void MainLoop (void);
.export _MainLoop
.export _MainLoop
.include "jumptab.inc"
.include "jumptab.inc"
_MainLoop = MainLoop
_MainLoop = MainLoop

110
libsrc/geos-common/system/oserrlist.s
View File

@@ -14,27 +14,27 @@
; error code could not be found.
;
.export __sys_oserrlist
.export __sys_oserrlist
.include "const.inc"
.include "const.inc"
;----------------------------------------------------------------------------
; Macros used to generate the list (may get moved to an include file?)
; Regular entry
.macro sys_oserr_entry code, msg
.local Start, End
.local Start, End
Start: .byte End - Start
.byte code
.asciiz msg
.byte code
.asciiz msg
End:
.endmacro
; Sentinel entry
.macro sys_oserr_sentinel msg
.byte 0 ; Length is always zero
.byte 0 ; Code is unused
.asciiz msg
.byte 0 ; Length is always zero
.byte 0 ; Code is unused
.asciiz msg
.endmacro
;----------------------------------------------------------------------------
@@ -43,50 +43,50 @@ End:
.rodata
__sys_oserrlist:
sys_oserr_entry NO_BLOCKS, "No free blocks"
sys_oserr_entry INV_TRACK, "Illegal track or sector"
sys_oserr_entry INSUFF_SPACE, "Disk full"
sys_oserr_entry FULL_DIRECTORY, "Directory full"
sys_oserr_entry FILE_NOT_FOUND, "File not found"
sys_oserr_entry BAD_BAM, "Inconsistent BAM"
sys_oserr_entry UNOPENED_VLIR, "VLIR file not opened"
sys_oserr_entry INV_RECORD, "Invalid VLIR record"
sys_oserr_entry OUT_OF_RECORDS, "Out of VLIR records"
sys_oserr_entry STRUCT_MISMAT, "Structure mismatch"
sys_oserr_entry BFR_OVERFLOW, "Buffer overflow"
sys_oserr_entry CANCEL_ERR, "Operation cancelled"
sys_oserr_entry DEV_NOT_FOUND, "Device not found"
sys_oserr_entry INCOMPATIBLE, "Incompatible device"
sys_oserr_entry 20, "Read error"
sys_oserr_entry 21, "Read error"
sys_oserr_entry 22, "Read error"
sys_oserr_entry 23, "Read error"
sys_oserr_entry 24, "Read error"
sys_oserr_entry 25, "Write error"
sys_oserr_entry 26, "Write protect on"
sys_oserr_entry 27, "Read error"
sys_oserr_entry 28, "Write error"
sys_oserr_entry 29, "Disk ID mismatch"
sys_oserr_entry 30, "Syntax error"
sys_oserr_entry 31, "Syntax error"
sys_oserr_entry 32, "Syntax error"
sys_oserr_entry 33, "Syntax error (invalid file name)"
sys_oserr_entry 34, "Syntax error (no file given)"
sys_oserr_entry 39, "Syntax error"
sys_oserr_entry 50, "Record not present"
sys_oserr_entry 51, "Overflow in record"
sys_oserr_entry 52, "File too large"
sys_oserr_entry 60, "Write file open"
sys_oserr_entry 61, "File not open"
sys_oserr_entry 62, "File not found"
sys_oserr_entry 63, "File exists"
sys_oserr_entry 64, "File type mismatch"
sys_oserr_entry 65, "No block"
sys_oserr_entry 66, "Illegal track or sector"
sys_oserr_entry 67, "Illegal system track or sector"
sys_oserr_entry 70, "No channel"
sys_oserr_entry 71, "Directory error"
sys_oserr_entry 72, "Disk full"
sys_oserr_entry 73, "DOS version mismatch"
sys_oserr_entry 74, "Drive not ready"
sys_oserr_sentinel "Unknown error"
sys_oserr_entry NO_BLOCKS, "No free blocks"
sys_oserr_entry INV_TRACK, "Illegal track or sector"
sys_oserr_entry INSUFF_SPACE, "Disk full"
sys_oserr_entry FULL_DIRECTORY, "Directory full"
sys_oserr_entry FILE_NOT_FOUND, "File not found"
sys_oserr_entry BAD_BAM, "Inconsistent BAM"
sys_oserr_entry UNOPENED_VLIR, "VLIR file not opened"
sys_oserr_entry INV_RECORD, "Invalid VLIR record"
sys_oserr_entry OUT_OF_RECORDS, "Out of VLIR records"
sys_oserr_entry STRUCT_MISMAT, "Structure mismatch"
sys_oserr_entry BFR_OVERFLOW, "Buffer overflow"
sys_oserr_entry CANCEL_ERR, "Operation cancelled"
sys_oserr_entry DEV_NOT_FOUND, "Device not found"
sys_oserr_entry INCOMPATIBLE, "Incompatible device"
sys_oserr_entry 20, "Read error"
sys_oserr_entry 21, "Read error"
sys_oserr_entry 22, "Read error"
sys_oserr_entry 23, "Read error"
sys_oserr_entry 24, "Read error"
sys_oserr_entry 25, "Write error"
sys_oserr_entry 26, "Write protect on"
sys_oserr_entry 27, "Read error"
sys_oserr_entry 28, "Write error"
sys_oserr_entry 29, "Disk ID mismatch"
sys_oserr_entry 30, "Syntax error"
sys_oserr_entry 31, "Syntax error"
sys_oserr_entry 32, "Syntax error"
sys_oserr_entry 33, "Syntax error (invalid file name)"
sys_oserr_entry 34, "Syntax error (no file given)"
sys_oserr_entry 39, "Syntax error"
sys_oserr_entry 50, "Record not present"
sys_oserr_entry 51, "Overflow in record"
sys_oserr_entry 52, "File too large"
sys_oserr_entry 60, "Write file open"
sys_oserr_entry 61, "File not open"
sys_oserr_entry 62, "File not found"
sys_oserr_entry 63, "File exists"
sys_oserr_entry 64, "File type mismatch"
sys_oserr_entry 65, "No block"
sys_oserr_entry 66, "Illegal track or sector"
sys_oserr_entry 67, "Illegal system track or sector"
sys_oserr_entry 70, "No channel"
sys_oserr_entry 71, "Directory error"
sys_oserr_entry 72, "Disk full"
sys_oserr_entry 73, "DOS version mismatch"
sys_oserr_entry 74, "Drive not ready"
sys_oserr_sentinel "Unknown error"

122
libsrc/geos-common/system/oserror.s
View File

@@ -7,79 +7,79 @@
; /* Map a system specific error into a system independent code */
;
.export __osmaperrno
.export __osmaperrno
.include "errno.inc"
.include "const.inc"
.include "errno.inc"
.include "const.inc"
__osmaperrno:
ldx #ErrTabSize
@L1: cmp ErrTab-2,x ; Search for the error code
beq @L2 ; Jump if found
dex
dex
bne @L1 ; Next entry
ldx #ErrTabSize
@L1: cmp ErrTab-2,x ; Search for the error code
beq @L2 ; Jump if found
dex
dex
bne @L1 ; Next entry
; Code not found, return EINVAL
lda #<EINVAL
ldx #>EINVAL
rts
lda #<EINVAL
ldx #>EINVAL
rts
; Found the code
@L2: lda ErrTab-1,x
ldx #$00 ; High byte always zero
rts
@L2: lda ErrTab-1,x
ldx #$00 ; High byte always zero
rts
.rodata
ErrTab:
.byte NO_BLOCKS, EINVAL ; ???
.byte INV_TRACK, EINVAL ; invalid track&sector pair
.byte INSUFF_SPACE, ENOSPC ; out of space
.byte FULL_DIRECTORY, ENOSPC ; directory is full
.byte FILE_NOT_FOUND, ENOENT ; file not found
.byte BAD_BAM, EIO ; bam inconsistent
.byte UNOPENED_VLIR, EINVAL ; using VLIR file without opening
.byte INV_RECORD, EINVAL ; using >128 VLIR record number
.byte OUT_OF_RECORDS, ENOSPC ; cannot insert/add record
.byte STRUCT_MISMAT, EINVAL ; ???
.byte BFR_OVERFLOW, ENOMEM ; file longer than buffer or end of file
.byte CANCEL_ERR, EIO ; ???
.byte DEV_NOT_FOUND, ENODEV ; device not found
.byte INCOMPATIBLE, EINVAL ; ???
.byte NO_BLOCKS, EINVAL ; ???
.byte INV_TRACK, EINVAL ; invalid track&sector pair
.byte INSUFF_SPACE, ENOSPC ; out of space
.byte FULL_DIRECTORY, ENOSPC ; directory is full
.byte FILE_NOT_FOUND, ENOENT ; file not found
.byte BAD_BAM, EIO ; bam inconsistent
.byte UNOPENED_VLIR, EINVAL ; using VLIR file without opening
.byte INV_RECORD, EINVAL ; using >128 VLIR record number
.byte OUT_OF_RECORDS, ENOSPC ; cannot insert/add record
.byte STRUCT_MISMAT, EINVAL ; ???
.byte BFR_OVERFLOW, ENOMEM ; file longer than buffer or end of file
.byte CANCEL_ERR, EIO ; ???
.byte DEV_NOT_FOUND, ENODEV ; device not found
.byte INCOMPATIBLE, EINVAL ; ???
; .byte 20, ; Read error
; .byte 21, ; Read error
; .byte 22, ; Read error
; .byte 23, ; Read error
; .byte 24, ; Read error
; .byte 25, ; Write error
.byte 26, EACCES ; Write protect on
; .byte 27, ; Read error
; .byte 28, ; Write error
; .byte 29, ; Disk ID mismatch
; .byte 30, ; Syntax error
; .byte 31, ; Syntax error
; .byte 32, ; Syntax error
.byte 33, EINVAL ; Syntax error (invalid file name)
.byte 34, EINVAL ; Syntax error (no file given)
; .byte 39, ; Syntax error
; .byte 50, ; Record not present
; .byte 51, ; Overflow in record
; .byte 52, ; File too large
.byte 60, EINVAL ; Write file open
.byte 61, EINVAL ; File not open
.byte 62, ENOENT ; File not found
.byte 63, EEXIST ; File exists
.byte 64, EINVAL ; File type mismatch
; .byte 65, ; No block
; .byte 66, ; Illegal track or sector
; .byte 67, ; Illegal system track or sector
.byte 70, EBUSY ; No channel
; .byte 71, ; Directory error
; .byte 72, ; Disk full
; .byte 73, ; DOS version mismatch
; .byte 20, ; Read error
; .byte 21, ; Read error
; .byte 22, ; Read error
; .byte 23, ; Read error
; .byte 24, ; Read error
; .byte 25, ; Write error
.byte 26, EACCES ; Write protect on
; .byte 27, ; Read error
; .byte 28, ; Write error
; .byte 29, ; Disk ID mismatch
; .byte 30, ; Syntax error
; .byte 31, ; Syntax error
; .byte 32, ; Syntax error
.byte 33, EINVAL ; Syntax error (invalid file name)
.byte 34, EINVAL ; Syntax error (no file given)
; .byte 39, ; Syntax error
; .byte 50, ; Record not present
; .byte 51, ; Overflow in record
; .byte 52, ; File too large
.byte 60, EINVAL ; Write file open
.byte 61, EINVAL ; File not open
.byte 62, ENOENT ; File not found
.byte 63, EEXIST ; File exists
.byte 64, EINVAL ; File type mismatch
; .byte 65, ; No block
; .byte 66, ; Illegal track or sector
; .byte 67, ; Illegal system track or sector
.byte 70, EBUSY ; No channel
; .byte 71, ; Directory error
; .byte 72, ; Disk full
; .byte 73, ; DOS version mismatch
ErrTabSize = (* - ErrTab)
ErrTabSize = (* - ErrTab)

6
libsrc/geos-common/system/panic.s
View File

@@ -5,8 +5,8 @@
; void Panic (void);
.export _Panic
.export _Panic
.include "jumptab.inc"
.include "jumptab.inc"
_Panic = Panic
_Panic = Panic

12
libsrc/geos-common/system/randomize.s
View File

@@ -5,12 +5,12 @@
; /* Initialize the random number generator */
;
.export __randomize
.import _srand
.export __randomize
.import _srand
.include "geossym.inc"
.include "geossym.inc"
__randomize:
lda random ; get random value from internal generator
ldx random+1
jmp _srand ; and use it as seed
lda random ; get random value from internal generator
ldx random+1
jmp _srand ; and use it as seed

14
libsrc/geos-common/system/setoserror.s
View File

@@ -4,12 +4,12 @@
; 2.1.2003
;
.export setoserror
.import __oserror
.export setoserror
.import __oserror
setoserror:
stx __oserror
txa
ldx #0 ; X is cleared (high byte for promoting char to int)
tay ; Y register is used just to save flags state
rts
stx __oserror
txa
ldx #0 ; X is cleared (high byte for promoting char to int)
tay ; Y register is used just to save flags state
rts

2
libsrc/geos-common/system/systime.c
View File

@@ -18,7 +18,7 @@ time_t _systime(void)
currentTime.tm_mon = system_date.s_month;
currentTime.tm_year = system_date.s_year;
if (system_date.s_year < 87) {
currentTime.tm_year+=100;
currentTime.tm_year+=100;
}
currentTime.tm_isdst = -1;

34
libsrc/geos-common/system/sysuname.s
View File

@@ -4,10 +4,10 @@
; unsigned char __fastcall__ _sysuname (struct utsname* buf);
;
.import utscopy
.export __sysuname, utsdata
.import utscopy
.export __sysuname, utsdata
__sysuname = utscopy
__sysuname = utscopy
;--------------------------------------------------------------------------
; Data. We define a fixed utsname struct here and just copy it.
@@ -15,24 +15,24 @@ __sysuname = utscopy
.rodata
utsdata:
; sysname
.asciiz "cc65"
; sysname
.asciiz "cc65"
; nodename
.asciiz ""
; nodename
.asciiz ""
; release
.byte ((.VERSION >> 8) & $0F) + '0'
.byte '.'
.byte ((.VERSION >> 4) & $0F) + '0'
.byte $00
; release
.byte ((.VERSION >> 8) & $0F) + '0'
.byte '.'
.byte ((.VERSION >> 4) & $0F) + '0'
.byte $00
; version
.byte (.VERSION & $0F) + '0'
.byte $00
; version
.byte (.VERSION & $0F) + '0'
.byte $00
; machine
.asciiz "GEOS"
; machine
.asciiz "GEOS"

6
libsrc/geos-common/system/tgi_colors.s
View File

@@ -2,7 +2,7 @@
; Target-specific black & white values, for use by the target-shared TGI kernel
;
.include "tgi-kernel.inc"
.include "tgi-kernel.inc"
tgi_color_black = $00
tgi_color_white = $01
tgi_color_black = $00
tgi_color_white = $01

4
libsrc/geos-common/system/tgi_stddrv.s
View File

@@ -6,9 +6,9 @@
; const char tgi_stddrv[];
;
.export _tgi_stddrv
.export _tgi_stddrv
.rodata
_tgi_stddrv:
.asciiz "geos-tgi.tgi"
.asciiz "geos-tgi.tgi"