Configure tweaks + fixes + refactoring

.gitignore

@@ -2,3 +2,37 @@
 .Rhistory
 .RData
 .Ruserdata
+# Autotools
+config.*
+Makevars
+autom4te.cache
+autoscan.log
+configure.scan
+# Compiled Object files
+*.slo
+*.lo
+*.o
+*.obj
+*.gcda
+*.gcno
+*.gcov
+# Precompiled Headers
+*.gch
+*.pch
+# Compiled Dynamic libraries
+*.so
+*.dylib
+*.dll
+# Fortran module files
+*.mod
+# Compiled Static libraries
+*.lai
+*.la
+*.a
+*.lib
+# Executables
+*.exe
+*.out
+*.app
+# OSX-specific
+.DS_Store

R/RcppExports.R

@@ -1,12 +1,12 @@
 # Generated by using Rcpp::compileAttributes() -> do not edit by hand
 # Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
 
-udunits_init <- function(path, warn_on_failure = FALSE) {
-    .Call('_units_udunits_init', PACKAGE = 'units', path, warn_on_failure)
+udunits_init <- function(path) {
+    invisible(.Call('_units_udunits_init', PACKAGE = 'units', path))
 }
 
-udunits_exit <- function(lo) {
-    .Call('_units_udunits_exit', PACKAGE = 'units', lo)
+udunits_exit <- function() {
+    invisible(.Call('_units_udunits_exit', PACKAGE = 'units'))
 }
 
 R_ut_parse <- function(name) {
@@ -66,7 +66,7 @@ R_ut_format <- function(p, names = FALSE, definition = FALSE, ascii = FALSE) {
 }
 
 R_ut_set_encoding <- function(enc_str) {
-    .Call('_units_R_ut_set_encoding', PACKAGE = 'units', enc_str)
+    invisible(.Call('_units_R_ut_set_encoding', PACKAGE = 'units', enc_str))
 }
 
 R_ut_get_symbol <- function(ustr) {

R/init.R

@@ -5,7 +5,7 @@
 NULL
 
 .onLoad = function(libname, pkgname) {
-	udunits_init(character(0), TRUE)
+	udunits_init(character(0))
 }
 
 .onAttach <- function(libname, pkgname) {
@@ -18,5 +18,5 @@ NULL
 }
 
 .onUnLoad = function(libname, pkgname) {
-	udunits_exit(logical(0))
+	udunits_exit()
 }

R/udunits.R

@@ -21,5 +21,4 @@ ud_convert = function(value, from, to) {
 
 ud_set_encoding = function(enc) {
 	R_ut_set_encoding(as.character(enc))
-	return()
 }