* Added code to check that substitution gets rid of all appropriate
variables (and fails if not) * Added weird dotted as subtype of * case (dcon-exact) original commit: 6296ffbfcf85a624227f11f486fb195954e4479b
This commit is contained in:
parent
ee044ee4c4
commit
53200d23db
|
@ -97,7 +97,7 @@
|
|||
target))
|
||||
|
||||
;; substitute many variables
|
||||
;; substitution = Listof[List[Name,Type]]
|
||||
;; substitution = Listof[U List[Name,Type] List[Name,Listof[Type]]]
|
||||
;; subst-all : substition Type -> Type
|
||||
(define (subst-all s t)
|
||||
(for/fold ([t t]) ([e s])
|
||||
|
|
Loading…
Reference in New Issue
Block a user