From c18ba246075106480ffa7fbb0cc2502f44e7e964 Mon Sep 17 00:00:00 2001
From: arthurmaciel <address@hidden>
Date: Sat, 13 Sep 2014 16:54:50 -0300
Subject: [PATCH] * modules.scm: Removed #+debugbuild map-se duplicate and
 corrected typo.

---
 modules.scm | 8 +-------
 1 file changed, 1 insertion(+), 7 deletions(-)

diff --git a/modules.scm b/modules.scm
index f5278c2..0054f37 100644
--- a/modules.scm
+++ b/modules.scm
@@ -54,18 +54,12 @@
 
 ;;; Support definitions
 
-;; duoplicates code in the hope of being inlined
+;; duplicates code in the hope of being inlined
 (define (lookup id se)
   (cond ((##core#inline "C_u_i_assq" id se) => cdr)
 	((getp id '##core#macro-alias))
 	(else #f)))
 
-#+debugbuild
-(define (map-se se)
-  (map (lambda (a) 
-	 (cons (car a) (if (symbol? (cdr a)) (cdr a) '<macro>)))
-       se))
-
 
 ;;; low-level module support
 
-- 
1.8.1.2