From 697e27d004afaaa55792741cbab55b75f24156b9 Mon Sep 17 00:00:00 2001
From: Matthias Andreas Benkard <matthias@benkard.de>
Date: Wed, 2 Jul 2008 18:04:14 +0200
Subject: Interpreter: Implement UNWIND-PROTECT.

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

(limited to 'MLKPackage.m')

diff --git a/MLKPackage.m b/MLKPackage.m
index 0a9b0be..1fa668d 100644
--- a/MLKPackage.m
+++ b/MLKPackage.m
@@ -76,6 +76,7 @@ static NSMutableDictionary *packages = nil;
   [cl export:[cl intern:@"EVAL"]];
   [cl export:[cl intern:@"SPECIAL"]];
   [cl export:[cl intern:@"SET"]];
+  [cl export:[cl intern:@"UNWIND-PROTECT"]];
 
   [sys export:[sys intern:@"%DEFMACRO"]];
   [sys export:[sys intern:@"%LAMBDA"]];
-- 
cgit v1.2.3