全部署のファイルから、従業員のレコードを探してこいって問題です。 なんかもう、都合のいいように仮定しまくった。 (define (find-employee-record employee-name files) (if (null? files) #f (let ((top-file (car files))) (let ((result (get-record (…

**ただサボっていた訳じゃない ぼくはデザインパターンの勉強する!!とか良いながら、ここ1ヶ月かくらい全然してないんですけど、ただ単にサボっていた訳ではありません。 PBPを読んでから、なんかいい感じのモジュールで、いい感じにデザインパターンの勉強…