Welcome to the CHICKEN Scheme pasting service

abc or abbbbbbbb... pasted by sethalves on Sat Dec 27 17:22:59 2014

(define run-me-a #f)
(define run-me-b #f)

(display "a\n")

(call-with-current-continuation
 (lambda (cont)
   (set! run-me-a cont)
   (call-with-current-continuation
    (lambda (cont)
      (set! run-me-b cont)
      (run-me-a #t)))))

(display "b\n")

(run-me-b #t)

(display "c\n")
[ permalink | raw ]

always abbbbb... added by sethalves on Sat Dec 27 17:43:51 2014

(let ((run-me-a #f)
      (run-me-b #f))

  (display "a\n")

  (call-with-current-continuation
   (lambda (cont)
     (set! run-me-a cont)
     (call-with-current-continuation
      (lambda (cont)
        (set! run-me-b cont)
        (run-me-a #t)))))

  (display "b\n")

  (run-me-b #t)

  (display "c\n"))
[ permalink | raw ]

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
Which R5RS procedure can be used to concatenate strings?
Visually impaired? Let me spell it for you (wav file) download WAV