HCoop Git - bpt/guile.git/blob - benchmark-suite/benchmarks/continuations.bm

HCoop / bpt / guile.git / blob

summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD

[bpt/guile.git] / benchmark-suite / benchmarks / continuations.bm

 (define (callee continuation)
   (continuation #t))
 
 (benchmark "call/cc" 300
   (call-with-current-continuation callee))

Unnamed repository; edit this file 'description' to name the repository.