X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Futils.lisp;h=430b6a784ff23a6a79693f1381e0dad138050172;hb=74568bb8cdadfcb6bf5429976b92f3afb748b0c2;hp=d586cddf69dd01913e077e8d824d242e5fa1a2c0;hpb=cae73e8875a24258961b29e84d48d9794cb5be03;p=jscl.git

diff --git a/src/utils.lisp b/src/utils.lisp
index d586cdd..430b6a7 100644
--- a/src/utils.lisp
+++ b/src/utils.lisp
@@ -83,4 +83,4 @@
 
 (defun float-to-string (x)
   #+jscl (float-to-string x)
-  #+common-lisp (format nil "~f" x))
+  #-jscl (format nil "~f" x))