Fix printing of * in -> types
original commit: 38af459049819ecac24de6b349440e6c589703f9
This commit is contained in:
parent
2ff47d2e06
commit
b4b666f9f2
|
@ -214,7 +214,7 @@
|
|||
(if req?
|
||||
(format "~a ~a" k (type->sexp t))
|
||||
(format "[~a ~a]" k (type->sexp t)))]))
|
||||
(if rest `(,(type->sexp rest) '*) null)
|
||||
(if rest `(,(type->sexp rest) *) null)
|
||||
(if drest `(,(type->sexp (car drest)) ... ,(cdr drest)) null)
|
||||
(match rng
|
||||
[(AnyValues: (Top:)) '(AnyValues)]
|
||||
|
|
Loading…
Reference in New Issue
Block a user