Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
Jan Moringen
asdf
Commits
26e6497f
Commit
26e6497f
authored
Sep 11, 2016
by
Elias Pipping
Browse files
Merge branch 'use-lispworks7+-feature' into 'master'
Use lispworks7+ feature See merge request
!6
parents
95e9b113
fcd8005f
Changes
1
Hide whitespace changes
Inline
Side-by-side
uiop/utility.lisp
View file @
26e6497f
...
...
@@ -204,8 +204,7 @@ Returns two values: \(A B C\) and \(1 2 3\)."
#-
scl
base-char
;; LW6 has BASE-CHAR < SIMPLE-CHAR < CHARACTER
;; LW7 has BASE-CHAR < BMP-CHAR < SIMPLE-CHAR = CHARACTER
#+
(
and
lispworks
(
not
(
or
lispworks4
lispworks5
lispworks6
)))
lw:bmp-char
#+
lispworks7+
lw:bmp-char
#+
lispworks
lw:simple-char
character
)
:unless
(
and
next
(
subtypep
next
type
))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment