Merge /home/mulk/Dropbox/Projekte/Toilet Lisp

1 files changed, 2 insertions, 2 deletions

diff --git a/MLKRoot.m b/MLKRoot.m
index a84a709..4faf364 100644
--- a/MLKRoot.m
+++ b/MLKRoot.m
@@ -345,7 +345,7 @@ macroexpand_1 (id *_data, id form, id arg, ...)
 }
 
 static id
-shadow (id *_data, id symbols, id arg, ...)
+shadow_ (id *_data, id symbols, id arg, ...)
 {
   va_list ap;
 
@@ -835,7 +835,7 @@ register_sys (NSString *name, id (*function)())
   register_sys (@"IDIVIDE-FIXNUMS", idivide_fixnums);
   register_sys (@"LIST", (id (*)())list);
   register_sys (@"MACROEXPAND-1", (id (*)())macroexpand_1);
-  register_sys (@"SHADOW", (id (*)())shadow);
+  register_sys (@"SHADOW", (id (*)())shadow_);
   register_sys (@"EXPORT", (id (*)())export);
   register_sys (@"UNEXPORT", (id (*)())unexport);
   register_sys (@"FIND-PACKAGE", find_package);