[R] Cannot write parquet to OutputStream

[asfimport]

The R package does not allow for the ability to write to a FileOutputStream. 

Minimal testing code:
library(arrow)
tf1 <- arrow::FileOutputStream$create(path = "output.parquet")
arrow::write_parquet(data.frame(x = 1:5), tf1)

Throws error:

Error in inherits(sink, OutputStream) : 'what' must be a character vector

 

The issue appears to be in line 153 of parquet.R

if (is.character(sink)) {
sink <- FileOutputStream$create(sink)
on.exit(sink$close())
} else if (!inherits(sink, OutputStream)) {
abort("sink must be a file path or an OutputStream")
}

 

Should be !inherits(sink,'OutputStream')

Reporter: Bob / @bob-skowron
Assignee: Bob / @bob-skowron

PRs and other links:

• GitHub Pull Request #6304

_{Note: This issue was originally created as ARROW-7690. Please see the migration documentation for further details.}

[asfimport]

Francois Saint-Jacques / @fsaintjacques:
Thanks for reporting this. Meanwhile you can hotfix this by copying a version of write_parquet and quoting "OutputStream"

[asfimport]

Neal Richardson / @nealrichardson:
Good catch! Would you like to submit a PR to fix that?

[asfimport]

Bob / @bob-skowron:
Yeah, I can submit a PR in just a bit here.

[asfimport]

Neal Richardson / @nealrichardson:
Issue resolved by pull request 6304
#6304