remove unused definition (some old refactoring lost track of this,
I presume)
This commit is contained in:
parent
231e9b3f81
commit
2ffa03c626
|
@ -155,8 +155,6 @@
|
|||
|
||||
(define (recursive-contract-stronger this that) (equal? this that))
|
||||
|
||||
(define trail (make-parameter #f))
|
||||
|
||||
(define ((recursive-contract-first-order ctc) val)
|
||||
(contract-first-order-passes? (force-recursive-contract ctc)
|
||||
val))
|
||||
|
|
Loading…
Reference in New Issue
Block a user