find: don't protect BC

not needed
2020-06-03 20:57:29 -04:00 · 2020-06-03 20:57:29 -04:00 · f53f91558b
commit f53f91558b
parent c26c454cbf
3 changed files with 0 additions and 2 deletions
--- a/blk/291
+++ b/blk/291
@ -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,
--- a/blk/296
+++ b/blk/296
@ -3,5 +3,4 @@
    A INCr,
    L2 FSET ( end )
    HL POPqq,
-    BC POPqq,
    RET,
--- a/emul/forth.bin
+++ b/emul/forth.bin