The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict; use warnings;

use TestML::Runtime;

package TestML::Util;

use Exporter 'import';
our @EXPORT = qw( runtime list str num bool none native );

sub runtime { $TestML::Runtime::Singleton }

sub list { TestML::List->new(value => $_[0]) }
sub str { TestML::Str->new(value => $_[0]) }
sub num { TestML::Num->new(value => $_[0]) }
sub bool { TestML::Bool->new(value => $_[0]) }
sub none { TestML::None->new(value => $_[0]) }
sub native { TestML::Native->new(value => $_[0]) }

1;