sub Croaker
{
- require Carp::Heavy; # this initializes %CarpInternal
+ require Carp; # this initializes %CarpInternal
local $Carp::CarpInternal{'warnings'};
delete $Carp::CarpInternal{'warnings'};
Carp::croak(@_);
}
sub _error_loc {
- require Carp::Heavy;
+ require Carp;
goto &Carp::short_error_loc; # don't introduce another stack frame
}