Commits

Toby Inkster committed 3faa4f8

rename private functions (rt#86838)

Comments (0)

Files changed (1)

lib/Devel/PL_origargv.pm

 our $VERSION   = '0.002';
 
 use Inline C => q{
-	int _argc () {
+	int _my_argc () {
 		return PL_origargc;
 	}
-	char* _argv (int x) {
+	char* _my_argv (int x) {
 		return PL_origargv[x - 1];
 	}
 };
 
 sub get {
-	return _argc unless wantarray;
-	map _argv($_), 1 .. _argc;
+	return _my_argc unless wantarray;
+	map _my_argv($_), 1 .. _my_argc;
 }
 
 __PACKAGE__