Merge pull request #144 from davidgiven/dtrg-arraysizes

i80: use a helper function for cai.
This commit is contained in:
David Given 2019-02-06 21:31:29 +01:00 committed by GitHub
commit a6b8ae66d7
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
2 changed files with 11 additions and 5 deletions

10
mach/i80/libem/pchl.s Normal file
View file

@ -0,0 +1,10 @@
.sect .text
.sect .rom
.sect .data
.sect .bss
.sect .text
.define .pchl
.pchl:
pchl

View file

@ -1819,11 +1819,7 @@ gen Call {label,$1}
pat cai pat cai
with hlreg with hlreg
kills ALL kills ALL
uses dereg gen Call {label, ".pchl"}
gen lxi de,{label,1f}
push de
pchl.
1:
pat lfr $1==2 yields de pat lfr $1==2 yields de