sys::os

# #############################################################
# ### Generated by GenerateVarMap.PL.
# ###
# ### Please edit the master and *not* this file.
# ### Date of render: Fri Mar  7 13:15:44 2008
##############################################################

package sys::os;

use strict;
use warnings;
use version;
our $VERSION = qv('0.2');

use Carp 'confess';
use Scalar::Util 'blessed';


BEGIN {
    my $EAGER_PRECALCULATED = {
        'name' => $^O,
    };

    sub __get_eager_var_value {
        my ($self, $var_name) = @_;
        confess "No eager variable with name ($var_name)"
            if not exists $EAGER_PRECALCULATED->{$var_name};
        return $EAGER_PRECALCULATED->{$var_name};
    }
}
use Class::Dot2;
{



    sub child_error {
                    if ($_[1]) {
                return $? = $_[1];
            };
        
                return $?; # SCALAR        
    }
    sub errno {
                    if ($_[1]) {
                return $! = $_[1];
            };
        
                return $!; # SCALAR        
    }
    sub extended_error {
                    if ($_[1]) {
                return $^E = $_[1];
            };
        
                return $^E; # SCALAR        
    }
    sub error {
                    if ($_[1]) {
                return $! = $_[1];
            };
        
                return $!; # SCALAR        
    }
    sub name {
                    if ($_[1]) {
                return $^O = $_[1];
            };
        
                return ($_[0]||__PACKAGE__)->__get_eager_var_value("name");
        
    }
    sub fd_max {
                    if ($_[1]) {
                return $^F = $_[1];
            };
        
                return $^F; # SCALAR        
    }

}

1;

# Local Variables:
#   mode: cperl
#   cperl-indent-level: 4
#   fill-column: 78
# End:
# vim: expandtab tabstop=4 shiftwidth=4 shiftround

__END__