Raymond Toy pushed to branch issue-328-typo-code-char at cmucl / cmucl
Commits: 9f7ba388 by Raymond Toy at 2024-06-09T06:02:11-07:00 Add package qualifiers
The function `unicode-title` and the macro `with-one-string` are in the `lisp` package, so add the package qualifer.
Fixes #330.
- - - - -
1 changed file:
- src/code/unicode.lisp
Changes:
===================================== src/code/unicode.lisp ===================================== @@ -496,7 +496,7 @@ (code-char (logxor m #x20))) #+(and unicode (not unicode-bootstrap)) ((> m lisp::+ascii-limit+) - (code-char (unicode-title m))) + (code-char (lisp::unicode-title m))) (t char))))
(defun title-case-p (char) @@ -562,7 +562,7 @@ (let* ((string (if (stringp string) string (string string))) (slen (length string))) (declare (fixnum slen)) - (with-one-string string start end offset + (lisp::with-one-string string start end offset (let ((offset-slen (+ slen offset)) (newstring (make-string slen))) (declare (fixnum offset-slen))
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/9f7ba388700843cc5c4c7a96...