[perl5.git] / t / lib / sample-tests / todo_inline

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
Commit	Line	Data
2fe373ce MS	1	print <<DUMMY_TEST;
	2	1..3
	3	not ok 1 - Foo # TODO Just testing the todo interface.
	4	ok 2 - Unexpected success # TODO Just testing the todo interface.
	5	ok 3 - This is not todo
	6	DUMMY_TEST