pennmush/test/teststringsecs.pl
captdeaf@gmail.com 5c4f9c4a64 Initial google code commit.
git-svn-id: https://pennmush.googlecode.com/svn/trunk@2 ba372814-4f39-11de-9ad6-1127a62b9fcd
2009-06-02 06:18:54 +00:00

12 lines
643 B
Raku

login mortal
run tests:
test('stringsecs.1', $mortal, 'think stringsecs(a)', '#-1 INVALID TIMESTRING');
test('stringsecs.2', $mortal, 'think stringsecs(10)', '10');
test('stringsecs.3', $mortal, 'think stringsecs(10s)', '10');
test('stringsecs.4', $mortal, 'think stringsecs(5m)', '300');
test('stringsecs.5', $mortal, 'think stringsecs(5m 10s)', '310');
test('stringsecs.6', $mortal, 'think stringsecs(1h)', '3600');
test('stringsecs.7', $mortal, 'think stringsecs(10s 5m)', '310');
test('stringsecs.8', $mortal, 'think stringsecs(1d 2h 3m 4s)', '93784');
test('stringsecs.9', $mortal
, 'think stringsecs(h)', '#-1 INVALID TIMESTRING');