From f19710fbc5f10ef1c51705506039c388cf5a5b22 Mon Sep 17 00:00:00 2001
From: Karl Williamson <khw@cpan.org>
Date: Fri, 20 May 2022 15:40:38 -0600
Subject: perlapi: Document start_subparse

---
 toke.c | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

(limited to 'toke.c')

diff --git a/toke.c b/toke.c
index ea9905044e..2022c9bcf8 100644
--- a/toke.c
+++ b/toke.c
@@ -12413,6 +12413,23 @@ S_scan_formline(pTHX_ char *s)
     return s;
 }
 
+/*
+=for apidoc start_subparse
+
+Set things up for parsing a subroutine.
+
+If C<is_format> is non-zero, the input is to be considered a format sub
+(a specialised sub used to implement perl's C<format> feature); else a
+normal C<sub>.
+
+C<flags> are added to the flags for C<PL_compcv>.
+
+This returns the value of C<PL_savestack_ix> that was in effect upon entry to
+the function;
+
+=cut
+*/
+
 I32
 Perl_start_subparse(pTHX_ I32 is_format, U32 flags)
 {
-- 
cgit v1.2.1