crash when writing YAML with 'latin1'-encoded strings on Windows

[kevinushey]

To reproduce:

# ok
data <- list(description = enc2utf8("á"))
yaml::write_yaml(data, "test.yml")

# barf
data <- list(description = enc2native("á"))
yaml::write_yaml(data, "test.yml")

[viking]

I'll check it out, thanks for the bug report.

[juniperlsimonis]

I'm trying to get a clean reproducible example but am running into a similar problem when trying

as.yaml(sessionInfo())

depending on which packages are loaded.

I can recreate a sessionInfo object de novo and it won't crash, so there's something weird going on.

I haven't been able to track which one was causing the issue yet, but thanks for the info here @kevinushey on it being around encoding.

[spgarbet]

Oddly, I just tested the original submission and it now works. The library proving yaml parsing is UTF-8 only is part of the problem.

[spgarbet]

Currently working in R 4.1.2 with current master head version.

[kevinushey]

Hmm, it still crashes for me with R 3.6.3 on Windows.

> devtools::session_info(pkgs = "yaml")
- Session info -------------------------------------------------------------------------------------------
 setting  value                       
 version  R version 3.6.3 (2020-02-29)
 os       Windows 10 x64              
 system   x86_64, mingw32             
 ui       RStudio                     
 language (EN)                        
 collate  English_United States.1252  
 ctype    English_United States.1252  
 tz       America/Los_Angeles         
 date     2022-02-14                  

- Packages -----------------------------------------------------------------------------------------------
 package * version date       lib source                           
 yaml      2.3.3   2022-02-15 [1] Github (vubiostat/r-yaml@90b6732)

[1] C:/Users/kevin/AppData/Local/R/cache/R/renv/library/test-bd227256/R-3.6/x86_64-w64-mingw32
[2] C:/R/R-3.6.3/library

[kevinushey]

Does the following reproduce more readily?

text <- rawToChar(as.raw(0xe1))
Encoding(text) <- "latin1"
data <- list(description = text)
yaml::write_yaml(data, "test.yml")

[spgarbet]

That hung my instance of R. I'd like to get all these problems together and introduce as test cases to solve #113