diff options
Diffstat (limited to 'Intermediate.hs')
| -rw-r--r-- | Intermediate.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Intermediate.hs b/Intermediate.hs index dde941d..d6ad1cd 100644 --- a/Intermediate.hs +++ b/Intermediate.hs @@ -92,7 +92,7 @@ instance Pretty IRProgram where instance Pretty IRFunc where prettyI i (IRFunc mt n al bbs sid) = "irfunc" ++ maybe "" ((' ' :) . prettyI i) mt ++ " " ++ n ++ "(" ++ - intercalate "," + intercalate ", " (map (\(at,an) -> prettyI i at ++ " " ++ an) al) ++ ")\n" ++ indent i ++ intercalate ("\n" ++ indent i) (map (prettyI i) sorted) |