X-Git-Url: http://git.ozlabs.org/?p=ccan;a=blobdiff_plain;f=ccan_tools%2Flibtap%2Ftests%2Fok%2Fok%2Ftest.pl;fp=ccan_tools%2Flibtap%2Ftests%2Fok%2Fok%2Ftest.pl;h=0000000000000000000000000000000000000000;hp=5ea966ef20af60f5064e3128d70659a57f7eea73;hb=89afb563a8fea1e1c6d4bbcc6b1c51aa6cc8f045;hpb=2d6759d42218bef651c0ece58fe36212099a313c

diff --git a/ccan_tools/libtap/tests/ok/ok/test.pl b/ccan_tools/libtap/tests/ok/ok/test.pl
deleted file mode 100644
index 5ea966ef..00000000
--- a/ccan_tools/libtap/tests/ok/ok/test.pl
+++ /dev/null
@@ -1,25 +0,0 @@
-#!/usr/bin/perl
-
-use warnings;
-use strict;
-
-use Test::More;
-
-my $rc = 0;
-
-plan tests => 5;
-
-$rc = ok(1 == 1, '1 equals 1');	# Test ok() passes when it should
-diag("Returned: $rc");
-
-$rc = ok(1 == 1, '1 equals 1'); # Used for %d testing in test.c
-diag("Returned: $rc");
-
-$rc = ok(1 == 1, '1 == 1');	# Test ok1() passes when it should
-diag("Returned: $rc");
-
-$rc = ok(1 == 2, '1 equals 2');	# Test ok() fails when it should
-diag("Returned: $rc");
-
-$rc = ok(1 == 2, '1 == 2');	# Test ok1() fails when it should
-diag("Returned: $rc");