aboutsummaryrefslogtreecommitdiff
path: root/src/interp/trace.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/trace.boot')
-rw-r--r--src/interp/trace.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/trace.boot b/src/interp/trace.boot
index 71ab533c..8d690a24 100644
--- a/src/interp/trace.boot
+++ b/src/interp/trace.boot
@@ -130,7 +130,7 @@ trace1 l ==
x is [domain,:opList] and vector? domain =>
sayKeyedMsg("S2IT0003",[devaluate domain])
$options:= [:newOptions,:LASSOC(x,$optionAlist)]
- trace1 LIST x
+ trace1 [x]
null l => nil
l is ["?"] => _?t()
traceList:= [transTraceItem x for x in l] or return nil