X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FScope-Upper.git;a=blobdiff_plain;f=Upper.xs;h=450945a184be2cc46baad9598cbd4bb5d47eccc1;hp=a843325e445509ac4e10cec4bef7c92bf1112633;hb=cea004750ddd2c289052c7e08a5aa130cf54fe2e;hpb=2c74bc4090aec08eb60c71526ead3e249c6573c3

diff --git a/Upper.xs b/Upper.xs
index a843325..450945a 100644
--- a/Upper.xs
+++ b/Upper.xs
@@ -1396,8 +1396,6 @@ static void su_yield(pTHX_ void *ud_) {
  U8      flags = 0;
  OP     *next;
 
- PERL_UNUSED_VAR(ud_);
-
  cx = cxstack + cxix;
  switch (CxTYPE(cx)) {
   case CXt_BLOCK: {