X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=branch%2Fpatch%2FR%2Futil.R;fp=branch%2Fpatch%2FR%2Futil.R;h=0000000000000000000000000000000000000000;hb=21489018a9c733dc99bb8899ef53088166d0f189;hp=e10951e2afa40e4104354dbd421c17518f1b8de6;hpb=49b44dc25b2664f0b2cbbed14a444d77c4d0ca07;p=cran2deb.git

diff --git a/branch/patch/R/util.R b/branch/patch/R/util.R
deleted file mode 100644
index e10951e..0000000
--- a/branch/patch/R/util.R
+++ /dev/null
@@ -1,25 +0,0 @@
-iterate <- function(xs,z,fun) {
-    y <- z
-    for (x in xs)
-        y <- fun(y,x)
-    return(y)
-}
-
-chomp <- function(x) {
-    # remove leading and trailing spaces
-    return(sub('^[[:space:]]+','',sub('[[:space:]]+$','',x)))
-}
-
-host_arch <- function() {
-    # return the host system architecture
-    system('dpkg-architecture -qDEB_HOST_ARCH',intern=T)
-}
-
-err <- function(...) {
-    error(...)
-    exit()
-}
-
-exit <- function() {
-    q(save='no')
-}