my @Tests =
(
- ['cycle-1', {IN => {f => "t b\nt s\ns t\n"}}, {OUT => ''}, {EXIT => 1},
+ ['cycle-1', {IN => {f => "t b\nt s\ns t\n"}}, {OUT => "s\nt\nb\n"},
+ {EXIT => 1},
{ERR => "tsort: f: input contains a loop:\ntsort: s\ntsort: t\n"} ],
- ['cycle-2', {IN => {f => "t x\nt s\ns t\n"}}, {OUT => ''}, {EXIT => 1},
+ ['cycle-2', {IN => {f => "t x\nt s\ns t\n"}}, {OUT => "s\nt\nx\n"},
+ {EXIT => 1},
{ERR => "tsort: f: input contains a loop:\ntsort: s\ntsort: t\n"} ],
['posix-1', {IN => "a b c c d e\ng g\nf g e f\nh h\n"},