update benz (call-with-port)
import a test case by @SaitoAtsushi