Mirror of CollapseOS
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

17 lines
529B

  1. ( DE contains prev offset )
  2. HL POPqq, ( <-- lvl 2 )
  3. ( HL is prev field's addr. Is offset zero? )
  4. DEZ,
  5. IFNZ,
  6. ( get absolute addr from offset )
  7. ( carry cleared from "or e" )
  8. DE SBCHLss,
  9. EXDEHL, ( result in DE )
  10. THEN,
  11. HL POPqq, ( <-- lvl 1 )
  12. JRNZ, AGAIN, ( inner-B292, try to match again )
  13. ( Z set? end of dict, unset Z )
  14. ( cont. )