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
Peter Housel
cl-bench
Commits
92237336
Commit
92237336
authored
Jun 07, 2016
by
Daniel Kochmański
Browse files
gcl: disable some tests for implementation
parent
b6d28828
Changes
2
Hide whitespace changes
Inline
Side-by-side
files/clos.lisp
View file @
92237336
...
...
@@ -76,11 +76,11 @@
(
defmethod
simple-method
((
self
class-0-0
)
other
)
other
)
#-
(
or
clisp
poplog
)
#-
(
or
clisp
poplog
gcl
)
(
defgeneric
complex-method
(
a
b
&rest
rest
)
(
:method-combination
and
))
#-
(
or
clisp
poplog
)
#-
(
or
clisp
poplog
gcl
)
(
defmethod
complex-method
and
((
self
class-0-0
)
other
&rest
rest
)
(
declare
(
ignore
rest
))
other
)
...
...
tests.lisp
View file @
92237336
...
...
@@ -400,6 +400,7 @@
:short
"CLOS/method+after"
:long
"Define after methods on our instances, then run some method calls"
:function
'cl-bench.clos:methodcalls/simple+after
:disabled-for
'
(
:gcl
)
:runs
2
)
(
defbench
methodcalls/complex
...
...
@@ -408,12 +409,13 @@
:long
"Run methodcalls with and method combination."
:function
'cl-bench.clos:methodcalls/complex
:runs
5
:disabled-for
'
(
:clisp
:poplog
))
:disabled-for
'
(
:clisp
:poplog
:gcl
))
(
defbench
eql-specialized-fib
:group
:clos
:long
"Fibonnaci function implemented with EQL specialization"
:function
'cl-bench.clos:run-eql-fib
:runs
2
)
:runs
2
:disabled-for
'
(
:gcl
))
;; EOF
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