2022-01-30 22:47:08 +01:00
|
|
|
|
NEW
|
|
|
|
|
AUTO 3,1
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
* Input : ZPLineBufPtr, Y,A = T/Q, X = SC
|
2022-09-11 21:11:32 +02:00
|
|
|
|
* CS : Reset Buffer
|
|
|
|
|
* CC : Reuse Buffer
|
2022-01-30 22:47:08 +01:00
|
|
|
|
* Output : Y,A = VarID
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.New >STYA ZPPtr2 T/Q
|
2022-01-30 22:47:08 +01:00
|
|
|
|
stx ZPPtr3 SC
|
|
|
|
|
|
2022-06-22 08:26:44 +02:00
|
|
|
|
bit bPass2
|
2022-10-07 21:21:37 +02:00
|
|
|
|
bpl SYM.New.1
|
2022-06-22 08:26:44 +02:00
|
|
|
|
|
|
|
|
|
bit bLocalScope
|
2022-10-07 21:21:37 +02:00
|
|
|
|
bmi SYM.New.1
|
2022-06-22 08:26:44 +02:00
|
|
|
|
|
|
|
|
|
>PUSHB.G CC.hScopes Global Scope
|
|
|
|
|
>PUSHW ZPLineBufPtr
|
|
|
|
|
|
|
|
|
|
>SYSCALL SListLookup
|
2022-10-07 21:21:37 +02:00
|
|
|
|
bcs SYM.New.9
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-06-12 22:42:22 +02:00
|
|
|
|
>STYA.G CC.SymID Y,A = KeyID
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-06-22 08:26:44 +02:00
|
|
|
|
jsr CC.SkipX X = KeyLen
|
|
|
|
|
|
|
|
|
|
>PUSHB.G CC.hScopes
|
|
|
|
|
>PUSHW.G CC.SymID
|
|
|
|
|
>PUSHW ZPSymBufPtr
|
|
|
|
|
>PUSHWI 65535 all
|
|
|
|
|
>PUSHWZ From Start
|
|
|
|
|
>SYSCALL SListGetData
|
2022-10-07 21:21:37 +02:00
|
|
|
|
bcc SYM.New.2
|
2022-06-22 08:26:44 +02:00
|
|
|
|
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.New.9 rts Y,A = SymSize
|
2022-06-22 08:26:44 +02:00
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.New.1 jsr SYM.BufInitYAXC set buf according C
|
2022-09-11 21:11:32 +02:00
|
|
|
|
|
|
|
|
|
ldy ScopeIdx
|
2022-06-22 08:26:44 +02:00
|
|
|
|
lda (pData),y
|
2022-10-07 21:21:37 +02:00
|
|
|
|
jsr SYM.NewKey
|
|
|
|
|
bcs SYM.New.9
|
2022-06-22 08:26:44 +02:00
|
|
|
|
|
|
|
|
|
>STYA.G CC.SymID Y,A = KeyID
|
|
|
|
|
|
|
|
|
|
jsr CC.SkipX X = KeyLen
|
2022-09-11 21:11:32 +02:00
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.New.2 jsr CC.GetCharNB
|
2022-09-11 21:11:32 +02:00
|
|
|
|
bcs .98
|
2022-06-12 22:42:22 +02:00
|
|
|
|
|
2022-09-11 21:11:32 +02:00
|
|
|
|
cmp #';'
|
|
|
|
|
bne .1
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
|
|
|
|
lda ZPPtr3
|
2022-09-11 21:11:32 +02:00
|
|
|
|
cmp #SYM.SC.TYPEDEF
|
2022-10-07 21:21:37 +02:00
|
|
|
|
bne SYM.SetAddr
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-09-11 21:11:32 +02:00
|
|
|
|
clc
|
|
|
|
|
rts
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-09-11 21:11:32 +02:00
|
|
|
|
.1 cmp #'('
|
2022-10-07 21:21:37 +02:00
|
|
|
|
bne SYM.NewV
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-06-22 08:26:44 +02:00
|
|
|
|
ldy #SYM.Q
|
|
|
|
|
lda #SYM.Q.FUNC
|
|
|
|
|
ora (ZPSymBufPtr),y
|
|
|
|
|
sta (ZPSymBufPtr),y
|
|
|
|
|
|
2022-10-07 21:21:37 +02:00
|
|
|
|
jmp F.Decl
|
2022-09-11 21:11:32 +02:00
|
|
|
|
|
|
|
|
|
.98 lda #E.CSYN
|
|
|
|
|
sec
|
|
|
|
|
.99 rts
|
2022-01-30 22:47:08 +01:00
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.NewV cmp #'['
|
|
|
|
|
bne SYM.SetAddr
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-08-20 16:37:37 +02:00
|
|
|
|
ldy #SYM.Q
|
2022-01-30 22:47:08 +01:00
|
|
|
|
lda (ZPSymBufPtr),y
|
2022-08-20 16:37:37 +02:00
|
|
|
|
and #%11001111
|
|
|
|
|
sta (ZPSymBufPtr),y
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-08-20 16:37:37 +02:00
|
|
|
|
ldy #SYM.DefSize
|
2022-10-07 21:21:37 +02:00
|
|
|
|
lda #SYM.Def
|
2022-08-20 16:37:37 +02:00
|
|
|
|
sta (ZPSymBufPtr),y
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-08-20 16:37:37 +02:00
|
|
|
|
ldy #SYM.Q
|
|
|
|
|
|
|
|
|
|
.1 lda (ZPSymBufPtr),y
|
|
|
|
|
clc
|
2022-01-30 22:47:08 +01:00
|
|
|
|
adc #SYM.Q.ARRAY
|
|
|
|
|
sta (ZPSymBufPtr),y
|
|
|
|
|
|
2022-10-07 21:21:37 +02:00
|
|
|
|
jsr CORE.GetNCharNB Skip [
|
2022-09-11 21:11:32 +02:00
|
|
|
|
bcs .98
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-08-20 16:37:37 +02:00
|
|
|
|
cmp #']'
|
|
|
|
|
bne .2
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-08-20 16:37:37 +02:00
|
|
|
|
ldy #SYM.Q
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
and #SYM.Q.PPPOINTER
|
2022-09-11 21:11:32 +02:00
|
|
|
|
beq .98 [] only allowed for *
|
|
|
|
|
|
2022-10-07 21:21:37 +02:00
|
|
|
|
jsr SYM.Add0000 set as [0] (deref)
|
2022-09-11 21:11:32 +02:00
|
|
|
|
bcs .99
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-08-20 16:37:37 +02:00
|
|
|
|
bra .3
|
|
|
|
|
|
2022-10-07 21:21:37 +02:00
|
|
|
|
.2 jsr EXP.IntConst
|
2022-09-11 21:11:32 +02:00
|
|
|
|
bcs .98
|
2022-08-20 16:37:37 +02:00
|
|
|
|
|
2022-10-07 21:21:37 +02:00
|
|
|
|
jsr SYM.AddWord
|
2022-09-11 21:11:32 +02:00
|
|
|
|
bcs .99
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
|
|
|
|
jsr CC.GetCharNB
|
2022-09-11 21:11:32 +02:00
|
|
|
|
bcs .98
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
|
|
|
|
cmp #']'
|
2022-09-11 21:11:32 +02:00
|
|
|
|
bne .98
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-10-07 21:21:37 +02:00
|
|
|
|
.3 jsr CORE.GetNCharNB Skip ]
|
|
|
|
|
bcs SYM.SetAddr
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-08-20 16:37:37 +02:00
|
|
|
|
cmp #'['
|
2022-10-07 21:21:37 +02:00
|
|
|
|
bne SYM.SetAddr
|
2022-08-20 16:37:37 +02:00
|
|
|
|
|
|
|
|
|
ldy #SYM.Q
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
and #SYM.Q.AAARRAY
|
|
|
|
|
cmp #SYM.Q.AAARRAY
|
2022-09-11 21:11:32 +02:00
|
|
|
|
bne .1 already [][][] ?
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-09-11 21:11:32 +02:00
|
|
|
|
.98 lda #E.CSYN
|
2022-01-30 22:47:08 +01:00
|
|
|
|
sec
|
2022-09-11 21:11:32 +02:00
|
|
|
|
.99 rts
|
2022-01-30 22:47:08 +01:00
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.SetAddr ldy #SYM.SizeOf
|
2022-09-11 21:11:32 +02:00
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
iny
|
|
|
|
|
ora (ZPSymBufPtr),y
|
|
|
|
|
bne .1
|
|
|
|
|
|
2022-10-07 21:21:37 +02:00
|
|
|
|
jsr SYM.GetSymSizeOfInAXC
|
|
|
|
|
jsr SYM.SetSizeOf
|
2022-10-18 07:56:59 +02:00
|
|
|
|
|
2022-09-11 21:11:32 +02:00
|
|
|
|
.1 ldy #SYM.Q
|
2022-01-30 22:47:08 +01:00
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
and #SYM.Q.FUNC
|
|
|
|
|
bne .9
|
|
|
|
|
|
|
|
|
|
ldy #SYM.SC
|
|
|
|
|
lda (ZPSymBufPtr),y
|
2022-10-07 21:21:37 +02:00
|
|
|
|
beq SYM.SetAddrG SYM.SC.STATIC
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
|
|
|
|
cmp #SYM.SC.AUTO
|
2022-10-07 21:21:37 +02:00
|
|
|
|
beq SYM.SetAddrL
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
|
|
|
|
.9 lda #E.TMISMATCH
|
|
|
|
|
sec
|
|
|
|
|
rts
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.SetAddrG ldy #SYM.Addr
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
|
|
|
|
lda ZPCCData
|
|
|
|
|
sta (ZPSymBufPtr),y
|
|
|
|
|
|
|
|
|
|
iny
|
|
|
|
|
|
|
|
|
|
lda ZPCCData+1
|
|
|
|
|
sta (ZPSymBufPtr),y
|
|
|
|
|
|
2022-09-11 21:11:32 +02:00
|
|
|
|
ldy #SYM.SizeOf
|
|
|
|
|
lda (ZPSymBufPtr),y
|
2022-08-20 16:37:37 +02:00
|
|
|
|
clc
|
|
|
|
|
adc ZPCCData
|
|
|
|
|
sta ZPCCData
|
|
|
|
|
|
2022-09-11 21:11:32 +02:00
|
|
|
|
iny
|
|
|
|
|
lda (ZPSymBufPtr),y
|
2022-01-30 22:47:08 +01:00
|
|
|
|
adc ZPCCData+1
|
|
|
|
|
sta ZPCCData+1
|
|
|
|
|
|
|
|
|
|
clc
|
|
|
|
|
rts
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.SetAddrL ldy #SYM.SizeOf+1
|
2022-01-30 22:47:08 +01:00
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
bne .9
|
|
|
|
|
|
|
|
|
|
dey SYM.SizeOf
|
|
|
|
|
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
|
2022-09-11 21:11:32 +02:00
|
|
|
|
clc
|
2022-01-30 22:47:08 +01:00
|
|
|
|
adc LocalPtr
|
|
|
|
|
sta LocalPtr
|
|
|
|
|
bcs .9
|
|
|
|
|
|
|
|
|
|
ldy #SYM.Addr
|
|
|
|
|
sta (ZPSymBufPtr),y
|
2022-06-12 22:42:22 +02:00
|
|
|
|
|
2022-09-11 21:11:32 +02:00
|
|
|
|
ldy #SYM.SizeOf
|
|
|
|
|
lda (ZPSymBufPtr),y
|
2022-01-30 22:47:08 +01:00
|
|
|
|
jsr CODE.nAddLocal
|
|
|
|
|
|
|
|
|
|
clc
|
|
|
|
|
rts
|
|
|
|
|
|
|
|
|
|
.9 lda #E.BUF
|
|
|
|
|
sec
|
|
|
|
|
rts
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.BufInitYAXC pha
|
2022-09-11 21:11:32 +02:00
|
|
|
|
tya
|
|
|
|
|
sta (ZPSymBufPtr) #SYM.T
|
|
|
|
|
|
|
|
|
|
pla
|
|
|
|
|
ldy #SYM.Q
|
|
|
|
|
sta (ZPSymBufPtr),y
|
|
|
|
|
|
|
|
|
|
txa
|
|
|
|
|
iny #SYM.SC
|
|
|
|
|
sta (ZPSymBufPtr),y
|
|
|
|
|
|
|
|
|
|
bcc .8 DONT reset buffer
|
|
|
|
|
|
|
|
|
|
lda #0
|
|
|
|
|
|
2022-10-07 21:21:37 +02:00
|
|
|
|
.1 iny
|
|
|
|
|
sta (ZPSymBufPtr),y
|
|
|
|
|
cpy #SYM.DefSize-1
|
2022-09-11 21:11:32 +02:00
|
|
|
|
bne .1
|
|
|
|
|
|
2022-10-07 21:21:37 +02:00
|
|
|
|
iny #SYM.DefSize
|
|
|
|
|
lda #SYM.Def
|
2022-09-11 21:11:32 +02:00
|
|
|
|
sta (ZPSymBufPtr),y
|
|
|
|
|
|
|
|
|
|
.8 rts
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.PushAddr ldy #SYM.SC
|
2022-08-20 16:37:37 +02:00
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
beq .1 SYM.SC.STATIC
|
|
|
|
|
* LOCAL
|
|
|
|
|
>LDYA L.PCC.PushLAddrH
|
|
|
|
|
jsr CODE.EmitPCC
|
|
|
|
|
bcs .9
|
|
|
|
|
|
|
|
|
|
ldy #SYM.Addr
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
eor #$FF
|
|
|
|
|
inc
|
|
|
|
|
jsr CODE.LDAI
|
|
|
|
|
bcs .9
|
|
|
|
|
|
|
|
|
|
>LDYA L.PCC.PushLAddrL
|
|
|
|
|
jmp CODE.EmitPCC
|
|
|
|
|
|
|
|
|
|
* GLOBAL
|
|
|
|
|
|
|
|
|
|
.1 ldy #SYM.Addr+1
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
tax
|
|
|
|
|
|
|
|
|
|
dey
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
|
|
|
|
|
jsr CODE.LDAXI
|
|
|
|
|
bcs .9
|
|
|
|
|
|
|
|
|
|
ldy #SYM.Q
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
and #SYM.Q.CONST
|
|
|
|
|
beq .2
|
|
|
|
|
|
|
|
|
|
>LDYA L.PCC.PushIAddr
|
|
|
|
|
jmp CODE.EmitPCC
|
|
|
|
|
|
|
|
|
|
.2 >LDYA L.PCC.PushUAddr
|
|
|
|
|
jmp CODE.EmitPCC
|
|
|
|
|
|
|
|
|
|
.9 rts
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.GetAddr1 ldy #SYM.SC
|
2022-08-20 16:37:37 +02:00
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
beq .1 SYM.SC.STATIC
|
|
|
|
|
* LOCAL
|
|
|
|
|
ldy #SYM.Addr
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
eor #$FF
|
|
|
|
|
inc
|
|
|
|
|
jsr CODE.LDAI
|
|
|
|
|
bcs .9
|
|
|
|
|
|
|
|
|
|
>LDYA L.PCC.GetLAddr1
|
|
|
|
|
jmp CODE.EmitPCC
|
|
|
|
|
* GLOBAL
|
|
|
|
|
|
|
|
|
|
.1 ldy #SYM.Addr+1
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
tax
|
|
|
|
|
|
|
|
|
|
dey
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
|
|
|
|
|
jsr CODE.LDAXI
|
|
|
|
|
bcs .9
|
|
|
|
|
|
|
|
|
|
ldy #SYM.Q
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
and #SYM.Q.CONST
|
|
|
|
|
beq .2
|
|
|
|
|
|
|
|
|
|
>LDYA L.PCC.GetIAddr1
|
|
|
|
|
jmp CODE.EmitPCC
|
2022-09-11 21:11:32 +02:00
|
|
|
|
|
2022-08-20 16:37:37 +02:00
|
|
|
|
.2 >LDYA L.PCC.GetUAddr1
|
|
|
|
|
jmp CODE.EmitPCC
|
|
|
|
|
|
|
|
|
|
.9 rts
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.GetAddr2 ldy #SYM.SC
|
2022-08-20 16:37:37 +02:00
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
beq .1 SYM.SC.STATIC
|
|
|
|
|
* LOCAL
|
|
|
|
|
ldy #SYM.Addr
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
eor #$FF
|
|
|
|
|
inc
|
|
|
|
|
jsr CODE.LDAI
|
|
|
|
|
bcs .9
|
|
|
|
|
|
|
|
|
|
>LDYA L.PCC.GetLAddr2
|
|
|
|
|
jmp CODE.EmitPCC
|
|
|
|
|
* GLOBAL
|
|
|
|
|
|
|
|
|
|
.1 ldy #SYM.Addr+1
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
tax
|
|
|
|
|
|
|
|
|
|
dey
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
|
|
|
|
|
jsr CODE.LDAXI
|
|
|
|
|
bcs .9
|
|
|
|
|
|
|
|
|
|
ldy #SYM.Q
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
and #SYM.Q.CONST
|
|
|
|
|
beq .2
|
|
|
|
|
|
|
|
|
|
>LDYA L.PCC.GetIAddr2
|
|
|
|
|
jmp CODE.EmitPCC
|
|
|
|
|
|
|
|
|
|
.2 >LDYA L.PCC.GetUAddr2
|
|
|
|
|
jmp CODE.EmitPCC
|
|
|
|
|
|
|
|
|
|
.9 rts
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.NewKey >PUSHA
|
2022-01-30 22:47:08 +01:00
|
|
|
|
>PUSHW ZPLineBufPtr
|
2022-06-22 08:26:44 +02:00
|
|
|
|
>SYSCALL SListNewKey
|
|
|
|
|
bcs .9
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
2022-06-22 08:26:44 +02:00
|
|
|
|
.9 rts Y,A = KeyID, X = KeyLen
|
2022-06-12 22:42:22 +02:00
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.Add0000 >LDYAI 0
|
2022-09-11 21:11:32 +02:00
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.AddWord phy
|
2022-09-11 21:11:32 +02:00
|
|
|
|
pha
|
2022-08-20 16:37:37 +02:00
|
|
|
|
|
|
|
|
|
ldy #SYM.DefSize
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
|
2022-09-11 21:11:32 +02:00
|
|
|
|
clc
|
|
|
|
|
adc #2
|
|
|
|
|
bcs .9
|
|
|
|
|
|
2022-08-20 16:37:37 +02:00
|
|
|
|
sta (ZPSymBufPtr),y
|
2022-09-11 21:11:32 +02:00
|
|
|
|
tay
|
2022-08-20 16:37:37 +02:00
|
|
|
|
|
2022-09-11 21:11:32 +02:00
|
|
|
|
dey
|
2022-08-20 16:37:37 +02:00
|
|
|
|
|
2022-09-11 21:11:32 +02:00
|
|
|
|
pla A
|
|
|
|
|
sta (ZPSymBufPtr),y
|
|
|
|
|
|
|
|
|
|
dey
|
2022-10-18 07:56:59 +02:00
|
|
|
|
|
2022-09-11 21:11:32 +02:00
|
|
|
|
pla Y
|
|
|
|
|
pha
|
2022-08-20 16:37:37 +02:00
|
|
|
|
sta (ZPSymBufPtr),y
|
|
|
|
|
iny
|
2022-09-11 21:11:32 +02:00
|
|
|
|
lda (ZPSymBufPtr),y get back A
|
|
|
|
|
ply get back Y
|
|
|
|
|
|
|
|
|
|
* clc
|
|
|
|
|
rts
|
|
|
|
|
|
|
|
|
|
.9 pla
|
|
|
|
|
pla
|
|
|
|
|
lda #E.BUF
|
|
|
|
|
sec
|
|
|
|
|
rts
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.AddName jsr CC.GetCharNB
|
2022-09-11 21:11:32 +02:00
|
|
|
|
bcs .98
|
|
|
|
|
|
|
|
|
|
jsr CC.IsLetter
|
|
|
|
|
bcs .98
|
|
|
|
|
|
2022-09-17 13:35:52 +02:00
|
|
|
|
jsr CC.GetIDLen
|
|
|
|
|
tax
|
2022-10-07 21:21:37 +02:00
|
|
|
|
jsr SYM.AddByte
|
2022-09-11 21:11:32 +02:00
|
|
|
|
bcs .99
|
|
|
|
|
|
2022-09-17 13:35:52 +02:00
|
|
|
|
ldy #0
|
2022-09-11 21:11:32 +02:00
|
|
|
|
|
2022-09-17 13:35:52 +02:00
|
|
|
|
.1 lda (ZPLineBufPtr),y
|
|
|
|
|
phy
|
2022-10-07 21:21:37 +02:00
|
|
|
|
jsr SYM.AddByte
|
2022-09-17 13:35:52 +02:00
|
|
|
|
ply
|
|
|
|
|
bcs .99
|
2022-09-11 21:11:32 +02:00
|
|
|
|
|
2022-09-17 13:35:52 +02:00
|
|
|
|
iny
|
|
|
|
|
dex
|
|
|
|
|
bne .1
|
2022-10-18 07:56:59 +02:00
|
|
|
|
|
2022-09-17 13:35:52 +02:00
|
|
|
|
tya
|
|
|
|
|
jsr CC.SkipA
|
|
|
|
|
|
|
|
|
|
clc
|
|
|
|
|
rts
|
2022-09-11 21:11:32 +02:00
|
|
|
|
|
|
|
|
|
.98 lda #E.CSYN
|
|
|
|
|
sec
|
|
|
|
|
.99 rts
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.AddByte pha
|
2022-09-11 21:11:32 +02:00
|
|
|
|
|
|
|
|
|
ldy #SYM.DefSize
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
|
|
|
|
|
inc
|
|
|
|
|
beq .9
|
|
|
|
|
|
|
|
|
|
sta (ZPSymBufPtr),y
|
|
|
|
|
dec
|
|
|
|
|
tay
|
2022-08-20 16:37:37 +02:00
|
|
|
|
pla
|
|
|
|
|
sta (ZPSymBufPtr),y
|
2022-09-11 21:11:32 +02:00
|
|
|
|
|
|
|
|
|
clc
|
|
|
|
|
rts
|
|
|
|
|
|
|
|
|
|
.9 pla
|
|
|
|
|
lda #E.BUF
|
|
|
|
|
sec
|
2022-08-20 16:37:37 +02:00
|
|
|
|
rts
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.NewA bit bPass2
|
2022-08-20 16:37:37 +02:00
|
|
|
|
bmi .8
|
|
|
|
|
|
|
|
|
|
>STA.G CC.CPSPFX A = "B"reak, "C"ontinue...
|
|
|
|
|
|
|
|
|
|
>PUSHB.G CC.hScopes Global Scope
|
|
|
|
|
>PUSHEA.G CC.CPSPFX
|
|
|
|
|
|
|
|
|
|
>SYSCALL SListNewKey
|
2022-09-11 21:11:32 +02:00
|
|
|
|
bcs .99
|
2022-08-20 16:37:37 +02:00
|
|
|
|
|
|
|
|
|
>STYA.G CC.SymID Y,A = KeyID
|
|
|
|
|
|
|
|
|
|
lda #SYM.T.VOID
|
|
|
|
|
sta (ZPSymBufPtr) #SYM.T
|
|
|
|
|
|
|
|
|
|
lda #SYM.Q.POINTER
|
|
|
|
|
ldy #SYM.Q
|
|
|
|
|
sta (ZPSymBufPtr),y
|
|
|
|
|
|
|
|
|
|
lda #SYM.SC.STATIC
|
|
|
|
|
iny #SYM.SC
|
|
|
|
|
sta (ZPSymBufPtr),y
|
|
|
|
|
|
|
|
|
|
lda #0
|
|
|
|
|
|
2022-10-07 21:21:37 +02:00
|
|
|
|
.1 iny
|
|
|
|
|
sta (ZPSymBufPtr),y
|
|
|
|
|
cpy #SYM.DefSize-1
|
2022-08-20 16:37:37 +02:00
|
|
|
|
bne .1
|
|
|
|
|
|
2022-10-07 21:21:37 +02:00
|
|
|
|
iny #SYM.DefSize
|
|
|
|
|
lda #SYM.Def
|
2022-08-20 16:37:37 +02:00
|
|
|
|
sta (ZPSymBufPtr),y
|
|
|
|
|
|
|
|
|
|
>LDYA ZPCCCode
|
2022-10-07 21:21:37 +02:00
|
|
|
|
jsr SYM.SetAddrYA
|
2022-08-20 16:37:37 +02:00
|
|
|
|
|
|
|
|
|
>LDA.G CC.hScopes Global Scope
|
2022-10-07 21:21:37 +02:00
|
|
|
|
jmp SYM.Store.1
|
2022-08-20 16:37:37 +02:00
|
|
|
|
|
|
|
|
|
.8 clc
|
|
|
|
|
|
|
|
|
|
.99 rts
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.StoreF >LDA.G CC.hScopes
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-06-12 22:42:22 +02:00
|
|
|
|
bit bPass2
|
2022-10-07 21:21:37 +02:00
|
|
|
|
bpl SYM.Store.1
|
2022-08-20 16:37:37 +02:00
|
|
|
|
|
2022-06-22 08:26:44 +02:00
|
|
|
|
clc
|
|
|
|
|
rts
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.Store bit bPass2
|
|
|
|
|
bpl SYM.StoreL Store Global & Local at Pass 1
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-06-22 08:26:44 +02:00
|
|
|
|
bit bLocalScope Store Local at Pass 2
|
2022-10-07 21:21:37 +02:00
|
|
|
|
bmi SYM.StoreL
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-06-22 08:26:44 +02:00
|
|
|
|
clc
|
2022-01-30 22:47:08 +01:00
|
|
|
|
rts
|
|
|
|
|
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.StoreL ldy ScopeIdx
|
2022-06-22 08:26:44 +02:00
|
|
|
|
lda (pData),y
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.Store.1 >PUSHA
|
2022-06-22 08:26:44 +02:00
|
|
|
|
>PUSHW.G CC.SymID
|
|
|
|
|
>PUSHW ZPSymBufPtr
|
|
|
|
|
>PUSHBI 0
|
|
|
|
|
ldy #SYM.DefSize
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
>PUSHA
|
|
|
|
|
|
|
|
|
|
>SYSCALL SListAddData
|
2022-06-12 22:42:22 +02:00
|
|
|
|
|
2022-01-30 22:47:08 +01:00
|
|
|
|
rts
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.NewScope ldy ScopeIdx
|
2022-06-22 08:26:44 +02:00
|
|
|
|
cpy #CC.hScopes+SCOPE.MAX
|
2022-01-30 22:47:08 +01:00
|
|
|
|
bcs .9
|
|
|
|
|
|
2022-09-17 13:35:52 +02:00
|
|
|
|
lda #SL._
|
2022-01-30 22:47:08 +01:00
|
|
|
|
>SYSCALL SListNew
|
|
|
|
|
bcs .99
|
|
|
|
|
|
2022-06-22 08:26:44 +02:00
|
|
|
|
inc ScopeIdx
|
|
|
|
|
ldy ScopeIdx
|
2022-01-30 22:47:08 +01:00
|
|
|
|
sta (pData),y
|
|
|
|
|
|
2022-06-22 08:26:44 +02:00
|
|
|
|
dec bLocalScope
|
2022-01-30 22:47:08 +01:00
|
|
|
|
clc
|
|
|
|
|
rts
|
|
|
|
|
|
|
|
|
|
.9 lda #E.OOH
|
|
|
|
|
sec
|
|
|
|
|
.99 rts
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.FreeScope ldy ScopeIdx
|
2022-06-22 08:26:44 +02:00
|
|
|
|
cpy #CC.hScopes
|
2022-01-30 22:47:08 +01:00
|
|
|
|
beq *
|
|
|
|
|
|
|
|
|
|
lda (pData),y
|
|
|
|
|
>SYSCALL SListFree
|
|
|
|
|
|
2022-06-22 08:26:44 +02:00
|
|
|
|
dec ScopeIdx
|
|
|
|
|
inc bLocalScope
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-06-22 08:26:44 +02:00
|
|
|
|
rts
|
2022-01-30 22:47:08 +01:00
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.Lookup >LDA.G CC.LookupIdx
|
2022-06-22 08:26:44 +02:00
|
|
|
|
cmp #CC.LookupIdx+LOOKUP.MAX
|
|
|
|
|
beq .99
|
|
|
|
|
|
|
|
|
|
>PUSHB ScopeIdx
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
|
|
|
|
.1 tay
|
|
|
|
|
lda (pData),y
|
|
|
|
|
jsr CC.SListLookup
|
|
|
|
|
bcc .8
|
|
|
|
|
|
|
|
|
|
lda (pstack)
|
2022-06-22 08:26:44 +02:00
|
|
|
|
cmp #CC.hScopes
|
2022-06-12 22:42:22 +02:00
|
|
|
|
beq .9
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
|
|
|
|
dec
|
|
|
|
|
sta (pstack)
|
|
|
|
|
bra .1
|
|
|
|
|
|
2022-06-12 22:42:22 +02:00
|
|
|
|
.9 inc pStack
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
|
|
|
|
lda #E.NOKEY
|
2022-06-12 22:42:22 +02:00
|
|
|
|
sec
|
2022-01-30 22:47:08 +01:00
|
|
|
|
rts
|
|
|
|
|
|
2022-06-12 22:42:22 +02:00
|
|
|
|
.8 inc pStack
|
2022-06-22 08:26:44 +02:00
|
|
|
|
|
|
|
|
|
>STYA.G CC.LookupSymSize
|
|
|
|
|
|
|
|
|
|
>INC.G CC.LookupIdx
|
|
|
|
|
tay
|
|
|
|
|
|
|
|
|
|
txa
|
|
|
|
|
sta (pdata),y
|
|
|
|
|
|
|
|
|
|
>SYSCALL GetMemPtr
|
2022-06-12 22:42:22 +02:00
|
|
|
|
>STYA ZPLookupSymPtr
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-06-22 08:26:44 +02:00
|
|
|
|
* clc
|
|
|
|
|
rts
|
|
|
|
|
|
|
|
|
|
.99 lda #E.OOH
|
|
|
|
|
* sec
|
|
|
|
|
rts
|
2022-01-30 22:47:08 +01:00
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.LookupA bit bPass2
|
2022-08-20 16:37:37 +02:00
|
|
|
|
bmi .1
|
|
|
|
|
|
|
|
|
|
ldx #0
|
|
|
|
|
ldy #0
|
|
|
|
|
clc
|
|
|
|
|
rts
|
|
|
|
|
|
|
|
|
|
.1 >STA.G CC.CPSPFX A = "B"reak, "C"ontinue...
|
|
|
|
|
|
|
|
|
|
>PUSHB.G CC.hScopes Global Scope
|
|
|
|
|
>PUSHEA.G CC.CPSPFX
|
|
|
|
|
>SYSCALL SListLookup
|
|
|
|
|
bcs .99
|
|
|
|
|
|
|
|
|
|
>STYA.G CC.SymID Y,A = KeyID
|
|
|
|
|
|
|
|
|
|
>PUSHB.G CC.hScopes
|
|
|
|
|
>PUSHW.G CC.SymID
|
|
|
|
|
>PUSHW ZPSymBufPtr
|
|
|
|
|
>PUSHWI 65535 all
|
|
|
|
|
>PUSHWZ From Start
|
|
|
|
|
>SYSCALL SListGetData
|
|
|
|
|
bcs .99
|
|
|
|
|
|
|
|
|
|
ldy #SYM.Addr
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
|
|
|
|
|
tax
|
|
|
|
|
|
|
|
|
|
iny
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
tay
|
|
|
|
|
|
|
|
|
|
* clc
|
|
|
|
|
|
|
|
|
|
.99 rts
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.LookupFree >LDA.G CC.LookupIdx
|
2022-06-22 08:26:44 +02:00
|
|
|
|
cmp #CC.LookupIdx
|
|
|
|
|
beq .9
|
|
|
|
|
|
|
|
|
|
tay
|
|
|
|
|
lda (pdata),y
|
2022-01-30 22:47:08 +01:00
|
|
|
|
>SYSCALL FreeMem
|
2022-06-12 22:42:22 +02:00
|
|
|
|
bcs .99
|
2022-06-22 08:26:44 +02:00
|
|
|
|
|
|
|
|
|
>DEC.G CC.LookupIdx
|
|
|
|
|
cmp #CC.LookupIdx
|
|
|
|
|
beq .8
|
|
|
|
|
|
|
|
|
|
tay
|
|
|
|
|
lda (pdata),y
|
|
|
|
|
>SYSCALL GetMemPtr
|
|
|
|
|
>STYA ZPLookupSymPtr
|
|
|
|
|
|
|
|
|
|
.8 clc
|
|
|
|
|
rts
|
|
|
|
|
|
|
|
|
|
.9 lda E.INVH
|
|
|
|
|
* sec
|
|
|
|
|
|
|
|
|
|
.99 rts
|
|
|
|
|
*--------------------------------------
|
2022-09-04 22:12:49 +02:00
|
|
|
|
* ZPPtr2 = expected T/Q
|
|
|
|
|
* ZPLookupSymPtr
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.LookupCheckTQ
|
2022-09-04 22:12:49 +02:00
|
|
|
|
lda ZPPtr2 target T
|
|
|
|
|
bne .1
|
2022-06-22 08:26:44 +02:00
|
|
|
|
|
2022-09-04 22:12:49 +02:00
|
|
|
|
lda (ZPLookupSymPtr) SYM.T
|
|
|
|
|
sta ZPPtr2 T
|
|
|
|
|
|
|
|
|
|
ldy #SYM.Q
|
|
|
|
|
lda (ZPLookupSymPtr),y
|
|
|
|
|
and #$F8 ignore VOLATILE|FUNC|FASTCALL
|
|
|
|
|
sta ZPPtr2+1 Q
|
2022-06-22 08:26:44 +02:00
|
|
|
|
|
|
|
|
|
clc
|
2022-01-30 22:47:08 +01:00
|
|
|
|
rts
|
|
|
|
|
|
2022-09-04 22:12:49 +02:00
|
|
|
|
.1 cmp #SYM.T.VOID
|
|
|
|
|
beq .2
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-09-04 22:12:49 +02:00
|
|
|
|
lda (ZPLookupSymPtr) SYM.T
|
|
|
|
|
cmp #SYM.T.VOID
|
|
|
|
|
beq .2
|
|
|
|
|
|
|
|
|
|
cmp ZPPtr2 T
|
2022-01-30 22:47:08 +01:00
|
|
|
|
bne .9
|
|
|
|
|
|
2022-09-04 22:12:49 +02:00
|
|
|
|
.2 lda ZPPtr2+1 Q
|
2022-08-20 16:37:37 +02:00
|
|
|
|
|
2022-01-30 22:47:08 +01:00
|
|
|
|
ldy #SYM.Q
|
2022-09-04 22:12:49 +02:00
|
|
|
|
eor (ZPLookupSymPtr),y
|
|
|
|
|
and #$F8 ignore VOLATILE|FUNC|FASTCALL
|
2022-10-07 21:21:37 +02:00
|
|
|
|
beq .8
|
|
|
|
|
|
|
|
|
|
and #SYM.Q.AAARRAY is mismatch about array ?
|
|
|
|
|
beq .9 no...
|
|
|
|
|
|
|
|
|
|
lda ZPPtr2+1 Q
|
|
|
|
|
and #SYM.Q.AAARRAY
|
2022-01-30 22:47:08 +01:00
|
|
|
|
bne .9
|
2022-09-11 21:11:32 +02:00
|
|
|
|
|
2022-10-07 21:21:37 +02:00
|
|
|
|
.8 clc
|
2022-01-30 22:47:08 +01:00
|
|
|
|
rts
|
|
|
|
|
|
2022-09-04 22:12:49 +02:00
|
|
|
|
.9 lda #E.TMISMATCH
|
2022-01-30 22:47:08 +01:00
|
|
|
|
sec
|
2022-09-04 22:12:49 +02:00
|
|
|
|
.99 rts
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
* on RT stack : Addr,value
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.PopValue jsr SYM.GetYASizeOfInAXC
|
2022-09-04 22:12:49 +02:00
|
|
|
|
tax
|
|
|
|
|
dex
|
|
|
|
|
bne .1
|
2022-09-11 21:11:32 +02:00
|
|
|
|
|
2022-09-04 22:12:49 +02:00
|
|
|
|
>LDYA L.PCC.PopValue1
|
|
|
|
|
jmp CODE.EmitPCC
|
2022-09-11 21:11:32 +02:00
|
|
|
|
|
2022-09-04 22:12:49 +02:00
|
|
|
|
.1 cpx #1
|
|
|
|
|
bne .2
|
2022-09-11 21:11:32 +02:00
|
|
|
|
|
2022-09-04 22:12:49 +02:00
|
|
|
|
>LDYA L.PCC.PopValue2
|
|
|
|
|
jmp CODE.EmitPCC
|
2022-09-11 21:11:32 +02:00
|
|
|
|
|
2022-09-04 22:12:49 +02:00
|
|
|
|
.2 jsr CODE.LDXI
|
|
|
|
|
bcs .9
|
|
|
|
|
|
|
|
|
|
>LDYA L.PCC.PopValueX
|
|
|
|
|
jmp CODE.EmitPCC
|
|
|
|
|
|
|
|
|
|
.9 rts
|
2022-01-30 22:47:08 +01:00
|
|
|
|
*--------------------------------------
|
|
|
|
|
* out : Y,A = T/Q
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.GetTypeInYA ldy #SYM.Q
|
2022-01-30 22:47:08 +01:00
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
pha
|
|
|
|
|
lda (ZPSymBufPtr)
|
|
|
|
|
tay
|
|
|
|
|
pla
|
|
|
|
|
rts
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
* out : A,X,C = size
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.GetSymSizeOfInAXC
|
2022-01-30 22:47:08 +01:00
|
|
|
|
ldy #SYM.Q
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
pha
|
|
|
|
|
lda (ZPSymBufPtr) SYM.T
|
|
|
|
|
tay
|
|
|
|
|
pla
|
|
|
|
|
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.GetYASizeOfInAXC
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
|
|
|
|
bit #SYM.Q.PPPOINTER
|
2022-08-20 16:37:37 +02:00
|
|
|
|
beq .1
|
|
|
|
|
|
|
|
|
|
lda #2 pointer
|
|
|
|
|
ldx #0
|
|
|
|
|
|
|
|
|
|
sec +1 for hMem Storage
|
|
|
|
|
rts
|
|
|
|
|
|
|
|
|
|
.1 bit #SYM.Q.AAARRAY
|
|
|
|
|
bne .2
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
|
|
|
|
lda CC.TYPESIZE-1,y
|
|
|
|
|
ldx #0
|
|
|
|
|
|
|
|
|
|
clc
|
|
|
|
|
rts
|
|
|
|
|
|
2022-08-20 16:37:37 +02:00
|
|
|
|
.2 ldx CC.TYPESIZE-1,y
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
2022-08-20 16:37:37 +02:00
|
|
|
|
ldy #SYM.Def
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
>PUSHA
|
|
|
|
|
iny
|
|
|
|
|
lda (ZPSymBufPtr),y
|
|
|
|
|
>PUSHA
|
|
|
|
|
|
|
|
|
|
ldy #1
|
|
|
|
|
|
|
|
|
|
.3 dex
|
|
|
|
|
beq .5
|
|
|
|
|
|
|
|
|
|
.4 lda (pStack),y
|
|
|
|
|
clc
|
|
|
|
|
adc (pStack),y
|
|
|
|
|
sta (pStack),y
|
|
|
|
|
|
|
|
|
|
lda (pStack)
|
|
|
|
|
adc (pStack)
|
|
|
|
|
sta (pStack)
|
|
|
|
|
dex
|
|
|
|
|
bne .4
|
|
|
|
|
|
|
|
|
|
.5 >PULLA
|
|
|
|
|
tax
|
|
|
|
|
>PULLA
|
|
|
|
|
|
|
|
|
|
clc
|
2022-01-30 22:47:08 +01:00
|
|
|
|
rts
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
* in/out : A,X,C = size
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.SetSizeOf ldy #SYM.SizeOf
|
2022-01-30 22:47:08 +01:00
|
|
|
|
sta (ZPSymBufPtr),y
|
|
|
|
|
|
|
|
|
|
pha
|
|
|
|
|
|
|
|
|
|
iny
|
|
|
|
|
txa
|
|
|
|
|
sta (ZPSymBufPtr),y
|
|
|
|
|
|
|
|
|
|
pla
|
|
|
|
|
rts
|
|
|
|
|
*--------------------------------------
|
2022-10-07 21:21:37 +02:00
|
|
|
|
SYM.SetAddrYA phy
|
2022-01-30 22:47:08 +01:00
|
|
|
|
|
|
|
|
|
ldy #SYM.Addr+1
|
|
|
|
|
sta (ZPSymBufPtr),y
|
|
|
|
|
|
|
|
|
|
pla
|
|
|
|
|
|
|
|
|
|
dey
|
|
|
|
|
sta (ZPSymBufPtr),y
|
|
|
|
|
|
|
|
|
|
rts
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
MAN
|
|
|
|
|
SAVE usr/src/bin/cc.s.sym
|
|
|
|
|
LOAD usr/src/bin/cc.s
|
|
|
|
|
ASM
|