view Lib/IMPL/lang.pm @ 164:eb3e9861a761

SQL traits in progress
author wizard
date Mon, 28 Mar 2011 01:36:24 +0400
parents
children 76515373dac0
line wrap: on
line source

package IMPL::lang;
use strict;
use warnings;

use IMPL::base qw(Exporter);
use IMPL::_core::version;


our @EXPORT = qw(&is);

sub is($$) {
	eval { $_[0]->isa($_[1]) }
}

1;