From 5521671cdf9c64efe8f73f4026ab0c7bf4dbf018 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Sat, 29 Aug 2009 15:29:02 +0000
Subject:

---
 src/boot/strap/ast.clisp | 4 ----
 1 file changed, 4 deletions(-)

(limited to 'src/boot/strap/ast.clisp')

diff --git a/src/boot/strap/ast.clisp b/src/boot/strap/ast.clisp
index 45c5d440..8a355ff2 100644
--- a/src/boot/strap/ast.clisp
+++ b/src/boot/strap/ast.clisp
@@ -160,10 +160,6 @@
     (SETQ |$GenVarCounter| (+ |$GenVarCounter| 1))
     (INTERN (CONCAT "bfVar#" (STRINGIMAGE |$GenVarCounter|)))))
 
-(DECLAIM (FTYPE (FUNCTION (|%List|) |%List|) |bfListOf|))
-
-(DEFUN |bfListOf| (|x|) |x|)
-
 (DECLAIM (FTYPE (FUNCTION (|%Thing|) |%List|) |bfColon|))
 
 (DEFUN |bfColon| (|x|) (LIST 'COLON |x|))
-- 
cgit v1.2.3