### ----------------------------------------------------
### -- PDF::Font::Loader::HarfBuzz
### -- Licenses: Artistic-2.0
### -- Authors: 
### -- File: t/01-basic.rakutest
### ----------------------------------------------------
use Test;
plan 2;
use PDF::Font::Loader::HarfBuzz;
use PDF::Font::Loader;
use PDF::Grammar::Test :&is-json-equiv;
use PDF::Content::FontObj;
my PDF::Content::FontObj $vera = PDF::Font::Loader.load-font: :file<t/fonts/Vera.ttf>, :!subset;
is-json-equiv $vera.shape("RVX" ), (["\0\c[53]", 55, "\0\c[57]", 27, "\0\c[59]"], 2064 - 55), '.shape(...)';

is-json-equiv $vera.shape("RVX", :!kern ), (["\0\c[53]" ~ "\0\c[57]"~"\0\c[59]"], 2064), '.shape(:!kern)';

done-testing;


