summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2022-07-07 23:42:47 -0400
committerBen Gamari <ben@smart-cactus.org>2022-08-06 11:45:17 -0400
commit57f530d38bf49b4dfc66b1495454d2d80a0c70c8 (patch)
tree938f1067b0eb120652e98afbf12b60bd370dc2c3
parentd2e4e123d69a18e52b569cdb61946b2e7f30ec1e (diff)
downloadhaskell-57f530d38bf49b4dfc66b1495454d2d80a0c70c8.tar.gz
genprimopcode: Drop ArrayArray# references
As ArrayArray# no longer exists
-rw-r--r--utils/genprimopcode/Main.hs2
1 files changed, 0 insertions, 2 deletions
diff --git a/utils/genprimopcode/Main.hs b/utils/genprimopcode/Main.hs
index 6984f4a296..7fff343188 100644
--- a/utils/genprimopcode/Main.hs
+++ b/utils/genprimopcode/Main.hs
@@ -786,13 +786,11 @@ ppType (TyApp (TyCon "MutVar#") [x,y]) = "mkMutVarPrimTy " ++ ppType x
++ " " ++ ppType y
ppType (TyApp (TyCon "MutableArray#") [x,y]) = "mkMutableArrayPrimTy " ++ ppType x
++ " " ++ ppType y
-ppType (TyApp (TyCon "MutableArrayArray#") [x]) = "mkMutableArrayArrayPrimTy " ++ ppType x
ppType (TyApp (TyCon "SmallMutableArray#") [x,y]) = "mkSmallMutableArrayPrimTy " ++ ppType x
++ " " ++ ppType y
ppType (TyApp (TyCon "MutableByteArray#") [x]) = "mkMutableByteArrayPrimTy "
++ ppType x
ppType (TyApp (TyCon "Array#") [x]) = "mkArrayPrimTy " ++ ppType x
-ppType (TyApp (TyCon "ArrayArray#") []) = "mkArrayArrayPrimTy"
ppType (TyApp (TyCon "SmallArray#") [x]) = "mkSmallArrayPrimTy " ++ ppType x