public function testNull()
{
asrt(setget("NULL"), "NULL");
asrt(setget("NULL"), "NULL");
asrt(setget("0123"), "0123");
asrt(setget("0000123"), "0000123");
asrt(setget(NULL), NULL);
asrt(setget(0) == 0, TRUE);
asrt(setget(1) == 1, TRUE);
asrt(setget(TRUE) == TRUE, TRUE);
asrt(setget(FALSE) == FALSE, TRUE);
// minor test sqltest
$a = R::getWriter()->sqlStateIn('000', array());
// Unknown state must return FALSE.
asrt($a, FALSE);
try {
R::getWriter()->esc('`aaa`');
fail();
} catch (\Exception $e) {
pass();
}
asrt($e instanceof RedException, TRUE);
}