perl5.000 patch.0j: fix minor portability and build problems remaining even after...
[p5sagit/p5-mst-13.2.git] / pp_sys.c
index 71ab257..d25d156 100644 (file)
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -2933,7 +2933,6 @@ PP(pp_alarm)
     RETURN;
 #else
     DIE(no_func, "Unsupported function alarm");
-    break;
 #endif
 }