File Coverage

blib/lib/Rosetta.pm

Criterion	Covered	Total	%
statement	13	15	86.6
branch			n/a
condition			n/a
subroutine	5	5	100.0
pod			n/a
total	18	20	90.0

#!perl
use 5.008001;
use utf8;
use strict;
use warnings;

# External packages used by packages in this file, that don't export symbols:
use only 'Locale::KeyedText' => '1.72.0-';
use only 'Rosetta::Model' => '0.724.0';

###########################################################################
###########################################################################

# Constant values used by packages in this file:
use only 'Readonly' => '1.03-';
# (None Yet)

###########################################################################
###########################################################################

{ package Rosetta; # package
    use version; our $VERSION = qv('0.724.0');
    # Note: This given version applies to all of this file's packages.
} # package Rosetta

###########################################################################
###########################################################################

{ package Rosetta::Interface::DBMS; # class

    # External packages used by the Rosetta::Interface::DBMS class, that do export symbols:
    use only 'Class::Std' => '0.0.8-';
    use only 'Class::Std::Utils' => '0.0.2-';

    # Attributes of every Rosetta::Interface::DBMS object:
    # (None Yet)

###########################################################################

sub BUILD {
    my ($self, $ident, $arg_ref) = @_;
    my $engine_name = $arg_ref->{'engine_name'};

    # This is a quick hack that just tests if the Engine module loads or not.
    # It WILL be replaced.
    eval "require $engine_name;";
    die $@
        if $@;

    return;
}

###########################################################################

} # class Rosetta::Interface::DBMS

###########################################################################
###########################################################################

{ package Rosetta::Interface::Exception; # class

    # External packages used by the Rosetta::Interface::Exception class, that do export symbols:
    use only 'Class::Std' => '0.0.8-';
    use only 'Class::Std::Utils' => '0.0.2-';

    # Attributes of every Rosetta::Interface::Exception object:
    # (None Yet)

###########################################################################



###########################################################################

} # class Rosetta::Interface::Exception

###########################################################################
###########################################################################

{ package Rosetta::Interface::Command; # class

    # External packages used by the Rosetta::Interface::Command class, that do export symbols:
    use only 'Class::Std' => '0.0.8-';
    use only 'Class::Std::Utils' => '0.0.2-';

    # Attributes of every Rosetta::Interface::Command object:
    # (None Yet)

###########################################################################



###########################################################################

} # class Rosetta::Interface::Command

###########################################################################
###########################################################################

{ package Rosetta::Interface::Value; # class

    # External packages used by the Rosetta::Interface::Value class, that do export symbols:
    use only 'Class::Std' => '0.0.8-';
    use only 'Class::Std::Utils' => '0.0.2-';

    # Attributes of every Rosetta::Interface::Value object:
    # (None Yet)

###########################################################################



###########################################################################

} # class Rosetta::Interface::Value

###########################################################################
###########################################################################

{ package Rosetta::Interface::Variable; # class

    # External packages used by the Rosetta::Interface::Variable class, that do export symbols:
    use only 'Class::Std' => '0.0.8-';
    use only 'Class::Std::Utils' => '0.0.2-';

    # Attributes of every Rosetta::Interface::Variable object:
    # (None Yet)

###########################################################################



###########################################################################

} # class Rosetta::Interface::Variable

###########################################################################
###########################################################################

1; # Magic true value required at end of a reuseable file's code.
__END__