[racket] scribble problem?

Code is available here https://github.com/veer-public/OAuth-2.0 .

Thanks.



On Sat, Sep 17, 2011 at 7:55 PM, Matthew Flatt <mflatt at cs.utah.edu> wrote:
> I think we need "web-flow/web-server-flow.rkt" and its dependencies to
> diagnose this problem. Is that code available somewhere?
>
> At Sun, 11 Sep 2011 10:10:44 +0530, Veer wrote:
>> When I click Scribble HTML in DrRacket for code below
>>
>> #lang scribble/manual
>> @(require (for-label racket "web-flow/web-server-flow.rkt"))
>>
>> @title{OAuth 2.0 Client Library}
>>
>>
>> I get following error :
>>
>> #%plain-lambda: cannot bind identifier tainted by macro expansion at:
>> l17069 in: (#%plain-lambda (l17069) l17069)
>>   (core . #(struct:srcloc
>> #<path:/home/veer/racket/collects/web-server/lang/util.rkt> 31 0 1092
>> 431))
>>   (elim-callcc/mark . #(struct:srcloc
>> #<path:/home/veer/racket/collects/web-server/lang/elim-callcc.rkt> 34
>> 0 995 6129))
>>   (#f . #(struct:srcloc
>> #<path:/home/veer/racket/collects/web-server/lang.rkt> 22 5 664 172))
>>   (#f . #(struct:srcloc
>> #<path:/home/veer/racket/collects/web-server/lang/util.rkt> 48 0 1727
>> 428))
>>   (loop . #(struct:srcloc
>> #<path:/home/veer/racket/collects/racket/private/map.rkt> 23 17 713
>> 142))
>>   (map . #(struct:srcloc
>> #<path:/home/veer/racket/collects/racket/private/map.rkt> 18 11 540
>> 876))
>>   (#f . #(struct:srcloc
>> #<path:/home/veer/racket/collects/web-server/lang/util.rkt> 70 0 2315
>> 816))
>>   (standard-module-name-resolver . #f)
>>   (standard-module-name-resolver . #f)
>>   (standard-module-name-resolver . #f)
>>   (map . #(struct:srcloc
>> #<path:/home/veer/racket/collects/racket/private/map.rkt> 18 11 540
>> 876))
>>   (|[running body]| . #(struct:srcloc
>> #<path:/home/veer/racket/collects/scribble/run.rkt> #f #f #f #f))
>>   (call-with-limits . #(struct:srcloc
>> #<path:/home/veer/racket/collects/racket/sandbox.rkt> 334 0 13381
>> 1825))
>>   (call-with-custodian-shutdown . #(struct:srcloc
>> #<path:/home/veer/racket/collects/racket/sandbox.rkt> 384 0 15374
>> 326))
>>   (call-with-break-parameterization . #(struct:srcloc
>> #<path:/home/veer/racket/collects/racket/private/more-scheme.rkt> 151
>> 2 5211 519))
>>   (loop . #(struct:srcloc
>> #<path:/home/veer/racket/collects/racket/sandbox.rkt> 727 9 30830
>> 1481))
>>   (#f . #(struct:srcloc
>> #<path:/home/veer/racket/collects/mred/private/wx/common/queue.rkt>
>> 430 6 18875 428))
>>   (#f . #(struct:srcloc
>> #<path:/home/veer/racket/collects/mred/private/wx/common/queue.rkt>
>> 470 32 20234 120))
>
>