Running ‘testthat.R’
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > test_check('geoknife')
  Loading required package: geoknife
  
  Attaching package: 'geoknife'
  
  The following object is masked from 'package:stats':
  
      start
  
  The following object is masked from 'package:graphics':
  
      title
  
  The following object is masked from 'package:base':
  
      url
  
  
   *** caught segfault ***
  address 0x280, cause 'memory not mapped'
  
  Traceback:
   1: .Call("RS_XML_internalNodeNamespaceDefinitions", x, as.logical(recursive),     PACKAGE = "XML")
   2: xmlNamespaceDefinitions.XMLInternalNode(doc, simplify = TRUE)
   3: xmlNamespaceDefinitions(doc, simplify = TRUE)
   4: is(namespaces, "list")
   5: xpathApply.XMLInternalDocument(doc, path, NULL, namespaces = namespaces,     resolveNamespaces = resolveNamespaces, addFinalizer = addFinalizer)
   6: xpathApply(doc, path, NULL, namespaces = namespaces, resolveNamespaces = resolveNamespaces,     addFinalizer = addFinalizer)
   7: xpathSubNodeApply(doc, path, fun, ..., namespaces = namespaces,     resolveNamespaces = resolveNamespaces, addFinalizer = addFinalizer)
   8: xpathApply.XMLInternalNode(doc, path, fun, ..., namespaces = namespaces,     sessionEncoding = sessionEncoding, addFinalizer = addFinalizer)
   9: xpathApply(doc, path, fun, ..., namespaces = namespaces, sessionEncoding = sessionEncoding,     addFinalizer = addFinalizer)
  10: getNodeSet(xmlNodes, featureXpath)
  11: lapply(X = X, FUN = FUN, ...)
  12: sapply(getNodeSet(xmlNodes, featureXpath), xmlValue)
  13: which(sapply(getNodeSet(xmlNodes, featureXpath), xmlValue) ==     name)
  14: findIdentifierNode(xmlNodes, "FEATURE_COLLECTION")
  15: addGeom(stencil, xmlNodes = top)
  16: addGeom(stencil, xmlNodes = top)
  17: withCallingHandlers(expr, warning = function(w) invokeRestart("muffleWarning"))
  18: suppressWarnings(addGeom(stencil, xmlNodes = top))
  19: XML(stencil, fabric, knife)
  20: XML(stencil, fabric, knife)
  21: geoknife(c(-89, 43), fabric, wait = TRUE)
  22: eval(exprs, env)
  23: eval(exprs, env)
  24: source_file(path, new.env(parent = env), chdir = TRUE)
  25: force(code)
  26: with_reporter(reporter = reporter, start_end_reporter = start_end_reporter,     {        lister$start_file(basename(path))        source_file(path, new.env(parent = env), chdir = TRUE)        end_context()    })
  27: FUN(X[[i]], ...)
  28: lapply(paths, test_file, env = env, reporter = current_reporter,     start_end_reporter = FALSE, load_helpers = FALSE)
  29: force(code)
  30: with_reporter(reporter = current_reporter, results <- lapply(paths,     test_file, env = env, reporter = current_reporter, start_end_reporter = FALSE,     load_helpers = FALSE))
  31: test_files(paths, reporter = reporter, env = env, ...)
  32: test_dir(test_path, reporter = reporter, env = env, filter = filter,     ...)
  33: with_top_env(env, {    test_dir(test_path, reporter = reporter, env = env, filter = filter,         ...)})
  34: run_tests(package, test_path, filter, reporter, ...)
  35: test_check("geoknife")
  An irrecoverable exception occurred. R is aborting now ...