Bram Moolenaar wrote:
> Dominique wrote:
>
>> Float functions (sqrt(), sin(), tan(), etc.) are not tested
>> according to coveralls. Attached patch adds tests.
>
> Thanks. I'll wait for the updated version.
Attached is the updated version.
While testing, I found what looks like a possible small bug:
:echo str2float(" + 1.2")
1.2
:echo str2float(" - 1.2")
0.0
I would expect 2nd command to print -1.2, or is
there a reason for non-symmetrical behavior?
Regards
Dominique
--
--
You received this message from the "vim_dev" maillist.
Do not top-post! Type your reply below the text you are replying to.
For more information, visit http://www.vim.org/maillist.php
---
You received this message because you are subscribed to the Google Groups
"vim_dev" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
For more options, visit https://groups.google.com/d/optout.
diff --git a/src/testdir/test_alot.vim b/src/testdir/test_alot.vim
index d24b97f..6e989f6 100644
--- a/src/testdir/test_alot.vim
+++ b/src/testdir/test_alot.vim
@@ -16,6 +16,7 @@ source test_file_perm.vim
source test_fileformat.vim
source test_filter_cmd.vim
source test_filter_map.vim
+source test_float_func.vim
source test_fnamemodify.vim
source test_glob2regpat.vim
source test_goto.vim
diff --git a/src/testdir/test_float_func.vim b/src/testdir/test_float_func.vim
new file mode 100644
index 0000000..ba0ee2d
--- /dev/null
+++ b/src/testdir/test_float_func.vim
@@ -0,0 +1,263 @@
+" test float functions
+
+if !has('float')
+ finish
+end
+
+func Test_abs()
+ call assert_equal(string(abs(-1)), '1')
+ call assert_equal(string(abs(1.23)), '1.23')
+ call assert_equal(string(abs(-1.23)), '1.23')
+ call assert_equal(string(abs(0.0)), '0.0')
+ call assert_equal(string(abs(1.0/(1.0/0.0))), '0.0')
+ call assert_equal(string(abs(-1.0/(1.0/0.0))), '0.0')
+ call assert_equal(string(abs(1.0/0.0)), 'inf')
+ call assert_equal(string(abs(-1.0/0.0)), 'inf')
+ call assert_equal(string(abs(0.0/0.0)), 'nan')
+ call assert_equal(string(abs('-12abc')), '12')
+ call assert_fails("call abs([])", 'E745:')
+ call assert_fails("call abs({})", 'E728:')
+ call assert_fails("call abs(function('string'))", 'E703:')
+endfunc
+
+func Test_sqrt()
+ call assert_equal(string(sqrt(0.0)), '0.0')
+ call assert_equal(string(sqrt(2.0)), '1.414214')
+ call assert_equal(string(sqrt(1.0/0.0)), 'inf')
+ call assert_equal(string(sqrt(-1.0)), 'nan')
+ call assert_equal(string(sqrt(0.0/0.0)), 'nan')
+ call assert_fails('call sqrt("")', 'E808:')
+endfunc
+
+func Test_log()
+ call assert_equal(string(log(1.0)), '0.0')
+ call assert_equal(string(log(0.5)), '-0.693147')
+ call assert_equal(string(log(0.0)), '-inf')
+ call assert_equal(string(log(-1.0)), 'nan')
+ call assert_equal(string(log(1.0/0.0)), 'inf')
+ call assert_equal(string(log(0.0/0.0)), 'nan')
+ call assert_fails('call log("")', 'E808:')
+endfunc
+
+func Test_log10()
+ call assert_equal(string(log10(1.0)), '0.0')
+ call assert_equal(string(log10(100.0)), '2.0')
+ call assert_equal(string(log10(120.0)), '2.079181')
+ call assert_equal(string(log10(0.0)), '-inf')
+ call assert_equal(string(log10(-1.0)), 'nan')
+ call assert_equal(string(log10(1.0/0.0)), 'inf')
+ call assert_equal(string(log10(0.0/0.0)), 'nan')
+ call assert_fails('call log10("")', 'E808:')
+endfunc
+
+func Test_exp()
+ call assert_equal(string(exp(0.0)), '1.0')
+ call assert_equal(string(exp(2.0)), '7.389056')
+ call assert_equal(string(exp(-1.0)),'0.367879')
+ call assert_equal(string(exp(1.0/0.0)), 'inf')
+ call assert_equal(string(exp(-1.0/0.0)), '0.0')
+ call assert_equal(string(exp(0.0/0.0)), 'nan')
+ call assert_fails('call exp("")', 'E808:')
+endfunc
+
+func Test_sin()
+ call assert_equal(string(sin(0.0)), '0.0')
+ call assert_equal(string(sin(1.0)), '0.841471')
+ call assert_equal(string(sin(-0.5)), '-0.479426')
+ call assert_equal(string(sin(0.0/0.0)), 'nan')
+ call assert_equal(string(sin(1.0/0.0)), 'nan')
+ call assert_equal(string(sin(1.0/(1.0/0.0))), '0.0')
+ call assert_equal(string(sin(-1.0/(1.0/0.0))), '-0.0')
+ call assert_fails('call sin("")', 'E808:')
+endfunc
+
+func Test_asin()
+ call assert_equal(string(asin(0.0)), '0.0')
+ call assert_equal(string(asin(1.0)), '1.570796')
+ call assert_equal(string(asin(-0.5)), '-0.523599')
+ call assert_equal(string(asin(1.1)), 'nan')
+ call assert_equal(string(asin(1.0/0.0)), 'nan')
+ call assert_equal(string(asin(0.0/0.0)), 'nan')
+ call assert_fails('call asin("")', 'E808:')
+endfunc
+
+func Test_sinh()
+ call assert_equal(string(sinh(0.0)), '0.0')
+ call assert_equal(string(sinh(0.5)), '0.521095')
+ call assert_equal(string(sinh(-0.9)), '-1.026517')
+ call assert_equal(string(sinh(1.0/0.0)), 'inf')
+ call assert_equal(string(sinh(-1.0/0.0)), '-inf')
+ call assert_equal(string(sinh(0.0/0.0)), 'nan')
+ call assert_fails('call sinh("")', 'E808:')
+endfunc
+
+func Test_cos()
+ call assert_equal(string(cos(0.0)), '1.0')
+ call assert_equal(string(cos(1.0)), '0.540302')
+ call assert_equal(string(cos(-0.5)), '0.877583')
+ call assert_equal(string(cos(0.0/0.0)), 'nan')
+ call assert_equal(string(cos(1.0/0.0)), 'nan')
+ call assert_fails('call cos("")', 'E808:')
+endfunc
+
+func Test_acos()
+ call assert_equal(string(acos(0.0)), '1.570796')
+ call assert_equal(string(acos(1.0)), '0.0')
+ call assert_equal(string(acos(-1.0)), '3.141593')
+ call assert_equal(string(acos(-0.5)), '2.094395')
+ call assert_equal(string(acos(1.1)), 'nan')
+ call assert_equal(string(acos(1.0/0.0)), 'nan')
+ call assert_equal(string(acos(0.0/0.0)), 'nan')
+ call assert_fails('call acos("")', 'E808:')
+endfunc
+
+func Test_cosh()
+ call assert_equal(string(cosh(0.0)), '1.0')
+ call assert_equal(string(cosh(0.5)), '1.127626')
+ call assert_equal(string(cosh(1.0/0.0)), 'inf')
+ call assert_equal(string(cosh(-1.0/0.0)), 'inf')
+ call assert_equal(string(cosh(0.0/0.0)), 'nan')
+ call assert_fails('call cosh("")', 'E808:')
+endfunc
+
+func Test_tan()
+ call assert_equal(string(tan(0.0)), '0.0')
+ call assert_equal(string(tan(0.5)), '0.546302')
+ call assert_equal(string(tan(-0.5)), '-0.546302')
+ call assert_equal(string(tan(1.0/0.0)), 'nan')
+ call assert_equal(string(tan(0.0/0.0)), 'nan')
+ call assert_equal(string(tan(1.0/(1.0/0.0))), '0.0')
+ call assert_equal(string(tan(-1.0/(1.0/0.0))), '-0.0')
+ call assert_fails('call tan("")', 'E808:')
+endfunc
+
+func Test_atan()
+ call assert_equal(string(atan(0.0)), '0.0')
+ call assert_equal(string(atan(0.5)), '0.463648')
+ call assert_equal(string(atan(-1.0)), '-0.785398')
+ call assert_equal(string(atan(1.0/0.0)), '1.570796')
+ call assert_equal(string(atan(-1.0/0.0)), '-1.570796')
+ call assert_equal(string(atan(0.0/0.0)), 'nan')
+ call assert_fails('call atan("")', 'E808:')
+endfunc
+
+func Test_atan2()
+ call assert_equal(string(atan2(-1, -1)), '-2.356194')
+ call assert_equal(string(atan2(1, -1)), '2.356194')
+ call assert_equal(string(atan2(1.0, 1.0/0.0)), '0.0')
+ call assert_equal(string(atan2(1.0/0.0, 1.0)), '1.570796')
+ call assert_equal(string(atan2(0.0/0.0, 1.0)), 'nan')
+ call assert_fails('call atan2("", -1)', 'E808:')
+ call assert_fails('call atan2(-1, "")', 'E808:')
+endfunc
+
+func Test_tanh()
+ call assert_equal(string(tanh(0.0)), '0.0')
+ call assert_equal(string(tanh(0.5)), '0.462117')
+ call assert_equal(string(tanh(-1.0)), '-0.761594')
+ call assert_equal(string(tanh(1.0/0.0)), '1.0')
+ call assert_equal(string(tanh(-1.0/0.0)), '-1.0')
+ call assert_equal(string(tanh(0.0/0.0)), 'nan')
+ call assert_fails('call tanh("")', 'E808:')
+endfunc
+
+func Test_fmod()
+ call assert_equal(string(fmod(12.33, 1.22)), '0.13')
+ call assert_equal(string(fmod(-12.33, 1.22)), '-0.13')
+ call assert_equal(string(fmod(1.0/0.0, 1.0)), 'nan')
+ call assert_equal(string(fmod(1.0, 1.0/0.0)), '1.0')
+ call assert_equal(string(fmod(1.0, 0.0)), 'nan')
+ call assert_fails("call fmod('', 1.22)", 'E808:')
+ call assert_fails("call fmod(12.33, '')", 'E808:')
+endfunc
+
+func Test_pow()
+ call assert_equal(string(pow(0.0, 0.0)), '1.0')
+ call assert_equal(string(pow(2.0, 3.0)), '8.0')
+ call assert_equal(string(pow(2.0, 0.0/0.0)), 'nan')
+ call assert_equal(string(pow(0.0/0.0, 3.0)), 'nan')
+ call assert_equal(string(pow(0.0/0.0, 3.0)), 'nan')
+ call assert_equal(string(pow(2.0, 1.0/0.0)), 'inf')
+ call assert_equal(string(pow(1.0/0.0, 3.0)), 'inf')
+ call assert_fails("call pow('', 2.0)", 'E808:')
+ call assert_fails("call pow(2.0, '')", 'E808:')
+endfunc
+
+func Test_str2float()
+ call assert_equal(string(str2float('1')), '1.0')
+ call assert_equal(string(str2float('1.23')), '1.23')
+ call assert_equal(string(str2float('-1.23')), '-1.23')
+ call assert_equal(string(str2float(' 1.23')), '1.23')
+ call assert_equal(string(str2float(' + 1.23')), '1.23')
+ call assert_equal(string(str2float('1.23abc')), '1.23')
+ call assert_equal(string(str2float('1e40')), '1.0e40')
+ call assert_equal(string(str2float('1e1000')), 'inf')
+ call assert_equal(string(str2float('inf')), 'inf')
+ call assert_equal(string(str2float('-inf')), '-inf')
+ call assert_equal(string(str2float('Inf')), 'inf')
+ call assert_equal(string(str2float('nan')), 'nan')
+ call assert_equal(string(str2float('NaN')), 'nan')
+ call assert_fails("call str2float(1.2)", 'E806:')
+ call assert_fails("call str2float([])", 'E730:')
+ call assert_fails("call str2float({})", 'E731:')
+ call assert_fails("call str2float(function('string'))", 'E729:')
+endfunc
+
+func Test_floor()
+ call assert_equal(string(floor(2.0)), '2.0')
+ call assert_equal(string(floor(2.11)), '2.0')
+ call assert_equal(string(floor(2.99)), '2.0')
+ call assert_equal(string(floor(-2.11)), '-3.0')
+ call assert_equal(string(floor(-2.99)), '-3.0')
+ call assert_equal(string(floor(0.0/0.0)), 'nan')
+ call assert_equal(string(floor(1.0/0.0)), 'inf')
+ call assert_equal(string(floor(-1.0/0.0)), '-inf')
+ call assert_fails("call floor('')", 'E808:')
+endfunc
+
+func Test_ceil()
+ call assert_equal(string(ceil(2.0)), '2.0')
+ call assert_equal(string(ceil(2.11)), '3.0')
+ call assert_equal(string(ceil(2.99)), '3.0')
+ call assert_equal(string(ceil(-2.11)), '-2.0')
+ call assert_equal(string(ceil(-2.99)), '-2.0')
+ call assert_equal(string(ceil(0.0/0.0)), 'nan')
+ call assert_equal(string(ceil(1.0/0.0)), 'inf')
+ call assert_equal(string(ceil(-1.0/0.0)), '-inf')
+ call assert_fails("call ceil('')", 'E808:')
+endfunc
+
+func Test_round()
+ call assert_equal(string(round(2.1)), '2.0')
+ call assert_equal(string(round(2.5)), '3.0')
+ call assert_equal(string(round(2.9)), '3.0')
+ call assert_equal(string(round(-2.1)), '-2.0')
+ call assert_equal(string(round(-2.5)), '-3.0')
+ call assert_equal(string(round(-2.9)), '-3.0')
+ call assert_equal(string(round(0.0/0.0)), 'nan')
+ call assert_equal(string(round(1.0/0.0)), 'inf')
+ call assert_equal(string(round(-1.0/0.0)), '-inf')
+ call assert_fails("call round('')", 'E808:')
+endfunc
+
+func Test_trunc()
+ call assert_equal(string(trunc(2.1)), '2.0')
+ call assert_equal(string(trunc(2.5)), '2.0')
+ call assert_equal(string(trunc(2.9)), '2.0')
+ call assert_equal(string(trunc(-2.1)), '-2.0')
+ call assert_equal(string(trunc(-2.5)), '-2.0')
+ call assert_equal(string(trunc(-2.9)), '-2.0')
+ call assert_equal(string(trunc(0.0/0.0)), 'nan')
+ call assert_equal(string(trunc(1.0/0.0)), 'inf')
+ call assert_equal(string(trunc(-1.0/0.0)), '-inf')
+ call assert_fails("call trunc('')", 'E808:')
+endfunc
+
+func Test_isnan()
+ call assert_equal(isnan(1.0), 0)
+ call assert_equal(isnan(0.0/0.0), 1)
+ call assert_equal(isnan(1.0/0.0), 0)
+ call assert_equal(isnan('a'), 0)
+ call assert_equal(isnan([]), 0)
+ call assert_equal(isnan({}), 0)
+endfunc
