Dolda2000 GitWeb
/
lisp-utils.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
COMMON-NET: Export some DNS symbols.
[lisp-utils.git]
/
charcode.lisp
diff --git
a/charcode.lisp
b/charcode.lisp
index
486e679
..
a3cb5ad
100644
(file)
--- a/
charcode.lisp
+++ b/
charcode.lisp
@@
-197,12
+197,12
@@
;;; Implementation-specific functions
;;; 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))
(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))
(defun char->unicode (char)
(declare (type character char))
(char-code char))