顺手编译RScheme成lib，可以跑android、ios、win、mac、linux上。

现在玩lisp app。需要生成一个packages 给ios用，

(define (read)
    (let (( pnum (read-op)))
        (if (number? (string->number pnum))