1 files changed, 1 insertions, 1 deletions
diff --git a/Language.hs b/Language.hs
index d4cd1b6..15780f6 100644
--- a/Language.hs
+++ b/Language.hs
@@ -152,7 +152,7 @@ hsType aliasMap = \case
  V4 (V3 Float) -> "M34F"
  V4 (V4 Float) -> "M44F"
-  Array t       -> "[" ++ hsType aliasMap t ++ "]"
+  Array t       -> "Vector " ++ parens (hsType aliasMap t)
  List t        -> "[" ++ hsType aliasMap t ++ "]"
  Maybe t       -> "Maybe " ++ parens (hsType aliasMap t)
  Map k v       -> "Map " ++ parens (hsType aliasMap k) ++ " " ++ parens (hsType aliasMap v)

diff --git a/Language.hs b/Language.hs index d4cd1b6..15780f6 100644 --- a/Language.hs +++ b/Language.hs
@@ -152,7 +152,7 @@ hsType aliasMap = \case
152	V4 (V3 Float) -> "M34F"	152	V4 (V3 Float) -> "M34F"
153	V4 (V4 Float) -> "M44F"	153	V4 (V4 Float) -> "M44F"
154		154
155	Array t -> "[" ++ hsType aliasMap t ++ "]"	155	Array t -> "Vector " ++ parens (hsType aliasMap t)
156	List t -> "[" ++ hsType aliasMap t ++ "]"	156	List t -> "[" ++ hsType aliasMap t ++ "]"
157	Maybe t -> "Maybe " ++ parens (hsType aliasMap t)	157	Maybe t -> "Maybe " ++ parens (hsType aliasMap t)
158	Map k v -> "Map " ++ parens (hsType aliasMap k) ++ " " ++ parens (hsType aliasMap v)	158	Map k v -> "Map " ++ parens (hsType aliasMap k) ++ " " ++ parens (hsType aliasMap v)