aboutsummaryrefslogtreecommitdiff
path: root/src/interp/i-eval.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/i-eval.boot')
-rw-r--r--src/interp/i-eval.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/i-eval.boot b/src/interp/i-eval.boot
index 0def18d3..5572f087 100644
--- a/src/interp/i-eval.boot
+++ b/src/interp/i-eval.boot
@@ -200,9 +200,9 @@ makeOrdinal i ==
evaluateSignature sig ==
-- calls evaluateType on a signature
- sig is ['SIGNATURE,fun,sigl] =>
+ sig is ['SIGNATURE,fun,sigl,:q] =>
['SIGNATURE,fun,
- [(t = '_$ => t; evaluateType(t)) for t in sigl]]
+ [(t = '_$ => t; evaluateType(t)) for t in sigl],:q]
sig
--% Code Evaluation