From 3e9ae8c764257f14132b490531e63e4ba64dbe55 Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <matthias@benkard.de>
Date: Mon, 7 Jul 2008 19:25:37 +0200
Subject: Interpreter: Implement CATCH and THROW.

---
 MLKPackage.m | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'MLKPackage.m')

diff --git a/MLKPackage.m b/MLKPackage.m
index 0f9c8ef..b4de534 100644
--- a/MLKPackage.m
+++ b/MLKPackage.m
@@ -64,6 +64,8 @@ static NSMutableDictionary *packages = nil;
   [cl import:nil];
   [cl export:nil];
   [cl export:[cl intern:@"T"]];
+  [cl export:[cl intern:@"CATCH"]];
+  [cl export:[cl intern:@"THROW"]];
   [cl export:[cl intern:@"IF"]];
   [cl export:[cl intern:@"IN-PACKAGE"]];
   [cl export:[cl intern:@"LET"]];
-- 
cgit v1.2.3