From ff512028f3c233ddb917e1ff1c493cc664e48cee Mon Sep 17 00:00:00 2001
From: Nikolaj Gade <nikolaj@ingemanngade.net>
Date: Fri, 11 Oct 2024 16:22:47 +0200
Subject: [PATCH] :sparkles:

---
 a5/src/APL/AST.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/a5/src/APL/AST.hs b/a5/src/APL/AST.hs
index dcaa542..302cba5 100644
--- a/a5/src/APL/AST.hs
+++ b/a5/src/APL/AST.hs
@@ -60,7 +60,7 @@ printExp (Let v e1 e2) =
 printExp (Lambda v body) =
   parens $ "\\" ++ v ++ " -> " ++ printExp body
 printExp (Apply x y) =
-  printExp x ++ " (" ++ printExp y ++ ")"
+  parens $ printExp x ++ " " ++ printExp y
 printExp (TryCatch x y) =
   parens $ "try " ++ printExp x ++ " catch " ++ printExp y