aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorTom Smeding <tom@tomsmeding.com>2024-10-10 22:35:52 +0200
committerTom Smeding <tom@tomsmeding.com>2024-10-10 22:35:52 +0200
commitf1b28a3090d47c75dd63e05469059b8f871cc10c (patch)
tree3d9358ac61fced55714acaeeed19b4bfb8087034 /src
parent62d0b4a515e807e15e8438fbe2f9ee87ccf5d911 (diff)
Fix error message in listxFromList
Diffstat (limited to 'src')
-rw-r--r--src/Data/Array/Mixed/Shape.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Data/Array/Mixed/Shape.hs b/src/Data/Array/Mixed/Shape.hs
index a8f58ef..1d3e60a 100644
--- a/src/Data/Array/Mixed/Shape.hs
+++ b/src/Data/Array/Mixed/Shape.hs
@@ -106,7 +106,7 @@ listxFromList topssh topl = go topssh topl
go :: StaticShX sh' -> [i] -> ListX sh' (Const i)
go ZKX [] = ZX
go (_ :!% sh) (i : is) = Const i ::% go sh is
- go _ _ = error $ "IsList(ListX): Mismatched list length (type says "
+ go _ _ = error $ "listxFromList: Mismatched list length (type says "
++ show (ssxLength topssh) ++ ", list has length "
++ show (length topl) ++ ")"