Silence a switch warning

[perl/modules/Scope-Upper.git] / Upper.xs

diff --git a/Upper.xs b/Upper.xs
index 7a2a79a114ee1330709ad1019286c0ba3aa0b1e1..61f8560e5bf4b957971e31d2d65260f41984ef66 100644 (file)
--- a/Upper.xs
+++ b/Upper.xs
@@ -401,6 +401,7 @@ STATIC void su_ud_localize_init(pTHX_ su_ud_localize *ud, SV *sv, SV *val, SV *e
   case SVt_PVCV:
   case SVt_PVGV:
    deref = 0;
+  default:
    break;
  }
  /* When deref is set, val isn't NULL */