Remove two tests from proto.t

These have been superseded by t/op/cproto.t, which came later.

1 files changed, 1 insertions, 9 deletions

diff --git a/t/comp/proto.t b/t/comp/proto.t
index b5c8cf2590..241fd829af 100644
--- a/t/comp/proto.t
+++ b/t/comp/proto.t
@@ -18,7 +18,7 @@ BEGIN {
 # strict
 use strict;
 
-print "1..172\n";
+print "1..170\n";
 
 my $i = 1;
 
@@ -587,14 +587,6 @@ for my $p ( "", qw{ () ($) ($@) ($%) ($;$) (&) (&\@) (&@) (%) (\%) (\@) } ) {
   }
 }
 
-# Not $$;$;$
-print "not " unless prototype "CORE::substr" eq '$$;$$';
-print "ok ", $i++, "\n";
-
-# recv takes a scalar reference for its second argument
-print "not " unless prototype "CORE::recv" eq '*\\$$$';
-print "ok ", $i++, "\n";
-
 {
     my $myvar;
     my @myarray;