}
if (($n = describe('Error Bar Colors', $p->GET_error_bar_colors())) != $e_error_colors) {
$error .= " Error Bar Colors status {$n} expecting {$e_error_colors}\n";
}
if (empty($error)) {
$n_pass++;
} else {
$n_fail++;
echo "Failed test case {$n_tests}: {$name}\n{$error}";
}
}
# ===== Test Cases =====
$p = new PHPlot_pv();
# Use an internal variable to determine the PHPlot version. After this variable
# was introduced, the color maps expanded.
if ($p->HAS_default_colors()) {
$dcol = 16;
$ecol = 16;
$bcol = 1;
} else {
$dcol = 8;
$ecol = 8;
$bcol = 1;
}
test('New PHPlot object', $p, $dcol, $bcol, $ecol);
$p->SetDataColors('red');
$p->SetDataBorderColors('blue');
$p->SetErrorBarColors('green');
test('Then set color arrays to single word', $p, 1, 1, 1);
$p = new PHPlot_pv();
$p->SetDataColors($c6);
