mirror of
https://github.com/marketideas/qasm.git
synced 2024-12-28 06:29:58 +00:00
Merge pull request #38 from ksherlock/undo-illegal-address
(qasm iigs) - add back error checking disabled for relative value bug
This commit is contained in:
commit
9f510117c0
@ -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
|
||||
da 323,527,850,1377,2227
|
||||
|
||||
do 0
|
||||
err *-array-34
|
||||
fin
|
||||
|
||||
*=================================================
|
||||
* SEED seeds generator from 16 bit contents of AXY
|
||||
|
@ -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
|
||||
da 323,527,850,1377,2227
|
||||
|
||||
do 0
|
||||
* Illegal relative address in line:
|
||||
err *-array-34
|
||||
fin
|
||||
|
||||
seed php
|
||||
rep %00110000
|
||||
|
@ -1415,7 +1415,7 @@ impop sec
|
||||
sta :handle+2
|
||||
psl #$00
|
||||
psl :handle
|
||||
_GetHandlSize
|
||||
_GetHandleSize
|
||||
pll :aux
|
||||
lda :aux+2
|
||||
jne :toolarge
|
||||
@ -1815,7 +1815,7 @@ lnkop sec
|
||||
_HUnlock
|
||||
psl #$00
|
||||
psl :handle
|
||||
_GetHandlSsize
|
||||
_GetHandleSize
|
||||
pll :size
|
||||
lda :more
|
||||
clc
|
||||
|
Loading…
Reference in New Issue
Block a user