1 files changed, 0 insertions, 44 deletions
diff --git a/contrib/perl5/t/pragma/warn/mg b/contrib/perl5/t/pragma/warn/mg
deleted file mode 100644
index a8f9dbc..0000000
--- a/contrib/perl5/t/pragma/warn/mg
+++ /dev/null
@@ -1,44 +0,0 @@
-  mg.c	AOK
-
-  No such signal: SIG%s
-    $SIG{FRED} = sub {}
-
-  SIG%s handler \"%s\" not defined.
-    $SIG{"INT"} = "ok3"; kill "INT",$$;
-
-  Mandatory Warnings TODO
-  ------------------
-  Can't break at that line	[magic_setdbline]
-
-__END__
-# mg.c
-use warnings 'signal' ;
-$SIG{FRED} = sub {};
-EXPECT
-No such signal: SIGFRED at - line 3.
-########
-# mg.c
-no warnings 'signal' ;
-$SIG{FRED} = sub {};
-EXPECT
-
-########
-# mg.c
-use warnings 'signal' ;
-if ($^O eq 'MSWin32' || $^O eq 'VMS') {
-    print "SKIPPED\n# $^O, can't kill() to raise()\n"; exit;
-}
-$|=1;
-$SIG{"INT"} = "fred"; kill "INT",$$;
-EXPECT
-SIGINT handler "fred" not defined.
-########
-# mg.c
-no warnings 'signal' ;
-if ($^O eq 'MSWin32' || $^O eq 'VMS') {
-    print "SKIPPED\n# win32, can't kill() to raise()\n"; exit;
-}
-$|=1;
-$SIG{"INT"} = "fred"; kill "INT",$$;
-EXPECT
-