UNB/ CS/ David Bremner/ teaching/ cs4613/ lectures/ lecture15/ let-cc.rkt
#lang plait
(test (let/cc k 3) 3)

(test (let/cc k (k 3)) 3)

(test (+ 1 (let/cc k (k 3))) 4)

(test (let/cc k (+ 2 (k 3))) 3)

(test (+ 1 (let/cc k (+ 2 (k 3)))) 4)