PennMUSH Community

root/1.8.3/trunk/test/testfirstof.pl

Revision 1117, 0.6 kB (checked in by shawnw, 11 months ago)

Merge with devel

Line 
1 run tests:
2 test('firstof.1', $god, 'think firstof(0,0,2)', '2');
3 test('firstof.2', $god, 'think firstof(2,0,0)', '2');
4 test('firstof.3', $god, 'think firstof(0,0,0)', '0');
5 test('firstof.4', $god, 'think firstof(1,2,3)', '1');
6 test('firstof.5', $god, 'think allof(0,0,2,)', '2');
7 test('firstof.6', $god, 'think allof(2,0,0,)', '2');
8 test('firstof.7', $god, 'think allof(0,0,0,)', '');
9 test('firstof.8', $god, 'think allof(1,2,3,)', '1 2 3');
10 test('firstof.9', $god, 'think allof(0,0,2,|)', '2');
11 test('firstof.10', $god, 'think allof(2,0,0,|)', '2');
12 test('firstof.11', $god, 'think allof(0,0,0,|)', '');
13 test('firstof.12', $god, 'think allof(1,2,3,|)', '1|2|3');
Note: See TracBrowser for help on using the browser.