1961
1962
1963
1964
1965
1966
1967
1968
1969
1970
1971
1972
1973
1974
|
Otherwise, the value remains and true is added above it on the stack.
Trace ( obj arg1 arg2 -- )
If tracing is enabled, sends the three values and some other information
on stdout. If tracing is disabled, does nothing. This is intended to be
used for debugging class codes.
Trigger ( obj message -- ) **
Call a message for a pending trigger for the specified object immediately
instead of waiting for its turn in the trigger phase. Only has an effect
if the object does not have the Compatible flag. The message must be
MOVED, DEPARTED, or ARRIVED; otherwise it is an error. If that trigger is
pending, it will clear the trigger and send it like it does during the
trigger phase, setting Arg1 as appropriate, but From is set to the object
|
>
>
>
>
>
>
>
>
|
1961
1962
1963
1964
1965
1966
1967
1968
1969
1970
1971
1972
1973
1974
1975
1976
1977
1978
1979
1980
1981
1982
|
Otherwise, the value remains and true is added above it on the stack.
Trace ( obj arg1 arg2 -- )
If tracing is enabled, sends the three values and some other information
on stdout. If tracing is disabled, does nothing. This is intended to be
used for debugging class codes.
TraceStack ( -- )
If tracing is enabled, list the entire operand stack on stdout (including
items below the current message frame, if any). Items are listed from top
to bottom, each preceded by the index number.
,TraceStack ( count -- )
This is like TraceStack but is limited to specified count.
Trigger ( obj message -- ) **
Call a message for a pending trigger for the specified object immediately
instead of waiting for its turn in the trigger phase. Only has an effect
if the object does not have the Compatible flag. The message must be
MOVED, DEPARTED, or ARRIVED; otherwise it is an error. If that trigger is
pending, it will clear the trigger and send it like it does during the
trigger phase, setting Arg1 as appropriate, but From is set to the object
|