Skip to content

GitLab

Open
Created by Martin Avison@mavisonDeveloper
Report abuse

Stop PDriver_EnumerateDrivers causing ZeroPain log.

The code for SWI PDriver_EnumerateDrivers generates a ZeroPain error when it is processing the last entry. Example code to reproduce is:

  r0% = 0
  REPEAT
    SYS "PDriver_EnumerateDrivers",r0% TO r0%,r1% ;rc%
    PRINT STR$ ~r0%,  STR$ ~r1%,   rc%
  UNTIL r0%=0

This is because after loading the address of the next entry (zero) it then tries to load the printer number from that address!

The fix is to move the load of the next entry before the check for zero.

Edited by Martin Avison