NAME

FAST - Library for Flowchart Abstract Syntax Tree

SYNOPSIS

use FAST;

$src = <<'.';
entry => <p>
<p> => [c]
[c] => <q>
<p> => [a]
<q> => <p>
<q> => exit
[a] => [b]
[b] => exit
.

# Load from string:
$g = FAST->new(\$src) or
    die FAST->error;

# Load from disk file:
$g = FAST->new('foo.in') or
    die FAST->error;

# Generate PNG image:
$g->as_png('blah.png');

# Or return the image data directly:
$bin_data = $g->as_png;

# Generate pseud assembly code dipicting the flowchart:
$g->as_asm('blah.asm');

# Or return the ASM code directly:
$asm_src = $g->as_asm;

DESCRIPTION

CODE COVERAGE

I use Devel::Cover to test the code coverage of my tests, below is the Devel::Cover report on this module's test suite (version 0.01 rev 317):

---------------------------- ------ ------ ------ ------ ------ ------ ------
File                           stmt   bran   cond    sub    pod   time  total
---------------------------- ------ ------ ------ ------ ------ ------ ------
blib/lib/FAST.pm               97.6   91.1   90.0  100.0    0.0   34.2   93.5
blib/lib/FAST/Element.pm      100.0    n/a   33.3  100.0    0.0   18.4   88.7
blib/lib/FAST/Node.pm         100.0  100.0  100.0  100.0    0.0   18.4   87.1
blib/lib/FAST/Struct.pm       100.0  100.0  100.0  100.0    0.0    2.6   95.2
blib/lib/FAST/Struct/If.pm    100.0   75.0  100.0  100.0    0.0   18.4   86.9
blib/lib/FAST/Struct/Seq.pm    98.1   83.3   77.8  100.0    0.0    7.9   84.7
.../lib/FAST/Struct/While.pm  100.0   50.0  100.0  100.0    0.0    0.0   84.9
Total                          98.5   90.4   86.7  100.0    0.0  100.0   90.6
---------------------------- ------ ------ ------ ------ ------ ------ ------

AUTHOR

Agent Zhang mailto:agentzh@gmail.com

COPYRIGHT

Copyright (c) 2006 Agent Zhang

This library is free software. You can redistribute it and/or modify it under the same terms as Perl itself.