おれ、激やさしい。Win機（VMWareだけど）立ち上げて検証してやった。
やっぱ1269行目の
(error "Closes block: ~a" base-text))))))
を
())))))
に書き換えたらきっとお望みの動作だね。
バイトコンパイルもお忘れなく。

いやー、残念ながら罵り合いは最後まで何の役にも立ちませんでしたねーw