勘どおり。

r5rs 版 uim が勝手にデバッグ情報吐いてたから "OK" の出力が見つからないのでした。Crash したのは、process descriptor の nil check が甘いから。
そんなわけで "OK" を読むまで loop するんじゃなくて、rex-search するように変更。Named-let が欲しいよぅ。(つД`)
つーか、C の break に相当するもんは無いの? throw するか flag 作るしかないの?