diff options
Diffstat (limited to 'src/interp/trace.boot')
-rw-r--r-- | src/interp/trace.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/trace.boot b/src/interp/trace.boot index 67ffca86..3ccfa57a 100644 --- a/src/interp/trace.boot +++ b/src/interp/trace.boot @@ -127,7 +127,7 @@ trace1 l == newOptions:= delete(a,$options) null l => trace1 oldL for x in l repeat - x is [domain,:opList] and VECP domain => + x is [domain,:opList] and vector? domain => sayKeyedMsg("S2IT0003",[devaluate domain]) $options:= [:newOptions,:LASSOC(x,$optionAlist)] trace1 LIST x |