From: Fredrik Tolf <fredrik@dolda2000.com>
Date: Thu, 13 May 2010 02:24:55 +0000 (+0200)
Subject: CHARCODE: Defined unicode functions for ABCL.
X-Git-Url: http://dolda2000.com/gitweb/?p=lisp-utils.git;a=commitdiff_plain;h=37df166229286a5aafb05bbf3a8860e52fb99c5f

CHARCODE: Defined unicode functions for ABCL.
---

diff --git a/charcode.lisp b/charcode.lisp
index 486e679..a3cb5ad 100644
--- a/charcode.lisp
+++ b/charcode.lisp
@@ -197,12 +197,12 @@
 
 ;;; Implementation-specific functions
 
-#+(or (and clisp unicode) sbcl)
+#+(or (and clisp unicode) sbcl abcl)
 (defun unicode->char (unicode)
   (declare (type (unsigned-byte 24) unicode))
   (code-char unicode))
 
-#+(or (and clisp unicode) sbcl)
+#+(or (and clisp unicode) sbcl abcl)
 (defun char->unicode (char)
   (declare (type character char))
   (char-code char))