Bob Rudis
8 years ago
18 changed files with 86 additions and 52 deletions
Binary file not shown.
Binary file not shown.
@ -0,0 +1,12 @@ |
|||||
|
% Generated by roxygen2: do not edit by hand |
||||
|
% Please edit documentation in R/wand.r |
||||
|
\name{get_os} |
||||
|
\alias{get_os} |
||||
|
\title{ripped from rappdirs (ty Hadley!)} |
||||
|
\usage{ |
||||
|
get_os() |
||||
|
} |
||||
|
\description{ |
||||
|
ripped from rappdirs (ty Hadley!) |
||||
|
} |
||||
|
|
@ -1,8 +1,2 @@ |
|||||
PKG_LIBS = -lmagic |
PKG_LIBS = -lmagic |
||||
|
|
||||
all: clean |
|
||||
|
|
||||
clean: |
|
||||
rm -f $(OBJECTS) wand.dll |
|
||||
|
|
||||
.PHONY: all clean |
|
@ -1,9 +1,6 @@ |
|||||
all: winlibs |
all: clean |
||||
|
|
||||
clean: |
clean: |
||||
rm -f $(OBJECTS) wand.dll |
rm -f $(OBJECTS) wand.dll |
||||
|
|
||||
winlibs: |
.PHONY: all clean |
||||
"${R_HOME}/bin${R_ARCH_BIN}/Rscript.exe" "../tools/getfile.R" |
|
||||
|
|
||||
.PHONY: all winlibs clean |
|
@ -1,12 +1,13 @@ |
|||||
context("basic functionality") |
context("basic functionality") |
||||
test_that("we can do something", { |
test_that("we can do something", { |
||||
|
|
||||
tmp <- incant(list.files(system.file("img", package="wand"), full.names=TRUE), |
tmp <- incant(list.files(system.file("img", package="wand"), |
||||
magic_wand_file()) |
full.names=TRUE), |
||||
tmp <- tmp$description |
magic_wand_file()) |
||||
tmp <- unlist(tmp, use.names=FALSE) |
tmp <- tmp$description |
||||
tmp <- sort(tmp) |
tmp <- unlist(tmp, use.names=FALSE) |
||||
|
tmp <- sort(tmp) |
||||
expect_that(tmp[3], equals("C source, ASCII text")) |
|
||||
|
expect_that(substr(tmp[8], 1, 3), equals("PNG")) |
||||
}) |
|
||||
|
}) |
||||
|
@ -1,5 +0,0 @@ |
|||||
if(getRversion() < "3.3.0") setInternet2() |
|
||||
download.file("https://www.stats.ox.ac.uk/pub/Rtools/goodies/file-5.03.zip", "file.zip", quiet = TRUE) |
|
||||
dir.create("../inst/exec", showWarnings = FALSE) |
|
||||
unzip("file.zip", "file.exe", exdir = "../inst/exec") |
|
||||
unlink("file.zip") |
|
Loading…
Reference in new issue