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
de8b7451
Commit
de8b7451
authored
May 19, 2016
by
Daniel Kochmański
Browse files
format: fix implementations with broken format
parent
e91c4595
Changes
1
Hide whitespace changes
Inline
Side-by-side
support.lisp
View file @
de8b7451
...
...
@@ -147,8 +147,10 @@
;;; Entering Corman Lisp debug loop.
(
defun
bench-report-header
()
(
format
*benchmark-output*
#-
(
or
clisp
ecl
gcl
cormanlisp
)
";; -*- lisp -*- ~a~%;;~%;; Implementation *features*:~%~@<;; ~@;~s~:>~%;;~%"
#+
(
or
clisp
ecl
gcl
cormanlisp
)
";; -*- lisp -*- ~a~%;; Implementation *features*: ~s~%;;~%"
#-
(
or
clisp
gcl
cormanlisp
)
";; -*- lisp -*- ~a~%;;~%;; Implementation *features*:~%~@<;; ~@;~s~:>~%;;~%"
#+
(
or
clisp
gcl
cormanlisp
)
";; -*- lisp -*- ~a~%;;~%#| Implementation *features*: ~s |#~%;;~%"
+implementation+
*features*
)
(
format
*benchmark-output*
";; Function real user sys consed~%"
)
...
...
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