This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
utf8.c: Avoid some unnecessary work
[perl5.git] / scope.h
diff --git a/scope.h b/scope.h
index 9a504f1..c6f4bc4 100644 (file)
--- a/scope.h
+++ b/scope.h
@@ -8,7 +8,7 @@
  *
  */
 
-/* *** these are ordered by number of of auto-popped args */
+/* *** Update arg_counts[] in scope.c if you modify these */
 
 /* zero args */
 
@@ -17,8 +17,6 @@
 #define SAVEt_CLEARSV          2
 #define SAVEt_REGCONTEXT       3
 
-#define SAVEt_ARG0_MAX         3
-
 /* one arg */
 
 #define SAVEt_TMPSFLOOR                4
@@ -41,8 +39,6 @@
 #define SAVEt_READONLY_OFF     21
 #define SAVEt_FREEPADNAME      22
 
-#define SAVEt_ARG1_MAX         22
-
 /* two args */
 
 #define SAVEt_AV               23
@@ -71,8 +67,6 @@
 #define SAVEt_ADELETE          46
 #define SAVEt_APTR             47
 
-#define SAVEt_ARG2_MAX         47
-
 /* three args */
 
 #define SAVEt_HELEM            48
@@ -173,19 +167,15 @@ Opening bracket on a callback.  See C<L</LEAVE>> and L<perlcall>.
 =for apidoc Ams||LEAVE
 Closing bracket on a callback.  See C<L</ENTER>> and L<perlcall>.
 
-=over
+=for apidoc Ams||ENTER_with_name(name)
 
-=item ENTER_with_name(name)
-
-Same as C<ENTER>, but when debugging is enabled it also associates the
+Same as C<L</ENTER>>, but when debugging is enabled it also associates the
 given literal string with the new scope.
 
-=item LEAVE_with_name(name)
-
-Same as C<LEAVE>, but when debugging is enabled it first checks that the
-scope has the given name. C<name> must be a C<NUL>-terminated literal string.
+=for apidoc Ams||LEAVE_with_name(name)
 
-=back
+Same as C<L</LEAVE>>, but when debugging is enabled it first checks that the
+scope has the given name. C<name> must be a literal string.
 
 =cut
 */