Simplify fix for PR 14030
Please merge into 6.0
This commit is contained in:
parent
f292a9c0f2
commit
6a787c963f
|
@ -262,7 +262,7 @@ This file defines two sorts of primitives. All of them are provided into any mod
|
||||||
(if (Error? typ)
|
(if (Error? typ)
|
||||||
;; This code should never get run, typechecking will have an error earlier
|
;; This code should never get run, typechecking will have an error earlier
|
||||||
#`(error 'make-predicate "Couldn't parse type")
|
#`(error 'make-predicate "Couldn't parse type")
|
||||||
#`(let ()
|
#`(#%expression
|
||||||
(ann
|
(ann
|
||||||
#,(ignore-some-property
|
#,(ignore-some-property
|
||||||
(type->contract
|
(type->contract
|
||||||
|
|
Loading…
Reference in New Issue
Block a user