# NOTE: Derived from ../LIB\Getopt\Long.pm. # Changes made here will be lost when autosplit is run again. # See AutoSplit.pm. package Getopt::Long; #line 1019 "../LIB\Getopt\Long.pm (autosplit into ..\lib\auto\Getopt\Long\Croak.al)" # To prevent Carp from being loaded unnecessarily. sub Croak (@) { require 'Carp.pm'; $Carp::CarpLevel = 1; Carp::croak(@_); }; ################ Documentation ################ # Local Variables: # eval: (load-file "pod.el") # End: 1; # end of Getopt::Long::Croak