elvish/pkg/eval/builtin_fn_str_test.go
Kurtis Rader 87656c99fa Replace AnyError in tests with a specific error
The `AnyError` placeholder error can cause tests to succeed for errors
other than what was expected. That is, the use of `AnyError` can mask
bugs in a unit test. So replace it with the specific error, or error type,
the test expects to be raised.

This does not remove the anyError structure because it is used in
the TestCase.DoesNotCompile() method. To keep the size of this change
as small as possible I want to defer updating that use to a separate
change. However, remove the public AnyError var so future test writers
don't attempt to use it.
2021-12-13 01:08:24 +00:00

92 lines
2.0 KiB
Go

package eval_test
import (
"testing"
. "src.elv.sh/pkg/eval"
. "src.elv.sh/pkg/eval/evaltest"
)
func TestStringComparisonCommands(t *testing.T) {
Test(t,
That(`<s a b`).Puts(true),
That(`<s 2 10`).Puts(false),
That(`<=s a a`).Puts(true),
That(`<=s a b`).Puts(true),
That(`<=s b a`).Puts(false),
That(`==s haha haha`).Puts(true),
That(`==s 10 10.0`).Puts(false),
That(`!=s haha haha`).Puts(false),
That(`!=s 10 10.1`).Puts(true),
That(`>s a b`).Puts(false),
That(`>s 2 10`).Puts(true),
That(`>=s a a`).Puts(true),
That(`>=s a b`).Puts(false),
That(`>=s b a`).Puts(true),
)
}
func TestToString(t *testing.T) {
Test(t,
That(`to-string str (num 1) $true`).Puts("str", "1", "$true"),
thatOutputErrorIsBubbled("to-string str"),
)
}
func TestBase(t *testing.T) {
Test(t,
That(`base 2 1 3 4 16 255`).Puts("1", "11", "100", "10000", "11111111"),
That(`base 16 42 233`).Puts("2a", "e9"),
That(`base 1 1`).Throws(ErrBadBase),
That(`base 37 10`).Throws(ErrBadBase),
thatOutputErrorIsBubbled("base 2 1"),
)
}
func TestWcswidth(t *testing.T) {
Test(t,
That(`wcswidth 你好`).Puts(4),
That(`-override-wcwidth x 10; wcswidth 1x2x; -override-wcwidth x 1`).
Puts(22),
)
}
func TestEawk(t *testing.T) {
Test(t,
That(`echo " ax by cz \n11\t22 33" | eawk {|@a| put $a[-1] }`).
Puts("cz", "33"),
// Bad input type
That(`num 42 | eawk {|@a| fail "this should not run" }`).
Throws(ErrInputOfEawkMustBeString),
// Propagation of exception
That(`
to-lines [1 2 3 4] | eawk {|@a|
if (==s 3 $a[1]) {
fail "stop eawk"
}
put $a[1]
}
`).Puts("1", "2").Throws(FailError{"stop eawk"}),
// break
That(`
to-lines [" a" "b\tc " "d" "e"] | eawk {|@a|
if (==s d $a[1]) {
break
} else {
put $a[-1]
}
}
`).Puts("a", "c"),
// continue
That(`
to-lines [" a" "b\tc " "d" "e"] | eawk {|@a|
if (==s d $a[1]) {
continue
} else {
put $a[-1]
}
}
`).Puts("a", "c", "e"),
)
}