Hatena::Groupsicmstudyclass

リンク集

リンク集

SICMに係るWebページ

(define (print-expression expr #!optional simplifier) 
(if (default-object? simplifier) 
(set! simplifier simplify)) 
(prepare-for-printing expr simplifier) 
(pp *last-expression-printed*)) 

(define (show-expression expr #!optional simplifier) 
(if (default-object? simplifier) 
(set! simplifier simplify)) 
(prepare-for-printing expr simplifier) 
(cond (*only-printing* 
(pp *last-expression-printed*)) 
(else 
(internal-show-expression *last-expression-printed*)))) 

* はてなダイアリーキーワード:リンク集