Name: Anonymous 2011-03-16 17:09
I know a good few hardcore C peeps lurk around here, is this possible?
(*p)++
(*p)++
(define (setjmp! env)
(call/1cc (lambda (k)
(env-set! env k)
0)))
(define (longjmp! env val)
((env-get env)
(if (zero? val)
1
val)))