Misc textual editing

[bpt/guile.git] / benchmark-suite / lib.scm

diff --git a/benchmark-suite/lib.scm b/benchmark-suite/lib.scm
index 65253c5..a6feed8 100644 (file)
--- a/benchmark-suite/lib.scm
+++ b/benchmark-suite/lib.scm
@@ -110,7 +110,7 @@
 ;;;;   ("multiplication").
 ;;;;
 ;;;; WITH-BENCHMARK-PREFIX can be nested.  Each WITH-BENCHMARK-PREFIX
-;;;; postpends a new element to the current prefix:
+;;;; appends a new element to the current prefix:
 ;;;;
 ;;;; (with-benchmark-prefix "arithmetic"
 ;;;;   (with-benchmark-prefix "addition"
@@ -325,7 +325,7 @@
 
 ;;; A short form for benchmarks.
 (defmacro benchmark (name iterations body . rest)
-  `(,run-benchmark ,name ,iterations (lambda () ,body ,@rest)))
+  `(run-benchmark ,name ,iterations (lambda () ,body ,@rest)))
 
 \f
 ;;;; BENCHMARK NAMES