Christ van Willegen | 0c6181f | 2023-08-13 18:03:14 +0200 | [diff] [blame] | 1 | " Tests for expressions. |
| 2 | |
| 3 | source check.vim |
| 4 | import './vim9.vim' as v9 |
| 5 | |
| 6 | func Test_printf_pos_misc() |
| 7 | let lines =<< trim END |
| 8 | call assert_equal('123', printf('%1$d', 123)) |
| 9 | call assert_equal('', printf('%1$.0d', 0)) |
| 10 | call assert_equal('00005', printf('%1$5.5d', 5)) |
| 11 | call assert_equal('00005', printf('%1$*1$.5d', 5)) |
| 12 | call assert_equal('00005', printf('%1$5.*1$d', 5)) |
| 13 | call assert_equal('00005', printf('%1$*1$.*1$d', 5)) |
| 14 | call assert_equal('00005', printf('%1$*10$.5d%2$.0d%3$.0d%4$.0d%5$.0d%6$.0d%7$.0d%8$.0d%9$.0d', 5, 0, 0, 0, 0, 0, 0, 0, 0, 5)) |
| 15 | call assert_equal('00005', printf('%1$5.*10$d%2$.0d%3$.0d%4$.0d%5$.0d%6$.0d%7$.0d%8$.0d%9$.0d', 5, 0, 0, 0, 0, 0, 0, 0, 0, 5)) |
| 16 | call assert_equal('123', printf('%1$i', 123)) |
| 17 | call assert_equal('123', printf('%1$D', 123)) |
| 18 | call assert_equal('123', printf('%1$U', 123)) |
| 19 | call assert_equal('173', printf('%1$o', 123)) |
| 20 | call assert_equal('173', printf('%1$O', 123)) |
| 21 | call assert_equal('7b', printf('%1$x', 123)) |
| 22 | call assert_equal('7B', printf('%1$X', 123)) |
| 23 | call assert_equal('Printing 1 at width 1 gives: 1', 1->printf("Printing %1$d at width %1$d gives: %1$*1$d")) |
| 24 | call assert_equal('Printing 2 at width 2 gives: 2', 2->printf("Printing %1$d at width %1$d gives: %1$*1$d")) |
| 25 | call assert_equal('Printing 3 at width 3 gives: 3', 3->printf("Printing %1$d at width %1$d gives: %1$*1$d")) |
| 26 | call assert_equal('Printing 1 at width/precision 1.1 gives: 1', 1->printf("Printing %1$d at width/precision %1$d.%1$d gives: %1$*1$.*1$d")) |
| 27 | call assert_equal('Printing 2 at width/precision 2.2 gives: 02', 2->printf("Printing %1$d at width/precision %1$d.%1$d gives: %1$*1$.*1$d")) |
| 28 | call assert_equal('Printing 3 at width/precision 3.3 gives: 003', 3->printf("Printing %1$d at width/precision %1$d.%1$d gives: %1$*1$.*1$d")) |
| 29 | |
| 30 | call assert_equal('123', printf('%1$hd', 123)) |
| 31 | call assert_equal('-123', printf('%1$hd', -123)) |
| 32 | call assert_equal('-1', printf('%1$hd', 0xFFFF)) |
| 33 | call assert_equal('-1', printf('%1$hd', 0x1FFFFF)) |
| 34 | |
| 35 | call assert_equal('123', printf('%1$hu', 123)) |
| 36 | call assert_equal('65413', printf('%1$hu', -123)) |
| 37 | call assert_equal('65535', printf('%1$hu', 0xFFFF)) |
| 38 | call assert_equal('65535', printf('%1$hu', 0x1FFFFF)) |
| 39 | |
| 40 | call assert_equal('123', printf('%1$ld', 123)) |
| 41 | call assert_equal('-123', printf('%1$ld', -123)) |
| 42 | call assert_equal('65535', printf('%1$ld', 0xFFFF)) |
| 43 | call assert_equal('131071', printf('%1$ld', 0x1FFFF)) |
| 44 | |
| 45 | call assert_equal('{', printf('%1$c', 123)) |
| 46 | call assert_equal('abc', printf('%1$s', 'abc')) |
| 47 | call assert_equal('abc', printf('%1$S', 'abc')) |
| 48 | |
| 49 | call assert_equal('+123', printf('%1$+d', 123)) |
| 50 | call assert_equal('-123', printf('%1$+d', -123)) |
| 51 | call assert_equal('+123', printf('%1$+ d', 123)) |
| 52 | call assert_equal(' 123', printf('%1$ d', 123)) |
| 53 | call assert_equal(' 123', printf('%1$ d', 123)) |
| 54 | call assert_equal('-123', printf('%1$ d', -123)) |
| 55 | |
| 56 | call assert_equal(' 123', printf('%2$*1$d', 5, 123)) |
| 57 | call assert_equal('123 ', printf('%2$*1$d', -5, 123)) |
| 58 | call assert_equal('00123', printf('%2$.*1$d', 5, 123)) |
| 59 | call assert_equal(' 123', printf('%2$ *1$d', 5, 123)) |
| 60 | call assert_equal(' +123', printf('%2$+ *1$d', 5, 123)) |
| 61 | |
| 62 | call assert_equal(' 123', printf('%1$*2$d', 123, 5)) |
| 63 | call assert_equal('123 ', printf('%1$*2$d', 123, -5)) |
| 64 | call assert_equal('00123', printf('%1$.*2$d', 123, 5)) |
| 65 | call assert_equal(' 123', printf('%1$ *2$d', 123, 5)) |
| 66 | call assert_equal(' +123', printf('%1$+ *2$d', 123, 5)) |
| 67 | |
| 68 | call assert_equal('foobar', printf('%2$.*1$s', 9, 'foobar')) |
| 69 | call assert_equal('foo', printf('%2$.*1$s', 3, 'foobar')) |
| 70 | call assert_equal('', printf('%2$.*1$s', 0, 'foobar')) |
| 71 | call assert_equal('foobar', printf('%2$.*1$s', -1, 'foobar')) |
| 72 | |
| 73 | #" Unrecognized format specifier kept as-is. |
| 74 | call assert_equal('_123', printf("%_%1$d", 123)) |
| 75 | |
| 76 | #" Test alternate forms. |
| 77 | call assert_equal('0x7b', printf('%1$#x', 123)) |
| 78 | call assert_equal('0X7B', printf('%1$#X', 123)) |
| 79 | call assert_equal('0173', printf('%1$#o', 123)) |
| 80 | call assert_equal('0173', printf('%1$#O', 123)) |
| 81 | call assert_equal('abc', printf('%1$#s', 'abc')) |
| 82 | call assert_equal('abc', printf('%1$#S', 'abc')) |
| 83 | |
| 84 | call assert_equal('1%', printf('%1$d%%', 1)) |
| 85 | call assert_notequal('', printf('%1$p', "abc")) |
| 86 | call assert_notequal('', printf('%2$d %1$p %3$s', "abc", 2, "abc")) |
| 87 | |
| 88 | #" Try argument re-use and argument swapping |
| 89 | call assert_equal('one two one', printf('%1$s %2$s %1$s', "one", "two")) |
| 90 | call assert_equal('Screen height: 400', printf('%1$s height: %2$d', "Screen", 400)) |
| 91 | call assert_equal('400 is: Screen height', printf('%2$d is: %1$s height', "Screen", 400)) |
| 92 | |
| 93 | #" Try out lots of combinations of argument types to skip |
| 94 | call assert_equal('9 12345 7654321', printf('%2$ld %1$d %3$lu', 12345, 9, 7654321)) |
| 95 | call assert_equal('9 1234567 7654321', printf('%2$d %1$ld %3$lu', 1234567, 9, 7654321)) |
| 96 | call assert_equal('9 1234567 7654321', printf('%2$d %1$lld %3$lu', 1234567, 9, 7654321)) |
| 97 | call assert_equal('9 12345 7654321', printf('%2$ld %1$u %3$lu', 12345, 9, 7654321)) |
| 98 | call assert_equal('9 1234567 7654321', printf('%2$d %1$lu %3$lu', 1234567, 9, 7654321)) |
| 99 | call assert_equal('9 1234567 7654321', printf('%2$d %1$llu %3$lu', 1234567, 9, 7654321)) |
| 100 | call assert_equal('9 1234567 7654321', printf('%2$d %1$llu %3$lu', 1234567, 9, 7654321)) |
| 101 | call assert_equal('9 deadbeef 7654321', printf('%2$d %1$x %3$lu', 0xdeadbeef, 9, 7654321)) |
| 102 | call assert_equal('9 c 7654321', printf('%2$ld %1$c %3$lu', 99, 9, 7654321)) |
| 103 | call assert_equal('9 hi 7654321', printf('%2$ld %1$s %3$lu', "hi", 9, 7654321)) |
| 104 | call assert_equal('9 0.000000e+00 7654321', printf('%2$ld %1$e %3$lu', 0.0, 9, 7654321)) |
| 105 | END |
| 106 | call v9.CheckLegacyAndVim9Success(lines) |
| 107 | |
| 108 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$d%2$d', 1, 3, 4)"], "E767:") |
| 109 | |
| 110 | call v9.CheckLegacyAndVim9Failure(["call printf('%2$d%d', 1, 3)"], "E1400:") |
| 111 | call v9.CheckLegacyAndVim9Failure(["call printf('%d%2$d', 1, 3)"], "E1400:") |
| 112 | call v9.CheckLegacyAndVim9Failure(["call printf('%2$*1$d%d', 1, 3)"], "E1400:") |
| 113 | call v9.CheckLegacyAndVim9Failure(["call printf('%d%2$*1$d', 1, 3)"], "E1400:") |
| 114 | call v9.CheckLegacyAndVim9Failure(["call printf('%2$.*1$d%d', 1, 3)"], "E1400:") |
| 115 | call v9.CheckLegacyAndVim9Failure(["call printf('%d%2$.*1$d', 1, 3)"], "E1400:") |
| 116 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$%')"], "E1400:") |
| 117 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$')"], "E1400:") |
| 118 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$_')"], "E1400:") |
| 119 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$*3$.*d', 3)"], "E1400:") |
| 120 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$*.*2$d', 3)"], "E1400:") |
| 121 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$*.*d', 3)"], "E1400:") |
| 122 | call v9.CheckLegacyAndVim9Failure(["call printf('%*.*1$d', 3)"], "E1400:") |
| 123 | call v9.CheckLegacyAndVim9Failure(["call printf('%*1$.*d', 3)"], "E1400:") |
| 124 | call v9.CheckLegacyAndVim9Failure(["call printf('%*1$.*1$d', 3)"], "E1400:") |
| 125 | |
| 126 | call v9.CheckLegacyAndVim9Failure(["call printf('%2$d', 3, 3)"], "E1401:") |
| 127 | |
| 128 | call v9.CheckLegacyAndVim9Failure(["call printf('%2$*1$d %1$ld', 3, 3)"], "E1402:") |
| 129 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$s %1$*1$d', 3)"], "E1402:") |
| 130 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$p %1$*1$d', 3)"], "E1402:") |
| 131 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$f %1$*1$d', 3)"], "E1402:") |
| 132 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$lud %1$*1$d', 3)"], "E1402:") |
| 133 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$llud %1$*1$d', 3)"], "E1402:") |
| 134 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$lld %1$*1$d', 3)"], "E1402:") |
| 135 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$s %1$*1$d', 3)"], "E1402:") |
| 136 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$c %1$*1$d', 3)"], "E1402:") |
| 137 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$ld %1$*1$d', 3)"], "E1402:") |
| 138 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$ld %2$*1$d', 3, 3)"], "E1402:") |
| 139 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$*1$ld', 3)"], "E1402:") |
| 140 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$*1$.*1$ld', 3)"], "E1402:") |
| 141 | |
| 142 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$d%2$d', 3)"], "E1403:") |
| 143 | |
| 144 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$d %1$s', 3)"], "E1404:") |
| 145 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$ld %1$s', 3)"], "E1404:") |
| 146 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$ud %1$d', 3)"], "E1404:") |
| 147 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$s %1$f', 3.0)"], "E1404:") |
| 148 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$*1$d %1$ld', 3)"], "E1404:") |
| 149 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$s %1$d', 3)"], "E1404:") |
| 150 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$p %1$d', 3)"], "E1404:") |
| 151 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$f %1$d', 3)"], "E1404:") |
| 152 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$lud %1$d', 3)"], "E1404:") |
| 153 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$llud %1$d', 3)"], "E1404:") |
| 154 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$lld %1$d', 3)"], "E1404:") |
| 155 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$s %1$d', 3)"], "E1404:") |
| 156 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$c %1$d', 3)"], "E1404:") |
| 157 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$ld %1$d', 3)"], "E1404:") |
| 158 | |
| 159 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$.2$d', 3)"], "E1405:") |
| 160 | call v9.CheckLegacyAndVim9Failure(["call printf('%01$d', 3)"], "E1405:") |
| 161 | call v9.CheckLegacyAndVim9Failure(["call printf('%01$0d', 3)"], "E1405:") |
| 162 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$*2d', 3)"], "E1405:") |
| 163 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$*3.*2$d', 3)"], "E1405:") |
| 164 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$*3$.2$d', 3)"], "E1405:") |
| 165 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$*3$.*2d', 3)"], "E1405:") |
| 166 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$1$.5d', 5)"], "E1405:") |
| 167 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$5.1$d', 5)"], "E1405:") |
| 168 | call v9.CheckLegacyAndVim9Failure(["call printf('%1$1$.1$d', 5)"], "E1405:") |
| 169 | endfunc |
| 170 | |
| 171 | func Test_printf_pos_float() |
| 172 | let lines =<< trim END |
| 173 | call assert_equal('1.000000', printf('%1$f', 1)) |
| 174 | call assert_equal('1.230000', printf('%1$f', 1.23)) |
| 175 | call assert_equal('1.230000', printf('%1$F', 1.23)) |
| 176 | call assert_equal('9999999.9', printf('%1$g', 9999999.9)) |
| 177 | call assert_equal('9999999.9', printf('%1$G', 9999999.9)) |
| 178 | call assert_equal('1.230000e+00', printf('%1$e', 1.23)) |
| 179 | call assert_equal('1.230000E+00', printf('%1$E', 1.23)) |
| 180 | call assert_equal('1.200000e-02', printf('%1$e', 0.012)) |
| 181 | call assert_equal('-1.200000e-02', printf('%1$e', -0.012)) |
| 182 | call assert_equal('0.33', printf('%1$.2f', 1.0 / 3.0)) |
| 183 | |
| 184 | #" When precision is 0, the dot should be omitted. |
| 185 | call assert_equal(' 2', printf('%1$*2$.f', 7.0 / 3.0, 3)) |
| 186 | call assert_equal(' 2', printf('%2$*1$.f', 3, 7.0 / 3.0)) |
| 187 | call assert_equal(' 2', printf('%1$*2$.g', 7.0 / 3.0, 3)) |
| 188 | call assert_equal(' 2', printf('%2$*1$.g', 3, 7.0 / 3.0)) |
| 189 | call assert_equal(' 2e+00', printf('%1$*2$.e', 7.0 / 3.0, 7)) |
| 190 | call assert_equal(' 2e+00', printf('%2$*1$.e', 7, 7.0 / 3.0)) |
| 191 | |
| 192 | #" Float zero can be signed. |
| 193 | call assert_equal('+0.000000', printf('%1$+f', 0.0)) |
| 194 | call assert_equal('0.000000', printf('%1$f', 1.0 / (1.0 / 0.0))) |
| 195 | call assert_equal('-0.000000', printf('%1$f', 1.0 / (-1.0 / 0.0))) |
| 196 | call assert_equal('0.0', printf('%1$s', 1.0 / (1.0 / 0.0))) |
| 197 | call assert_equal('-0.0', printf('%1$s', 1.0 / (-1.0 / 0.0))) |
| 198 | call assert_equal('0.0', printf('%1$S', 1.0 / (1.0 / 0.0))) |
| 199 | call assert_equal('-0.0', printf('%1$S', 1.0 / (-1.0 / 0.0))) |
| 200 | |
| 201 | #" Float infinity can be signed. |
| 202 | call assert_equal('inf', printf('%1$f', 1.0 / 0.0)) |
| 203 | call assert_equal('-inf', printf('%1$f', -1.0 / 0.0)) |
| 204 | call assert_equal('inf', printf('%1$g', 1.0 / 0.0)) |
| 205 | call assert_equal('-inf', printf('%1$g', -1.0 / 0.0)) |
| 206 | call assert_equal('inf', printf('%1$e', 1.0 / 0.0)) |
| 207 | call assert_equal('-inf', printf('%1$e', -1.0 / 0.0)) |
| 208 | call assert_equal('INF', printf('%1$F', 1.0 / 0.0)) |
| 209 | call assert_equal('-INF', printf('%1$F', -1.0 / 0.0)) |
| 210 | call assert_equal('INF', printf('%1$E', 1.0 / 0.0)) |
| 211 | call assert_equal('-INF', printf('%1$E', -1.0 / 0.0)) |
| 212 | call assert_equal('INF', printf('%1$E', 1.0 / 0.0)) |
| 213 | call assert_equal('-INF', printf('%1$G', -1.0 / 0.0)) |
| 214 | call assert_equal('+inf', printf('%1$+f', 1.0 / 0.0)) |
| 215 | call assert_equal('-inf', printf('%1$+f', -1.0 / 0.0)) |
| 216 | call assert_equal(' inf', printf('%1$ f', 1.0 / 0.0)) |
| 217 | call assert_equal(' inf', printf('%1$*2$f', 1.0 / 0.0, 6)) |
| 218 | call assert_equal(' -inf', printf('%1$*2$f', -1.0 / 0.0, 6)) |
| 219 | call assert_equal(' inf', printf('%1$*2$g', 1.0 / 0.0, 6)) |
| 220 | call assert_equal(' -inf', printf('%1$*2$g', -1.0 / 0.0, 6)) |
| 221 | call assert_equal(' +inf', printf('%1$+*2$f', 1.0 / 0.0, 6)) |
| 222 | call assert_equal(' inf', printf('%1$ *2$f', 1.0 / 0.0, 6)) |
| 223 | call assert_equal(' +inf', printf('%1$+0*2$f', 1.0 / 0.0, 6)) |
| 224 | call assert_equal('inf ', printf('%1$-*2$f', 1.0 / 0.0, 6)) |
| 225 | call assert_equal('-inf ', printf('%1$-*2$f', -1.0 / 0.0, 6)) |
| 226 | call assert_equal('+inf ', printf('%1$-+*2$f', 1.0 / 0.0, 6)) |
| 227 | call assert_equal(' inf ', printf('%1$- *2$f', 1.0 / 0.0, 6)) |
| 228 | call assert_equal('-INF ', printf('%1$-*2$F', -1.0 / 0.0, 6)) |
| 229 | call assert_equal('+INF ', printf('%1$-+*2$F', 1.0 / 0.0, 6)) |
| 230 | call assert_equal(' INF ', printf('%1$- *2$F', 1.0 / 0.0, 6)) |
| 231 | call assert_equal('INF ', printf('%1$-*2$G', 1.0 / 0.0, 6)) |
| 232 | call assert_equal('-INF ', printf('%1$-*2$G', -1.0 / 0.0, 6)) |
| 233 | call assert_equal('INF ', printf('%1$-*2$E', 1.0 / 0.0, 6)) |
| 234 | call assert_equal('-INF ', printf('%1$-*2$E', -1.0 / 0.0, 6)) |
| 235 | call assert_equal(' inf', printf('%2$*1$f', 6, 1.0 / 0.0)) |
| 236 | call assert_equal(' -inf', printf('%2$*1$f', 6, -1.0 / 0.0)) |
| 237 | call assert_equal(' inf', printf('%2$*1$g', 6, 1.0 / 0.0)) |
| 238 | call assert_equal(' -inf', printf('%2$*1$g', 6, -1.0 / 0.0)) |
| 239 | call assert_equal(' +inf', printf('%2$+*1$f', 6, 1.0 / 0.0)) |
| 240 | call assert_equal(' inf', printf('%2$ *1$f', 6, 1.0 / 0.0)) |
| 241 | call assert_equal(' +inf', printf('%2$+0*1$f', 6, 1.0 / 0.0)) |
| 242 | call assert_equal('inf ', printf('%2$-*1$f', 6, 1.0 / 0.0)) |
| 243 | call assert_equal('-inf ', printf('%2$-*1$f', 6, -1.0 / 0.0)) |
| 244 | call assert_equal('+inf ', printf('%2$-+*1$f', 6, 1.0 / 0.0)) |
| 245 | call assert_equal(' inf ', printf('%2$- *1$f', 6, 1.0 / 0.0)) |
| 246 | call assert_equal('-INF ', printf('%2$-*1$F', 6, -1.0 / 0.0)) |
| 247 | call assert_equal('+INF ', printf('%2$-+*1$F', 6, 1.0 / 0.0)) |
| 248 | call assert_equal(' INF ', printf('%2$- *1$F', 6, 1.0 / 0.0)) |
| 249 | call assert_equal('INF ', printf('%2$-*1$G', 6, 1.0 / 0.0)) |
| 250 | call assert_equal('-INF ', printf('%2$-*1$G', 6, -1.0 / 0.0)) |
| 251 | call assert_equal('INF ', printf('%2$-*1$E', 6, 1.0 / 0.0)) |
| 252 | call assert_equal('-INF ', printf('%2$-*1$E', 6, -1.0 / 0.0)) |
| 253 | call assert_equal('inf', printf('%1$s', 1.0 / 0.0)) |
| 254 | call assert_equal('-inf', printf('%1$s', -1.0 / 0.0)) |
| 255 | |
| 256 | #" Test special case where max precision is truncated at 340. |
| 257 | call assert_equal('1.000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000', printf('%1$.*2$f', 1.0, 330)) |
| 258 | call assert_equal('1.000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000', printf('%2$.*1$f', 330, 1.0)) |
| 259 | call assert_equal('1.0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000', printf('%1$.*2$f', 1.0, 340)) |
| 260 | call assert_equal('1.0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000', printf('%2$.*1$f', 340, 1.0)) |
| 261 | call assert_equal('1.0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000', printf('%1$.*2$f', 1.0, 350)) |
| 262 | call assert_equal('1.0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000', printf('%2$.*1$f', 350, 1.0)) |
| 263 | |
| 264 | #" Float nan (not a number) has no sign. |
| 265 | call assert_equal('nan', printf('%1$f', sqrt(-1.0))) |
| 266 | call assert_equal('nan', printf('%1$f', 0.0 / 0.0)) |
| 267 | call assert_equal('nan', printf('%1$f', -0.0 / 0.0)) |
| 268 | call assert_equal('nan', printf('%1$g', 0.0 / 0.0)) |
| 269 | call assert_equal('nan', printf('%1$e', 0.0 / 0.0)) |
| 270 | call assert_equal('NAN', printf('%1$F', 0.0 / 0.0)) |
| 271 | call assert_equal('NAN', printf('%1$G', 0.0 / 0.0)) |
| 272 | call assert_equal('NAN', printf('%1$E', 0.0 / 0.0)) |
| 273 | call assert_equal('NAN', printf('%1$F', -0.0 / 0.0)) |
| 274 | call assert_equal('NAN', printf('%1$G', -0.0 / 0.0)) |
| 275 | call assert_equal('NAN', printf('%1$E', -0.0 / 0.0)) |
| 276 | call assert_equal(' nan', printf('%1$*2$f', 0.0 / 0.0, 6)) |
| 277 | call assert_equal(' nan', printf('%1$0*2$f', 0.0 / 0.0, 6)) |
| 278 | call assert_equal('nan ', printf('%1$-*2$f', 0.0 / 0.0, 6)) |
| 279 | call assert_equal('nan ', printf('%1$- *2$f', 0.0 / 0.0, 6)) |
| 280 | call assert_equal(' nan', printf('%2$*1$f', 6, 0.0 / 0.0)) |
| 281 | call assert_equal(' nan', printf('%2$0*1$f', 6, 0.0 / 0.0)) |
| 282 | call assert_equal('nan ', printf('%2$-*1$f', 6, 0.0 / 0.0)) |
| 283 | call assert_equal('nan ', printf('%2$- *1$f', 6, 0.0 / 0.0)) |
| 284 | call assert_equal('nan', printf('%1$s', 0.0 / 0.0)) |
| 285 | call assert_equal('nan', printf('%1$s', -0.0 / 0.0)) |
| 286 | call assert_equal('nan', printf('%1$S', 0.0 / 0.0)) |
| 287 | call assert_equal('nan', printf('%1$S', -0.0 / 0.0)) |
| 288 | END |
| 289 | call v9.CheckLegacyAndVim9Success(lines) |
| 290 | |
| 291 | call v9.CheckLegacyAndVim9Failure(['echo printf("%f", "a")'], 'E807:') |
| 292 | endfunc |
| 293 | |
| 294 | func Test_printf_pos_errors() |
| 295 | call v9.CheckLegacyAndVim9Failure(['echo printf("%1$d", {})'], 'E728:') |
| 296 | call v9.CheckLegacyAndVim9Failure(['echo printf("%1$d", [])'], 'E745:') |
| 297 | call v9.CheckLegacyAndVim9Failure(['echo printf("%1$d", 1, 2)'], 'E767:') |
| 298 | call v9.CheckLegacyAndVim9Failure(['echo printf("%*d", 1)'], 'E766:') |
| 299 | call v9.CheckLegacyAndVim9Failure(['echo printf("%1$s")'], 'E1403:') |
| 300 | call v9.CheckLegacyAndVim9Failure(['echo printf("%1$d", 1.2)'], 'E805:') |
| 301 | call v9.CheckLegacyAndVim9Failure(['echo printf("%1$f")'], 'E1403:') |
| 302 | endfunc |
| 303 | |
| 304 | func Test_printf_pos_64bit() |
| 305 | let lines =<< trim END |
| 306 | call assert_equal("123456789012345", printf('%1$d', 123456789012345)) |
| 307 | END |
| 308 | call v9.CheckLegacyAndVim9Success(lines) |
| 309 | endfunc |
| 310 | |
| 311 | func Test_printf_pos_spec_s() |
| 312 | let lines =<< trim END |
| 313 | #" number |
| 314 | call assert_equal("1234567890", printf('%1$s', 1234567890)) |
| 315 | |
| 316 | #" string |
| 317 | call assert_equal("abcdefgi", printf('%1$s', "abcdefgi")) |
| 318 | |
| 319 | #" float |
| 320 | call assert_equal("1.23", printf('%1$s', 1.23)) |
| 321 | |
| 322 | #" list |
| 323 | VAR lvalue = [1, 'two', ['three', 4]] |
| 324 | call assert_equal(string(lvalue), printf('%1$s', lvalue)) |
| 325 | |
| 326 | #" dict |
| 327 | VAR dvalue = {'key1': 'value1', 'key2': ['list', 'lvalue'], 'key3': {'dict': 'lvalue'}} |
| 328 | call assert_equal(string(dvalue), printf('%1$s', dvalue)) |
| 329 | |
| 330 | #" funcref |
| 331 | call assert_equal('printf', printf('%1$s', 'printf'->function())) |
| 332 | |
| 333 | #" partial |
| 334 | call assert_equal(string(function('printf', ['%1$s'])), printf('%1$s', function('printf', ['%1$s']))) |
| 335 | END |
| 336 | call v9.CheckLegacyAndVim9Success(lines) |
| 337 | endfunc |
| 338 | |
| 339 | func Test_printf_pos_spec_b() |
| 340 | let lines =<< trim END |
| 341 | call assert_equal("0", printf('%1$b', 0)) |
| 342 | call assert_equal("00001100", printf('%1$0*2$b', 12, 8)) |
| 343 | call assert_equal("11111111", printf('%1$0*2$b', 0xff, 8)) |
| 344 | call assert_equal(" 1111011", printf('%1$*2$b', 123, 10)) |
| 345 | call assert_equal("0001111011", printf('%1$0*2$b', 123, 10)) |
| 346 | call assert_equal(" 0b1111011", printf('%1$#*2$b', 123, 10)) |
| 347 | call assert_equal("0B01111011", printf('%1$#0*2$B', 123, 10)) |
| 348 | call assert_equal("00001100", printf('%2$0*1$b', 8, 12)) |
| 349 | call assert_equal("11111111", printf('%2$0*1$b', 8, 0xff)) |
| 350 | call assert_equal(" 1111011", printf('%2$*1$b', 10, 123)) |
| 351 | call assert_equal("0001111011", printf('%2$0*1$b', 10, 123)) |
| 352 | call assert_equal(" 0b1111011", printf('%2$#*1$b', 10, 123)) |
| 353 | call assert_equal("0B01111011", printf('%2$#0*1$B', 10, 123)) |
| 354 | call assert_equal("1001001100101100000001011010010", printf('%1$b', 1234567890)) |
| 355 | call assert_equal("11100000100100010000110000011011101111101111001", printf('%1$b', 123456789012345)) |
| 356 | call assert_equal("1111111111111111111111111111111111111111111111111111111111111111", printf('%1$b', -1)) |
| 357 | END |
| 358 | call v9.CheckLegacyAndVim9Success(lines) |
| 359 | endfunc |
| 360 | |
| 361 | " vim: shiftwidth=2 sts=2 expandtab |