bkyk8rc3zvpnsf5inmcqq4n3k98cv6hj-my-site-hyper-literate-git.test.suzanne.soy-0.0.1

Unnamed repository; edit this file 'description' to name the repository.
Log | Files | Refs | README | LICENSE

commit 11fd5a91ed63d14c82fb1a234685baa59b526797
parent 0d977a560c35e02a63d6165340229d5392fea4a8
Author: Robby Findler <robby@racket-lang.org>
Date:   Sun, 15 Jul 2012 08:04:45 -0500

use a more descriptive name in the identifier generated by define-on-demand
so when it shows up in an error message it doesn't take forever to figure
out which 'val' that is

original commit: 0ee8155527bf0118c1b035efdcc5a6a2fac4828a

Diffstat:
Mcollects/scribble/private/on-demand.rkt | 4++--
1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/collects/scribble/private/on-demand.rkt b/collects/scribble/private/on-demand.rkt @@ -5,8 +5,8 @@ (define-syntax-rule (define-on-demand id rhs) (begin - (define val (delay rhs)) + (define define-on-demand-bound-promise (delay rhs)) (define-syntax (id stx) (if (identifier? stx) - #'(force val) + #'(force define-on-demand-bound-promise) (raise-syntax-error #f "bad syntax" stx)))))