diff options
Diffstat (limited to 'compiler/codeGen')
| -rw-r--r-- | compiler/codeGen/ClosureInfo.lhs | 2 | ||||
| -rw-r--r-- | compiler/codeGen/StgCmmClosure.hs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/compiler/codeGen/ClosureInfo.lhs b/compiler/codeGen/ClosureInfo.lhs index 2cd0cf6434..fd27684732 100644 --- a/compiler/codeGen/ClosureInfo.lhs +++ b/compiler/codeGen/ClosureInfo.lhs @@ -1097,7 +1097,7 @@ getTyDescription ty FunTy _ res -> '-' : '>' : fun_result res TyConApp tycon _ -> getOccString tycon ForAllTy _ ty -> getTyDescription ty - LiteralTy n -> getTyLitDescription n + LitTy n -> getTyLitDescription n } where fun_result (FunTy _ res) = '>' : fun_result res diff --git a/compiler/codeGen/StgCmmClosure.hs b/compiler/codeGen/StgCmmClosure.hs index d40ff9e1e5..7789ae865b 100644 --- a/compiler/codeGen/StgCmmClosure.hs +++ b/compiler/codeGen/StgCmmClosure.hs @@ -864,7 +864,7 @@ getTyDescription ty FunTy _ res -> '-' : '>' : fun_result res TyConApp tycon _ -> getOccString tycon ForAllTy _ ty -> getTyDescription ty - LiteralTy n -> getTyLitDescription n + LitTy n -> getTyLitDescription n } where fun_result (FunTy _ res) = '>' : fun_result res |