Commit 144601a3 authored by david's avatar david

Revision: cxml--devel--1.0--patch-66

Archive: david@knowledgetools.de--cxml
Creator: David Lichteblau <david@knowledgetools.de>
Date: Fri Feb  6 17:49:24 CET 2004
Standard-date: 2004-02-06 16:49:24 GMT
Modified-files: xml/characters.lisp
New-patches: david@knowledgetools.de--cxml/cxml--devel--1.0--patch-66
Summary: fixed rune-name-char-p: digits are valid

fixed rune-name-char-p: digits are valid
parent ccea33a4
......@@ -16,6 +16,7 @@
(defun rune-name-char-p (rune)
(or (rune-in-range-p rune *base-char-ranges*)
(rune-in-range-p rune *ideographic-ranges*)
(rune-in-range-p rune *digit-ranges*)
(eql rune #.(char-code #\.))
(eql rune #.(char-code #\-))
(eql rune #.(char-code #\_))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment