Paste: defending continuations

Author: dpara
Mode: scheme
Date: Tue, 14 Sep 2010 19:54:03
Plain Text |
(define my-algorithm
   (let (( xx ...))
    (some-loop
      (let (( yy ...))
        (another-loop
             (interrupt (lambda () (draw-alg xx yy)))
))))))

New Annotation

Summary:
Author:
Mode:
Body: