From db91d049e0db8300915cd78a2abb8dd9407e90c6 Mon Sep 17 00:00:00 2001
From: "Paul \"LeoNerd\" Evans" <leonerd@leonerd.org.uk>
Date: Sat, 10 Dec 2022 22:16:11 +0000
Subject: Token type `pval` should be a void * pointer

The `pval` field of the token type union is currently only used in one
place; storing the result of the infix operator plugin. Its use here
stores a structure pointer, not a string. The union should define this
field as a `void *` and not a `char *`.

In addition we should not attempt to debug print it as a string because
its value is not valid as one.
---
 perly.h | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'perly.h')

diff --git a/perly.h b/perly.h
index 60fcf6d891..d7a2f273ad 100644
--- a/perly.h
+++ b/perly.h
@@ -209,7 +209,7 @@ union YYSTYPE
 
     I32	ival; /* __DEFAULT__ (marker for regen_perly.pl;
 				must always be 1st union member) */
-    char *pval;
+    void *pval;
     OP *opval;
     GV *gvval;
 
@@ -226,6 +226,6 @@ int yyparse (void);
 
 
 /* Generated from:
- * 21f50be92bd623859b76b35d4165bcd0fbe33785929bfc0a6a522d266e86de40 perly.y
+ * d159cbbb0bfd3916708be07894588433a9434f9ade8adce98532533a9ea86747 perly.y
  * acf1cbfd2545faeaaa58b1cf0cf9d7f98b5be0752eb7a54528ef904a9e2e1ca7 regen_perly.pl
  * ex: set ro: */
-- 
cgit v1.2.1