Slow Write speeds on windows with small buffers

[DavZim]

library(RITCH)
file <- system.file("extdata", "ex20101224.TEST_ITCH_50", package = "RITCH")
ll <- read_itch(file)

write_itch(ll, "tmpfile", buffer_size = 52, quiet = TRUE)

Takes 0.2 secs on Ubuntu and 42 (!) secs on Windows.
Maybe write_itch() is not yet fully optimised... (note write_itch is not used in filter_itch!).

[DavZim]

Current workarounds: use larger buffer sizes or use filter_itch to filter the data to another file first and then read it.