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...