improve code as per ppport.h suggestions

I checked them all and they look sensible.
karenetheridge · Dec 7, 2017 · 66a934c · 66a934c
1 parent d31a074
commit 66a934c
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/Parser.xs b/Parser.xs
@@ -5,7 +5,7 @@
 #include "perl.h"
 #include "XSUB.h"
 
-#define NEED_PL_parser
+#define NEED_PL_parser_GLOBAL
 #include "ppport.h"
 
 #include "hook_parser.h"

diff --git a/stolen_chunk_of_toke.c b/stolen_chunk_of_toke.c
@@ -19,7 +19,7 @@
 
 #include "EXTERN.h"
 #include "perl.h"
-#define NEED_PL_parser
+#define NEED_sv_2pv_flags
 #include "ppport.h"
 
 /* the following #defines are stolen from assorted headers, not toke.c (mst) */
@@ -128,7 +128,7 @@ static const char c_in_subst[] =
 /* Invoke the idxth filter function for the current rsfp.	 */
 /* maxlen 0 = read one text line */
 I32
-Perl_filter_read(pTHX_ int idx, SV *buf_sv, int maxlen)
+filter_read(pTHX_ int idx, SV *buf_sv, int maxlen)
 {
     filter_t funcp;
     SV *datasv = NULL;