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 e6ee0e90..d6770d54 100644
--- a/src/interp/trace.boot
+++ b/src/interp/trace.boot
@@ -75,7 +75,7 @@ $lastUntraced := NIL
trace l == traceSpad2Cmd l
traceSpad2Cmd l ==
- if l is ['Tuple, l1] then l := l1
+ if l is ["Tuple", l1] then l := l1
$mapSubNameAlist:= getMapSubNames(l)
trace1 augmentTraceNames(l,$mapSubNameAlist)
traceReply()