mirror of
https://github.com/A2osX/A2osX.git
synced 2025-01-29 23:32:00 +00:00
Kernel 0.93
This commit is contained in:
parent
c6f7934406
commit
bdb1045920
Binary file not shown.
Binary file not shown.
@ -197,7 +197,7 @@ EXP.GetLocal jsr SRC.GetNextChar
|
||||
bne EXP.EvalExitSYN Max .255
|
||||
ldx SRC.ACC
|
||||
beq EXP.EvalExitSYN .0 is not allowed
|
||||
|
||||
|
||||
jsr SYM.GetLocalX
|
||||
bcc .8
|
||||
|
||||
|
@ -32,8 +32,8 @@ OUT.Reset ldx #4
|
||||
rts
|
||||
*---------------------------------------
|
||||
OUT.PrintLineOn
|
||||
* clc
|
||||
* rts
|
||||
clc
|
||||
rts
|
||||
|
||||
>LDA.G ASM.LI.ON
|
||||
bpl .9
|
||||
|
@ -620,7 +620,7 @@ SRC.ExpandAddress
|
||||
rts
|
||||
*---------------------------------------
|
||||
SRC.ComputeRel8 jsr SRC.ComputeRel
|
||||
|
||||
|
||||
bcc .1
|
||||
|
||||
* positive : check 0<r<0000007F
|
||||
|
@ -343,9 +343,10 @@ SYM.Acc2Global ldy #SYMG-1
|
||||
|
||||
rts
|
||||
*---------------------------------------
|
||||
* Local Symbol Record: (5 bytes)
|
||||
* Local Symbol Record: (6 bytes)
|
||||
* 0 : Local ID (1->255)
|
||||
* 1-4 : 32 bits Value (PC)
|
||||
* 1 : Macro Context ID
|
||||
* 2-5 : 32 bits Value (PC)
|
||||
*---------------------------------------
|
||||
SYM.NewOrGetLocalA
|
||||
tax Save Local ID
|
||||
@ -386,11 +387,11 @@ SYM.NewOrGetLocalA
|
||||
bne .2
|
||||
|
||||
tya
|
||||
>STA.G SYM.GlobalPtr
|
||||
|
||||
iny
|
||||
lda #0
|
||||
sta (ZPGlobalBuf),y
|
||||
tya
|
||||
>STA.G SYM.GlobalPtr
|
||||
|
||||
lda (ZPGlobalBuf)
|
||||
ora #SYMG.F.LOCALS
|
||||
@ -425,7 +426,7 @@ SYM.GetLocalX lda (ZPGlobalBuf)
|
||||
bne .3
|
||||
|
||||
ldx #0
|
||||
|
||||
|
||||
.2 iny
|
||||
lda (ZPGlobalBuf),y
|
||||
sta SRC.ACC,x
|
||||
|
@ -454,10 +454,10 @@ MSG.PASS .AZ "**** Pass:#%d ****"
|
||||
MSG.SRC.FILE .AZ "**** Reading SRC File:%s"
|
||||
MSG.OBJ.FILE .AZ "**** Writing OBJ File:%s, Type=%02x"
|
||||
MSG.T.FILE .AZ "**** Loading CPU File:%s"
|
||||
MSG.OUT0 .AZ "%H- "
|
||||
MSG.OUT1 .AZ "%H-%h "
|
||||
MSG.OUT2 .AZ "%H-%h %h "
|
||||
MSG.OUT3 .AZ "%H-%h %h %h"
|
||||
MSG.OUT0 .AZ "%H%H- "
|
||||
MSG.OUT1 .AZ "%H%H-%h "
|
||||
MSG.OUT2 .AZ "%H%H-%h %h "
|
||||
MSG.OUT3 .AZ "%H%H-%h %h %h"
|
||||
MSG.EQU0 .AZ " [ ?] "
|
||||
MSG.EQU1 .AZ " [ %h] "
|
||||
MSG.EQU2 .AZ " [ %h%h] "
|
||||
|
@ -3,7 +3,7 @@ NEW
|
||||
AUTO 4,1
|
||||
.LIST OFF
|
||||
.OR $0
|
||||
.TF BIN/DEV/ASM.T.6502
|
||||
.TF BIN/ASM.T.6502
|
||||
*---------------------------------------
|
||||
.DA T.ADDR.MODES
|
||||
.DA T.REGISTERS
|
||||
|
@ -3,7 +3,7 @@ NEW
|
||||
AUTO 4,1
|
||||
.LIST OFF
|
||||
.OR $0
|
||||
.TF BIN/DEV/ASM.T.65816
|
||||
.TF BIN/ASM.T.65816
|
||||
*---------------------------------------
|
||||
.DA T.ADDR.MODES
|
||||
.DA T.REGISTERS
|
||||
|
@ -3,7 +3,7 @@ NEW
|
||||
AUTO 4,1
|
||||
.LIST OFF
|
||||
.OR $0
|
||||
.TF BIN/DEV/ASM.T.65C02
|
||||
.TF BIN/ASM.T.65C02
|
||||
*---------------------------------------
|
||||
.DA T.ADDR.MODES
|
||||
.DA T.REGISTERS
|
||||
|
@ -3,7 +3,7 @@ NEW
|
||||
AUTO 4,1
|
||||
.LIST OFF
|
||||
.OR $0
|
||||
.TF BIN/DEV/ASM.T.65R02
|
||||
.TF BIN/ASM.T.65R02
|
||||
*---------------------------------------
|
||||
.DA T.ADDR.MODES
|
||||
.DA T.REGISTERS
|
||||
|
@ -3,7 +3,7 @@ NEW
|
||||
AUTO 4,1
|
||||
.LIST OFF
|
||||
.OR $0
|
||||
.TF BIN/DEV/ASM.T.SW16
|
||||
.TF BIN/ASM.T.SW16
|
||||
*---------------------------------------
|
||||
.DA T.ADDR.MODES
|
||||
.DA T.REGISTERS
|
||||
|
@ -3,7 +3,7 @@ NEW
|
||||
AUTO 4,1
|
||||
.LIST OFF
|
||||
.OR $0
|
||||
.TF BIN/DEV/ASM.T.Z80
|
||||
.TF BIN/ASM.T.Z80
|
||||
*---------------------------------------
|
||||
.DA T.ADDR.MODES
|
||||
.DA T.REGISTERS
|
||||
|
@ -1098,7 +1098,7 @@ Mouse.SIG .HS 38180120D6
|
||||
*--------------------------------------
|
||||
TClock.SIG .HS 0878282c58ff700538b00118b8087848
|
||||
.HS 8a489848adffcf201ac86868ba8df807
|
||||
TClock.SIG.Cnt .EQ *-TClock.SIG
|
||||
TClock.SIG.Cnt .EQ *-TClock.SIG
|
||||
*--------------------------------------
|
||||
MSG.Init2 .AZ "A2osX[Stage2]:Init\nRelocating Kernel...\n"
|
||||
MSG.HZ .AZ "Kernel SYS Timer Set For %d0 hz Machine.\n"
|
||||
|
Loading…
x
Reference in New Issue
Block a user