aboutsummaryrefslogtreecommitdiff
path: root/src/interp/postpar.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/postpar.boot')
-rw-r--r--src/interp/postpar.boot1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/interp/postpar.boot b/src/interp/postpar.boot
index afb39ff7..15b43600 100644
--- a/src/interp/postpar.boot
+++ b/src/interp/postpar.boot
@@ -505,6 +505,7 @@ postSignature t ==
sig1:= postType sig
op:= postAtom (STRINGP op => INTERN op; op)
["SIGNATURE",op,:removeSuperfluousMapping killColons sig1]
+ ["SIGNATURE",postAtom op,:postType ["->","constant",sig]]
killColons: %ParseTree -> %ParseForm
killColons x ==