X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FSub-Op.git;a=blobdiff_plain;f=lib%2FSub%2FOp.pm;h=a7ad9f9cbd8081eb8fa66833516d5f6bbac6bce5;hp=dbcdcd2a46ff0582efb085169afdacbc92a50198;hb=0661466030b3dd0fb805da10aaed883fbe931093;hpb=4c1ada5fa7e7a266479669bdcaa60b33ada4c9c1

diff --git a/lib/Sub/Op.pm b/lib/Sub/Op.pm
index dbcdcd2..a7ad9f9 100644
--- a/lib/Sub/Op.pm
+++ b/lib/Sub/Op.pm
@@ -52,8 +52,9 @@ In your XS file :
      sub_op_keyword k;
      k.name  = "reftype";
      k.len   = sizeof("reftype")-1;
-     k.check = 0;
      k.pp    = scalar_util_reftype;
+     k.check = 0;
+     k.ud    = NULL;
      sub_op_register(aTHX_ &k);
     }