From 7730f8fafe5dea4ab3ba8c4659a4d295689e1818 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Fri, 10 Dec 2010 03:13:22 +0000
Subject: cleanup

---
 src/interp/vmlisp.lisp | 7 -------
 1 file changed, 7 deletions(-)

(limited to 'src/interp/vmlisp.lisp')

diff --git a/src/interp/vmlisp.lisp b/src/interp/vmlisp.lisp
index 139701c0..e388367e 100644
--- a/src/interp/vmlisp.lisp
+++ b/src/interp/vmlisp.lisp
@@ -1669,13 +1669,6 @@
     (setq ext:*gc-verbose* x))
   )
 
-(defun reclaim ()
-  #+Lucid (system:gc)
-  #+:cmulisp (ext:gc)
-  #+(OR IBCL KCL) (gbc t)
-  #+:allegro (excl::gc t)
-  )
-
 (defun bpiname (func)
   #+Lucid (if (functionp func)
 	      (if (symbolp func) func
-- 
cgit v1.2.3