use PennMUSH;
use MUSHConnection;
use TestHarness;

$mush = PennMUSH->new();
$god = $mush->loginGod();

test('firstof.1', $god, 'think firstof(0,0,2)', '2');
test('firstof.2', $god, 'think firstof(2,0,0)', '2');
test('firstof.3', $god, 'think firstof(0,0,0)', '0');
test('firstof.4', $god, 'think firstof(1,2,3)', '1');
test('firstof.5', $god, 'think allof(0,0,2,)', '2');
test('firstof.6', $god, 'think allof(2,0,0,)', '2');
test('firstof.7', $god, 'think allof(0,0,0,)', '');
test('firstof.8', $god, 'think allof(1,2,3,)', '1 2 3');
test('firstof.9', $god, 'think allof(0,0,2,|)', '2');
test('firstof.10', $god, 'think allof(2,0,0,|)', '2');
test('firstof.11', $god, 'think allof(0,0,0,|)', '');
test('firstof.12', $god, 'think allof(1,2,3,|)', '1|2|3');