Shikano Keiichiro (k16) → twitter & github & 経歴 & flickr
(define (trace ls) (call/cc (lambda (skip) (let R ((ls ls)) (cond ((null? ls) '()) (else (call/cc (lambda (k) (set! trace (lambda () (k #f))) (skip (car ls)))) (R (cdr ls))))))))
0 件のコメント:
コメントを投稿