1# regression tests for the tsort utilitiy 2 3KEEP "*.dat" 4 5TEST 01 'basics' 6 EXEC 7 INPUT - $'a a' 8 OUTPUT - $'a' 9 EXEC 10 INPUT - $'a a b b' 11 OUTPUT - $'a\nb' 12 EXEC 13 INPUT - $'a c\na b\nb c' 14 OUTPUT - $'a\nb\nc' 15 EXEC 16 INPUT - $'a b\nb c\nc a' 17 OUTPUT - $'a\nb\nc' 18 ERROR - $'tsort: warning: cycle in data\ntsort: a\ntsort: b\ntsort: c' 19 EXIT 1 20 EXEC 21 INPUT - $'a' 22 OUTPUT - 23 ERROR - $'tsort: odd data' 24 25TEST 02 'how did this slip through?' 26 EXEC 27 INPUT - $'b c\na c\na b' 28 OUTPUT - $'a\nb\nc' 29