1 files changed, 1 insertions, 1 deletions
diff --git a/AST.hs b/AST.hs
index b42f1af..43cca5f 100644
--- a/AST.hs
+++ b/AST.hs
@@ -131,7 +131,7 @@ instance Pretty DVar where
 instance Pretty DFunc where
     prettyI i (DFunc mt n al b) =
         "func" ++ maybe "" ((' ' :) . prettyI i) mt ++ " " ++ n ++ "(" ++
-            intercalate ","
+            intercalate ", "
                 (map (\(at,an) -> prettyI i at ++ " " ++ an) al) ++
             ") " ++ prettyI i b