This is not strange.
When you click "Create Something", the continuation is []
When you click "Start Again", the continuation is
(begin [] (error 'oops ...) (recur))
When you click "View", the value
(response/xexpr
`(html))
gets returned to the continuation, so you get an error, because begin
ignores the value and drops through to the error.
Jay
2011/6/27 Veer <diggerr...@gmail.com>:
> Hello,
>
> When I run this web application (given below) , I get strange behavior
> , don't know if
> this is correct behavior or not.
>
> Follow/click the link in sequence :
> 1. Create Something
> 2. Start again
> 3. View
>
> So , when I click "view" I get exception instead of blank page.
>
> code :
> #lang web-server/insta
> (define (start request)
> (do-1 request))
>
> (define (do-1 request)
> (define (resp make-url)
> (response/xexpr
> `(html
> (body (a ((href ,(make-url view))) "View")
> (br)
> (a ((href ,(make-url create-something))) "Create something")))))
>
> (define (create-something request)
> (recur))
>
> (define (view request)
> (response/xexpr
> `(html)))
>
> (send/suspend/dispatch resp))
>
>
> (define (recur)
> (do-something)
> (error 'oops "WHY ARE WE HERE?")
> (recur))
>
> (define (do-something)
> (define (resp make-url)
> (response/xexpr
> `(html
> (body (a ((href ,(make-url start))) "Start again")))))
> (send/suspend/dispatch resp))
>
>
> Thanks
> _________________________________________________
> For list-related administrative tasks:
> http://lists.racket-lang.org/listinfo/users
>
--
Jay McCarthy <j...@cs.byu.edu>
Assistant Professor / Brigham Young University
http://faculty.cs.byu.edu/~jay
"The glory of God is Intelligence" - D&C 93
_________________________________________________
For list-related administrative tasks:
http://lists.racket-lang.org/listinfo/users
