Apple-2-SW/qasm
1
0
Fork 0
mirror of https://github.com/marketideas/qasm.git synced 2024-06-11 06:29:29 +00:00
Code Issues Projects Releases Wiki Activity

Merge pull request #38 from ksherlock/undo-illegal-address

Browse Source 
(qasm iigs) - add back error checking disabled for relative value bug
This commit is contained in:
Lane Roathe 2020-01-13 19:18:10 -08:00 committed by GitHub
commit 9f510117c0
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
3 changed files with 2 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/asm/asm.header.s
View File

@ -416,9 +416,7 @@ indexj da 5*2 ; these indexes is crucial
array da 1,1,2,3,5,8,13,21,54,75,129,204 array da 1,1,2,3,5,8,13,21,54,75,129,204
da 323,527,850,1377,2227 da 323,527,850,1377,2227
do 0
err *-array-34 err *-array-34
fin
*================================================= *=================================================
* SEED seeds generator from 16 bit contents of AXY * SEED seeds generator from 16 bit contents of AXY

3
src/link/link.express.s
View File

@ -1140,10 +1140,7 @@ indexj da 5*2 ; these indexes is crucial
array da 1,1,2,3,5,8,13,21,54,75,129,204 array da 1,1,2,3,5,8,13,21,54,75,129,204
da 323,527,850,1377,2227 da 323,527,850,1377,2227
do 0
* Illegal relative address in line:
err *-array-34 err *-array-34
fin
seed php seed php
rep %00110000 rep %00110000

4
src/link/linker.1.s
View File

@ -1415,7 +1415,7 @@ impop sec
sta :handle+2 sta :handle+2
psl #$00 psl #$00
psl :handle psl :handle
_GetHandlSize _GetHandleSize
pll :aux pll :aux
lda :aux+2 lda :aux+2
jne :toolarge jne :toolarge
@ -1815,7 +1815,7 @@ lnkop sec
_HUnlock _HUnlock
psl #$00 psl #$00
psl :handle psl :handle
_GetHandlSsize _GetHandleSize
pll :size pll :size
lda :more lda :more
clc clc