scmWrite, scmDisplay :: Handle -> [ScmValue] -> IO (ErrOr ScmValue)
scmWrite   = scmPrint scmShow "write"
scmWrite, scmDisplay :: Handle -> [ScmValue] -> IO (ErrOr ScmValue)
scmWrite   = scmPrint scmShow "write"
scmWrite   = scmPrint scmShow "write"