Add support for prototypes

[perl/modules/Sub-Op.git] / sub_op.h

diff --git a/sub_op.h b/sub_op.h
index 34d557192aaf899e532c34b1b5ef721a9725f3d8..12db02551516e54096a0487ff0b96ca653683a9c 100644 (file)
--- a/sub_op.h
+++ b/sub_op.h
@@ -9,6 +9,8 @@ typedef OP *(*sub_op_check_t)(pTHX_ OP *, void *);
 typedef struct {
  const char    *name;
  STRLEN         namelen;
+ const char    *proto;
+ STRLEN         protolen;
  Perl_ppaddr_t  pp;
  sub_op_check_t check;
  void          *ud;