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
ansi-test
cl-bench
Commits
b42a4435
Commit
b42a4435
authored
May 16, 2016
by
Daniel Kochmański
Browse files
fix new packages and disabled-for
parent
38add412
Pipeline
#95
skipped
Changes
3
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
files/deflate.lisp
View file @
b42a4435
...
...
@@ -7,6 +7,7 @@
;;;; (c) copyright 1997,1998 by Gilbert Baumann
(
defpackage
:cl-bench.deflate
(
:use
:common-lisp
)
(
:import-from
cl-bench
#:*misc-dir*
)
(
:export
#:run-deflate-file
))
(
in-package
:cl-bench.deflate
)
...
...
files/misc.lisp
View file @
b42a4435
;;; misc.lisp
;;;
;;; Time-stamp: <2016-05-16 1
1
:3
1:42
jack>
;;; Time-stamp: <2016-05-16 1
5
:3
9:28
jack>
(
defpackage
:cl-bench.misc
(
:use
:common-lisp
)
(
:import-from
cl-bench
#:*misc-dir*
)
(
:export
#:run-compiler
#:run-fasload
#:run-permutations
...
...
support.lisp
View file @
b42a4435
...
...
@@ -3,7 +3,7 @@
;; Author: Eric Marsden <emarsden@laas.fr>
;; Maintainer: Daniel Kochmański <daniel@turtleware.eu>
;;
;; Time-stamp: <2016-05-16 1
1
:3
8:02
jack>
;; Time-stamp: <2016-05-16 1
5
:3
9:14
jack>
;;
;;
;; The benchmarks consist of
...
...
@@ -108,11 +108,12 @@
(
*compile-print*
nil
))
(
bench-report-header
)
(
dolist
(
b
(
reverse
*benchmarks*
))
(
if
(
benchmark-disabled-for
b
)
(
if
(
some
#'
(
lambda
(
bench
)
(
member
bench
*features*
))
(
benchmark-disabled-for
b
))
(
format
t
"~&=== skipping disabled ~a~%"
b
)
(
progn
(
bench-gc
)
(
with-slots
(
disabled-for
setup
function
short
runs
)
b
(
with-slots
(
setup
function
short
runs
)
b
(
when
setup
(
funcall
setup
))
(
format
t
"~&=== running ~a~%"
b
)
(
bench-report
function
short
runs
)))))
...
...
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