ZOJ 1001

最近再看 SICP，用 Dr.Racket 作为编程的平台，写了几个图形的程序，觉得像 Scheme，Racket 这种语言的组合与抽象能力真强，很值得玩味儿。最近听说 John Carmack 开始用 Racket 给 Oculus Rift 设计一种语言，看来他也是迷上了这种编程方式。

为了多用这种语言编程，需要多解决一些算法问题，忽然想起来 ZOJ 的题目是支持 Scheme 的。第一道问题就花了很长时间来做对，后来的却发现问题出在 let 绑定变量的 [] 上，

(define (sum-of-two-integers)   (let ((x (read))        (y (read)))    (if (or (eof-object? x)            (eof-object? y))     (exit 0)     (display (+ x y))))  (newline)  (sum-of-two-integers))(sum-of-two-integers)

ZOJ 上的 Scheme 解释器不接受这样的语法

(let ([] []) (...))。对于编译或者解释上的错误给的信息过于简短，不太容易很快定位错误。