X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcompiler.lisp;h=66a734c231ecba4ebbb4639ecd163b8ad90b8273;hb=dc8d38273bc1d2276e20ca1f18114a78ca4b5639;hp=22b318f2533f41774938caee3735a206522c1bc1;hpb=b9e78f806d34dbf2a3b9dc3eb9c3959a30513ef1;p=jscl.git

diff --git a/src/compiler.lisp b/src/compiler.lisp
index 22b318f..66a734c 100644
--- a/src/compiler.lisp
+++ b/src/compiler.lisp
@@ -1249,7 +1249,7 @@
 (define-builtin functionp (x)
   (js!bool (code "(typeof " x " == 'function')")))
 
-(define-builtin write-string (x)
+(define-builtin %write-string (x)
   (code "lisp.write(" x ")"))