mark segfaulting tests

Author: paleolimbot

tests/testthat/test_read.R

@@ -174,6 +174,8 @@ test_that("we get a warning when not specifying one of multiple layers", {
 
 test_that("reading non-spatial table works", {
     skip_if_not(sf_extSoftVersion()[["GDAL"]] >= "2.2.0") # error on OSX for 2.1.3
+    # currently segfaults using the stream interface
+    skip_if(default_st_read_use_stream())
 
     expect_warning(st_read(system.file("gpkg/nospatial.gpkg", package = "sf")),
                    "no simple feature geometries present")

tests/testthat/test_tm.R

@@ -1,6 +1,6 @@
 test_that("st_read and write handle date and time", {
   Sys.setenv(TZ="") # local time
-  x = st_sf(a = 1:2, b=c(5.6,3), dt = Sys.Date()+1:2, tm = Sys.time()+2:3, 
+  x = st_sf(a = 1:2, b=c(5.6,3), dt = Sys.Date()+1:2, tm = Sys.time()+2:3,
             geometry = structure(st_sfc(st_point(c(1,1)), st_point(c(2,2)))))
   shp <- paste0(tempfile(), ".shp")
   gpkg <- paste0(tempfile(), ".gpkg")
@@ -11,7 +11,7 @@ test_that("st_read and write handle date and time", {
   x2 = st_read(shp[1], quiet = TRUE)
   expect_equal(x[-4], x2, check.attributes=FALSE)
 # WKT2 CRS do not roundtrip for ESRI Shapefile
-    
+
   st_write(x, gpkg, quiet = TRUE)
   x2 = st_read(gpkg, quiet = TRUE)
   expect_equal(x[["a"]], x2[["a"]])
@@ -20,18 +20,18 @@ test_that("st_read and write handle date and time", {
   expect_equal(x[["tm"]], x2[["tm"]])
 
   Sys.setenv(TZ="UTC") # GMT
-  x = st_sf(a = 1:2, b=c(5.6,3), dt = Sys.Date()+1:2, tm = Sys.time()+2:3, 
+  x = st_sf(a = 1:2, b=c(5.6,3), dt = Sys.Date()+1:2, tm = Sys.time()+2:3,
             geometry = structure(st_sfc(st_point(c(1,1)), st_point(c(2,2)))))
   shp <- paste0(tempfile(), ".shp")
   gpkg <- paste0(tempfile(), ".gpkg")
-    
+
   st_crs(x) = st_crs("ENGCRS[\"Undefined Cartesian SRS with unknown unit\",EDATUM[\"Unknown engineering datum\"],CS[Cartesian,2],AXIS[\"X\",unspecified,ORDER[1],LENGTHUNIT[\"unknown\",0]],AXIS[\"Y\",unspecified,ORDER[2],LENGTHUNIT[\"unknown\",0]]]")
- 
+
   st_write(x[-4], shp[1], quiet = TRUE)
   x2 = st_read(shp[1], quiet = TRUE)
   expect_equal(x[-4], x2, check.attributes=FALSE)
 # WKT2 CRS do not roundtrip for ESRI Shapefile
-    
+
   st_write(x, gpkg, quiet = TRUE)
   x2 = st_read(gpkg, quiet = TRUE)
   expect_equal(x[["a"]], x2[["a"]])

tests/testthat/test_write.R

@@ -148,6 +148,9 @@ test_that("append errors work", {
 })
 
 test_that("non-spatial tables can be written to GPKG; #1345", {
+  # currently segfaults using the stream interface
+  skip_if(default_st_read_use_stream())
+  
   nc = system.file("gpkg/nc.gpkg", package = "sf")
   tf = tempfile(fileext = ".gpkg")
   file.copy(nc, tf)

tests/testthat/test_zm_range.R

@@ -144,6 +144,8 @@ test_that("transform includes zm in output", {
 
 
 test_that("XYM-only objects correctly calculate M (and not Z)", {
+	# currently segfaults using the stream interface
+    skip_if(default_st_read_use_stream())
 
 	skip_if_not(sf_extSoftVersion()["GDAL"] > "2.1.0")