Displaying 6 results from an estimated 6 matches for "test_info".
2015 Jan 21
2
reducing redundant work in methods package
...truct test version of function
unlockBinding(fname, ns)
fun = get(fname, envir=ns, mode="function")
funbody = deparse(body(fun))
newfun <- fun
newfun.body = c(
sprintf("fname = '%s'", fname),
"TEST_INFO = list()",
"TEST_INFO$input = mget(names(formals(fname)))",
c("realfun <- function()", funbody),
"TEST_INFO$output = realfun()",
"TEST_ENV[[fname]] = c(TEST_ENV[[fname]], list(TEST_INFO))",...
2015 Jan 21
2
reducing redundant work in methods package
...name, envir=ns, mode="function")
>>
>> funbody = deparse(body(fun))
>>
>> newfun <- fun
>>
>> newfun.body = c(
>>
>> sprintf("fname = '%s'", fname),
>>
>> "TEST_INFO = list()",
>>
>> "TEST_INFO$input = mget(names(formals(fname)))",
>>
>> c("realfun <- function()", funbody),
>>
>> "TEST_INFO$output = realfun()",
>>
>> "TEST_E...
2015 Jan 21
0
reducing redundant work in methods package
...fname, ns)
>
> fun = get(fname, envir=ns, mode="function")
>
> funbody = deparse(body(fun))
>
> newfun <- fun
>
> newfun.body = c(
>
> sprintf("fname = '%s'", fname),
>
> "TEST_INFO = list()",
>
> "TEST_INFO$input = mget(names(formals(fname)))",
>
> c("realfun <- function()", funbody),
>
> "TEST_INFO$output = realfun()",
>
> "TEST_ENV[[fname]] = c(TEST_ENV[[fname]...
2015 Jan 22
0
reducing redundant work in methods package
...;)
>>>
>>> funbody = deparse(body(fun))
>>>
>>> newfun <- fun
>>>
>>> newfun.body = c(
>>>
>>> sprintf("fname = '%s'", fname),
>>>
>>> "TEST_INFO = list()",
>>>
>>> "TEST_INFO$input = mget(names(formals(fname)))",
>>>
>>> c("realfun <- function()", funbody),
>>>
>>> "TEST_INFO$output = realfun()",
>>>
>&...
2015 Mar 03
2
openssh-SNAP-20150304 issues
Damien Miller wrote:
>
> On Tue, 3 Mar 2015, The Doctor wrote:
>
>> regress/unittests/test_helper/test_helper.c: In function `test_data_file':
>> regress/unittests/test_helper/test_helper.c:177: warning: implicit declaration of function `strlcpy'
>> regress/unittests/test_helper/test_helper.c: At top level:
>>
2015 Mar 03
2
openssh-SNAP-20150304 issues
...} while (0)
extern char *__progname;
static int verbose_mode = 0;
static int quiet_mode = 0;
static char *active_test_name = NULL;
static u_int test_number = 0;
static test_onerror_func_t *test_onerror = NULL;
static void *onerror_ctx = NULL;
static const char *data_dir = NULL;
static char subtest_info[512];
int
main(int argc, char **argv)
{
int ch;
/* Handle systems without __progname */
if (__progname == NULL) {
__progname = strrchr(argv[0], '/');
if (__progname == NULL || __progname[1] == '\0')
__...