diff options
author | Jim Meyering <jim@meyering.net> | 1998-06-07 14:08:40 +0000 |
---|---|---|
committer | Jim Meyering <jim@meyering.net> | 1998-06-07 14:08:40 +0000 |
commit | 5d59e186181a68d2af8aca0c2cab5f0f379ce382 (patch) | |
tree | 7a5139585953ea81693ce7532b3f8ff9c4fc1b34 /tests/test | |
parent | 94ff35fc2ddd62125303d8f12b6eeb1350f69167 (diff) | |
download | coreutils-5d59e186181a68d2af8aca0c2cab5f0f379ce382.tar.xz |
*** empty log message ***
Diffstat (limited to 'tests/test')
-rw-r--r-- | tests/test/Test.pm | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/tests/test/Test.pm b/tests/test/Test.pm index 3f739d41c..b584a8a87 100644 --- a/tests/test/Test.pm +++ b/tests/test/Test.pm @@ -19,6 +19,11 @@ sub test_vector ['1c', 'any-string', {}, '', 0], ['1d', '-n any-string', {}, '', 0], + ['eq-1', 't = t', {}, '', 0], + ['eq-2', 't = f', {}, '', 1], + ['ne-1', 't != t', {}, '', 1], + ['ne-2', 't != f', {}, '', 0], + ['and-1', 't -a t', {}, '', 0], ['and-2', '"" -a t', {}, '', 1], ['and-3', 't -a ""', {}, '', 1], @@ -29,6 +34,33 @@ sub test_vector ['or-3', 't -o ""', {}, '', 0], ['or-4', '"" -o ""', {}, '', 1], + ['ieq-1', '9 -eq 9', {}, '', 0], + ['ieq-2', '0 -eq 0', {}, '', 0], + ['ieq-3', '0 -eq 00', {}, '', 0], + ['ieq-4', '8 -eq 9', {}, '', 1], + ['ieq-5', '1 -eq 0', {}, '', 1], + ['ieq-6', '0x0 -eq 00', {}, '', 1], + + ['ge-1', '5 -ge 5', {}, '', 0], + ['ge-2', '5 -ge 4', {}, '', 0], + ['ge-3', '4 -ge 5', {}, '', 1], + ['ge-4', '-1 -ge -2', {}, '', 0], + + ['gt-1', '5 -gt 5', {}, '', 1], + ['gt-2', '5 -gt 4', {}, '', 0], + ['gt-3', '4 -gt 5', {}, '', 1], + ['gt-4', '-1 -gt -2', {}, '', 0], + + ['le-1', '5 -le 5', {}, '', 0], + ['le-2', '5 -le 4', {}, '', 1], + ['le-3', '4 -le 5', {}, '', 0], + ['le-4', '-1 -le -2', {}, '', 1], + + ['lt-1', '5 -lt 5', {}, '', 1], + ['lt-2', '5 -lt 4', {}, '', 1], + ['lt-3', '4 -lt 5', {}, '', 0], + ['lt-4', '-1 -lt -2', {}, '', 1], + ['t1', "-t", {}, '', 1], ['t2', "-t 1", {}, '', 1], ); |