File: 01-basic.t

package info (click to toggle)
liblatex-tom-perl 1.06-1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 304 kB
  • sloc: perl: 1,787; makefile: 2
file content (14 lines) | stat: -rwxr-xr-x 365 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
#!/usr/bin/perl

use strict;
use warnings;

use File::Spec;
use FindBin qw($Bin);
use LaTeX::TOM;
use Test::More tests => 2;

my $parser = LaTeX::TOM->new;
ok($parser->isa('LaTeX::TOM::Parser'), 'Parser object is-a LaTeX::TOM::Parser object');
my $tree = $parser->parseFile(File::Spec->catfile($Bin, 'data', 'tex.in'));
ok($tree, 'Parser returned a defined tree');