Debian lenny version packages
[pkg-perl] / deb-src / libtest-harness-perl / libtest-harness-perl-3.12 / t / sample-tests / todo_inline
diff --git a/deb-src/libtest-harness-perl/libtest-harness-perl-3.12/t/sample-tests/todo_inline b/deb-src/libtest-harness-perl/libtest-harness-perl-3.12/t/sample-tests/todo_inline
new file mode 100644 (file)
index 0000000..5b96d68
--- /dev/null
@@ -0,0 +1,6 @@
+print <<DUMMY_TEST;
+1..3
+not ok 1 - Foo # TODO Just testing the todo interface.
+ok 2 - Unexpected success # TODO Just testing the todo interface.
+ok 3 - This is not todo
+DUMMY_TEST