2017-09-01から1ヶ月間の記事一覧

SICPゼミ第52回

練習問題4.25 (define (factorial n) (unless (= n 1) (* n (factorial (- n 1))) 1)) 適用順序言語では先に unless の引数がすべて評価される、すなわち (factorial 0) の評価が先に行われてしまうため、無限ループに陥って停止しない。 正規順序言語では引…

SICPゼミ第51回

ご無沙汰しております 練習問題4.23 Alyssaの解析器 (define (analyze-sequence exps) (define (execute-sequence procs env) (cond (( null? (cdr procs )) ((car procs) env)) (else ((car procs) env) (execute-sequence (cdr procs) env )))) (let (( pr…