Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
abcl
abcl
Commits
14eb2d33
Commit
14eb2d33
authored
Aug 14, 2021
by
Mark
Browse files
Test for evaluation of incongruent generic keywords
Tests <
https://abcl.org/trac/ticket/485
>
parent
bbd98717
Changes
2
Hide whitespace changes
Inline
Side-by-side
abcl-prove.asd
View file @
14eb2d33
...
...
@@ -15,6 +15,7 @@
(
:test-file
"decode-float"
)
(
:test-file
"disassemble"
)
(
:test-file
"format-dollar"
)
(
:test-file
"generic-method"
)
(
:test-file
"java-arrays"
)
(
:test-file
"java-call-sites"
)
(
:test-file
"jcoerce-numerics"
)
...
...
t/generic-method.lisp
0 → 100644
View file @
14eb2d33
(
prove:plan
1
)
;;; <https://abcl.org/trac/ticket/485>
(
prove:ok
(
handler-case
(
progn
(
in-package
:cl-user
)
(
defmethod
test
((
a
integer
)
&key
b
c
)
(
declare
(
ignore
a
b
c
)))
(
defmethod
test
((
a
real
)
&key
b
)
(
declare
(
ignore
a
b
)))
t
)
(
error
()
nil
))
"Evaluation of generic methods with incongruent keywords succeeds"
)
(
prove:finalize
)
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new 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