1
0
mirror of https://github.com/hsoft/collapseos.git synced 2024-09-29 10:40:56 +10:00

find: don't protect BC

not needed
This commit is contained in:
Virgil Dupras 2020-06-03 20:57:29 -04:00
parent c26c454cbf
commit f53f91558b
3 changed files with 0 additions and 2 deletions

View File

@ -2,7 +2,6 @@ PC ORG @ 4 + ! ( find )
( Find the entry corresponding to word name where (HL) points
to in dictionary having its tip at DE and sets DE to point
to that entry. Z if found, NZ if not. )
BC PUSHqq,
HL PUSHqq,
( First, figure out string len )
A (HL) LDrr, A ORr,

View File

@ -3,5 +3,4 @@
A INCr,
L2 FSET ( end )
HL POPqq,
BC POPqq,
RET,

Binary file not shown.