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.

13 lines
416B

  1. lblchkPS BSET ( chkPS )
  2. ( Note that you only need to call this in words that push
  3. back to PSP. If they don't, calling chkPS is redundant with
  4. check in next )
  5. EXX,
  6. ( We have the return address for this very call on the stack
  7. and protected registers. 2- is to compensate that. )
  8. HL PS_ADDR 2- LDdn,
  9. SP SUBHLd,
  10. EXX,
  11. CNC RETc, ( PS_ADDR >= SP? good )
  12. JR, lblofl BWR ( abortUnderflow-B298 )