Initial commit of OpenSPARC T2 design and verification files.

[OpenSPARC-T2-DV] / tools / perl-5.8.0 / lib / site_perl / 5.8.0 / Psh / Builtins / Builtin.pm

package Psh::Builtins::Builtin;

require Psh::Strategy;
require Psh::Util;

=item * C<builtin COMMAND [ARGS]>

Run a shell builtin.

=cut

sub bi_builtin {
	my $text= shift;
	if (Psh::Strategy::active('built_in')) {
		return Psh::evl($text,'built_in','fallback_builtin');
	} else {
		print_error_i18n('bi_builtin_inactive');
		return (0,undef);
	}
}

sub cmpl_builtin {
	return cmpl_help(@_);
}

1;