From d798bcced437e76b7add75ef043c3bd517f37590 Mon Sep 17 00:00:00 2001
From: Olof-Joachim Frahm <olof@macrolet.net>
Date: Tue, 21 May 2013 21:04:53 +0200
Subject: [PATCH] Make FUNCTION and FLOAT available in TYPECASE.

---
 src/boot.lisp |    2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/boot.lisp b/src/boot.lisp
index 4335d4c..1076113 100644
--- a/src/boot.lisp
+++ b/src/boot.lisp
@@ -493,6 +493,8 @@
                                     (integer 'integerp)
                                     (cons 'consp)
                                     (symbol 'symbolp)
+                                    (function 'functionp)
+                                    (float 'floatp)
                                     (array 'arrayp)
                                     (string 'stringp)
                                     (atom 'atom)
-- 
1.7.10.4