From a1b4d7958b5940f9eb3d412d1f930767b19fc869 Mon Sep 17 00:00:00 2001 From: David Vazquez Date: Mon, 17 Dec 2012 18:39:30 +0000 Subject: [PATCH] rename char-code to string --- lispstrack.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lispstrack.lisp b/lispstrack.lisp index fe1fbb5..969567f 100644 --- a/lispstrack.lisp +++ b/lispstrack.lisp @@ -406,7 +406,7 @@ (define-compilation eq (x y) (concat "(" (ls-compile x env fenv) " === " (ls-compile y env fenv) ")")) -(define-compilation code-char (x) +(define-compilation string (x) (concat "String.fromCharCode( " (ls-compile x env fenv) ")")) (define-compilation char (string index) -- 1.7.10.4