From d2606c21bb809cadd34b75973454d4340b0ce7e2 Mon Sep 17 00:00:00 2001
From: =?utf8?q?David=20V=C3=A1zquez?= <davazp@gmail.com>
Date: Sat, 22 Jun 2013 17:35:40 +0200
Subject: [PATCH] Fix FLET

---
 src/compiler.lisp |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/compiler.lisp b/src/compiler.lisp
index 2edc334..2d51fb2 100644
--- a/src/compiler.lisp
+++ b/src/compiler.lisp
@@ -612,7 +612,7 @@
            ,@(interleave (mapcar #'translate-function fnames) ",")
            "){"
            ,(ls-compile-block body t)
-           "})(" ,@cfuncs ")")))
+           "})(" ,@(interleave cfuncs ",") ")")))
 
 (define-compilation labels (definitions &rest body)
   (let* ((fnames (mapcar #'car definitions))
-- 
1.7.10.4