🕸️ Try-Catch

2024-09-06 14:14:44 +02:00
parent b4f8b71ade
commit e96686ab9a
3 changed files with 12 additions and 3 deletions
--- a/a1/src/APL/AST.hs
+++ b/a1/src/APL/AST.hs
@ -21,6 +21,7 @@ data Exp
  | Let VName Exp Exp
  | Lambda VName Exp
  | Apply Exp Exp
+  | TryCatch Exp Exp
  deriving (Eq, Show)

 printExp :: Exp -> String