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, 2 insertions, 2 deletions

diff --git a/perly.act b/perly.act
index 9a4d97f4db..878b1dffcf 100644
--- a/perly.act
+++ b/perly.act
@@ -823,7 +823,7 @@ case 2:
 
                             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 "
@@ -1974,6 +1974,6 @@ case 2:
     
 
 /* Generated from:
- * 6abff06962c5ffb0c02363367269b330880b959867adae19ce57f4d14885b088 perly.y
+ * 218308e5b4f3720eeeba65e3c85ff9d92b85ab8f32d53eb3cbdaa99790b03a63 perly.y
  * 3e1dff60f26df8933d7aed0c0e87177a0f022c14800c0707eb62a7db4196ac98 regen_perly.pl
  * ex: set ro: */