Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2024-07-07 04:28:56 +00:00
Code Issues Projects Releases Wiki Activity

KM.RAMWORKS:Fixed timing issues #3

Browse Source
This commit is contained in:
Rémy GIBERT 2016-06-23 22:18:29 +02:00
parent de637e712b
commit 1de9550760
11 changed files with 22 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
A2OSX.BOOT.po
View File

Binary file not shown.

BIN
A2OSX.SRC.po
View File

Binary file not shown.

3
BIN/ASM.S.txt
View File

@ -160,7 +160,8 @@ CS.INIT >LDYA L.LIBSTR
lda (pPs),y
beq .99
>SYSCALL SYS.PStrCpyA
>SYSCALL SYS.GetMemPtrA
>SYSCALL SYS.NewPStrYA
ldy #SRC.hFILENAME
sta (pData),y

3
BIN/EDIT.S.txt
View File

@ -117,7 +117,8 @@ CS.INIT stz hFile
ldy #S.PS.hARGS
lda (pPs),y
>SYSCALL SYS.PStrCpyA
>SYSCALL SYS.GetMemPtrA
>SYSCALL SYS.NewPStrYA
bra .2
.1 ldy #S.PS.hARGS

3
INC/A2osX.I.txt
View File

@ -159,9 +159,8 @@ SYS.GetStockObjectA .EQ $0C
SYS.FreeStockObject .EQ $0E
*--------------------------------------
SYS.NewPStrYA .EQ $10
SYS.PStrCpyA .EQ $12
SYS.PStrCat .EQ $14
SYS.PStrCat .EQ $14
SYS.PStrGetTkn .EQ $18

4
SBIN/SHELL.S.CMD.txt
View File

@ -136,8 +136,8 @@ EXEC.CMD.EXT ldy #1
lda hExecArgs
beq .11
>SYSCALL SYS.PStrCpyA
>SYSCALL SYS.GetMemPtrA
>SYSCALL SYS.NewPStrYA
bcs .9
.11 ldy #hInputArgs
sta (pData),y

3
SYS/KERNEL.S.BIN.txt
View File

@ -108,7 +108,8 @@ S.LoadBinA sta S.LoadBinA.hFilename save file path
bcs .98 relocation error, dicard Code segment
lda S.LoadBinA.hFilename get back bin path
jsr S.PStrCpyA
jsr S.GetMemPtrA
jsr S.NewPStrYA
bcs .98
pha

2
SYS/KERNEL.S.JMP.txt
View File

@ -17,7 +17,7 @@ KERNEL.SYSCALL .DA S.GetMem $00
.DA 0
*--------------------------------------
.DA S.NewPStrYA $10
.DA S.PStrCpyA
.DA 0
.DA S.PStrCat
.DA 0
.DA S.PStrGetTkn

7
SYS/KERNEL.S.STR.txt
View File

@ -5,19 +5,12 @@ INC 1
AUTO 6
.LIST OFF
*--------------------------------------
* S.PStrCpyA
* In:
* A = hMem of Src String
* Out:
* A = hMem of Dest String
*--------------------------------------
* S.NewPStrYA
* IN:
* PULLW = PTR to buffer
* OUT:
* A = hMem to S (PSTRING)
*--------------------------------------
S.PStrCpyA jsr S.GetMemPtrA
S.NewPStrYA >STYA ZPQuickPtr1
lda (ZPQuickPtr1)
inc

5
SYS/KERNEL.S.TSK.txt
View File

@ -309,7 +309,7 @@ S.Sleep pla get PC LO
* out :
* A = PSID
* we cannot use ZPQuickPtrs
* because of calling S.PStrCpyA & S.DupEnvA
* because of calling S.NewPStrYA & S.DupEnvA
*--------------------------------------
S.CreateChildProcess
>LDYAI TskMgr.Table+S.PS.SIZE
@ -368,7 +368,8 @@ S.CreateChildProcess
ldy #S.PS.hPREFIX copy hPREFIX...
lda (pPs),y
jsr S.PStrCpyA
jsr S.GetMemPtrA
jsr S.NewPStrYA
bcs .99
ldy #S.PS.hPREFIX

11
SYS/KM.RAMWORKS.S.txt
View File

@ -90,8 +90,7 @@ RW.Detect2 php
*--------------------------------------
* Added after David Finnigan from macgui.com testing sessions
*
pha
pla
sta RWBankSelect+3
*
* to address possibly a timing issue with Accelerators
*--------------------------------------
@ -107,6 +106,14 @@ RW.Detect2 php
.3 txa
sta RWBankSelect
*--------------------------------------
* Added after David Finnigan from macgui.com testing sessions
*
sta RWBankSelect+3
*
* to address possibly a timing issue with Accelerators
*--------------------------------------
cmp 0
bne .4
eor #$FF