I've found a fix for something that has annoyed me for a long time - but I
can't determine what it might break.
1. In Workspace I evaluate the following
Halt enableHaltOnce.
a := 1.
self halt.
b := 2.
self haltOnce.
c := 3.
Transcript show: a + b + c.
2. In the debugger after it stops at the #halt, it takes a SINGLE <Step
Over> to move to d:=2 - no problem.
3. Now <Restart> and then <Step Over> down to c:=3 and observe:
* the #halt now takes EIGHT (used to be SIXTEEN) steps to traverse (ouch!)
* the #haltOnce takes THREE steps to traverse (good)
Tracing through for both #halt and #haltOnce it seems that the specific
conditional reference to #halt in Halt>>signalerContext is the difference!
Removing that condition results in the #halt behaving like #haltOnce,
taking only THREE <Step Over>s to traverse a restarted #halt.
Halt>>signalerContext
^ signalContext findContextSuchThat: [ :context |
(context receiver == self
or: [ (context receiver == self class)
or: [ context method selector = #halt ]]) not ]
Now #haltOnce seems to have been operating without a problem for a long
timer, so presumably its okay to make #halt behave the same way. But this
is deep stuff I don't fully understand. Anyone see a problem with removing
that last condition?
cheers -ben
