diff options
| author | Jed Barber <jjbarber@y7mail.com> | 2012-05-15 09:29:51 +1000 |
|---|---|---|
| committer | Jed Barber <jjbarber@y7mail.com> | 2012-05-15 09:29:51 +1000 |
| commit | a9d7597a5344686550ecdc853a43915bdf641cd2 (patch) | |
| tree | 1f77ff632a6889cfcc910937b5c036657c28a090 | |
| parent | 19ca657d6b247c1acab1329ccf0c54d896178c87 (diff) | |
Fixed bug in mkEqualsType
| -rw-r--r-- | TypeVar.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -61,7 +61,7 @@ instance Show Var where mkEqualsType :: Type -> Type -mkEqualsType ty = typeFunc typeBool (typeFunc ty ty) +mkEqualsType ty = typeFunc ty (typeFunc ty typeBool) typeFunc :: Type -> Type -> Type |