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 / Elsif.pm

package Psh::Builtins::Elsif;

require Psh::Parser;
require Psh::Builtins::If;
require Psh;
require Psh::Util;

sub bi_elsif {
       return ($Psh::Builtins::If::last_success,undef) if $Psh::Builtins::If::last_success;
       return Psh::Builtins::If::bi_if(@_);
}