# Copyright (C) Brodie Gaslam
#
# This file is part of "vetr - Trust, but Verify"
#
# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation, either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# Go to <https://www.r-project.org/Licenses/GPL-2> for a copy of the license.
# redefine funs to give us flexibility if we change packages without having
# to export the internal functions

$success
[1] 1

$message
NULL

$df
[1] 0

$lvl
[1] 0

$success
[1] 0

$message
$message$message
[1] "be"      "\"ab\""  "is"      "\"abc\""

$message$wrap
$message$wrap[[1]]
NULL[1]

$message$wrap[[2]]
$message$wrap[[2]][[1]]
NULL

$message$wrap[[2]][[2]]
[1] 1




$df
[1] 0

$lvl
[1] 0

$success
[1] 0

$message
$message$message
[1] "be"      "\"NA\""  "is"      "\"abc\""

$message$wrap
$message$wrap[[1]]
NULL[1]

$message$wrap[[2]]
$message$wrap[[2]][[1]]
NULL

$message$wrap[[2]][[2]]
[1] 1




$df
[1] 0

$lvl
[1] 0

$success
[1] 0

$message
$message$message
[1] "be"     "\"ab\"" "is"     "\"NA\""

$message$wrap
$message$wrap[[1]]
NULL[1]

$message$wrap[[2]]
$message$wrap[[2]][[1]]
NULL

$message$wrap[[2]][[2]]
[1] 1




$df
[1] 0

$lvl
[1] 0

$success
[1] 0

$message
$message$message
[1] "be"                  "identical to target" ""                   
[4] ""                   

$message$wrap
$message$wrap[[1]]
NULL

$message$wrap[[2]]
NULL



$df
[1] 0

$lvl
[1] 0

# Note third argument is left in for legacy reasons but doesn't actually do
# anything

$success
[1] 0

$message
$message$message
[1] "be"    "\"a\"" "is"    "\"c\""

$message$wrap
$message$wrap[[1]]
class(NULL)[1]

$message$wrap[[2]]
$message$wrap[[2]][[1]]
NULL




$df
[1] 0

$lvl
[1] 0