silence compiler warning in perly.y

assigning a char from an I32 gives a warning. Add an explicit cast
as we know the int only ever holds a char.

1 files changed, 1 insertions, 1 deletions

diff --git a/perly.y b/perly.y
index 86e9681757..6ffe0516d0 100644
--- a/perly.y
+++ b/perly.y
@@ -659,7 +659,7 @@ sigslurpelem: sigslurpsigil sigvarname sigdefault/* def only to catch errors */
 
                             if (PL_parser->sig_slurpy)
                                 yyerror("Multiple slurpy parameters not allowed");
-                            PL_parser->sig_slurpy = sigil;
+                            PL_parser->sig_slurpy = (char)sigil;
 
                             if (defexpr)
                                 yyerror("A slurpy parameter may not have "