File tree Expand file tree Collapse file tree 1 file changed +1
-2
lines changed
Expand file tree Collapse file tree 1 file changed +1
-2
lines changed Original file line number Diff line number Diff line change @@ -170,7 +170,7 @@ runCheckPatterns patterns =
170170-- checkPatterns returns an [Error],
171171-- which can have [Pattern] in it.
172172-- This is cumbersome to test in the unit tests.
173- -- We convert each [ Error] (and thus, [Pattern]) to a String,
173+ -- We convert each Error (and thus, [Pattern]) to a [ String] ,
174174-- making it a lot easier to assert on in the unit tests.
175175--
176176-- E.g., this [Error]
@@ -217,7 +217,6 @@ patternToTestableString pat =
217217 Literal (Str s) -> Utf8. toChars s
218218 Literal (Int n) -> show n -- convert Int to String
219219
220- -- Array patterns -> "[ " ++ (intercalate ", " (map patternToTestableString patterns)) ++ " ]"
221220 Array patterns -> patternsToTestableString patterns
222221
223222 Ctor _ vName patterns ->
You can’t perform that action at this time.
0 commit comments