Fixes bug 190373: `time' macro's "running stats for" can be misleading

2008-03-24 21:45:36 -04:00 · 2008-03-24 21:45:36 -04:00 · 81c17da20b
parent 3c3fec3908
commit 81c17da20b
2 changed files with 2 additions and 2 deletions
--- a/scheme/last-revision
+++ b/scheme/last-revision
@ -1 +1 @@
-1427
+1428
--- a/scheme/psyntax.expander.ss
+++ b/scheme/psyntax.expander.ss
@ -1301,7 +1301,7 @@
    (lambda (stx)
      (syntax-match stx ()
        ((_ expr)
-         (bless `(time-it ',expr (lambda () ,expr)))))))
+         (bless `(time-it (format "~s" ',expr) (lambda () ,expr)))))))
  
  (define delay-macro
    (lambda (stx)