bug fix: did not work when procedure descriptors started on block boundary

This commit is contained in:
ceriel 1988-03-10 13:03:53 +00:00
parent 304f03a836
commit 1d98b5fd02

View file

@ -283,7 +283,7 @@ lblbuf:
datloop:
cmp r4,saver1 / descriptor over middle?
ble 9f / no? go ahead
blt 9f / no? go ahead
jsr pc,blshift / yes? shift block down, read next
9: dec ndatad / still data to initialize?