blob: 785348bee84d0760d80332b94e518e5cb63c7318 [file] [log] [blame]
Christ van Willegen0c6181f2023-08-13 18:03:14 +02001" Tests for expressions.
2
3source check.vim
4import './vim9.vim' as v9
5
6func 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
Christ van Willegen0c6181f2023-08-13 18:03:14 +0200108endfunc
109
110func Test_printf_pos_float()
111 let lines =<< trim END
112 call assert_equal('1.000000', printf('%1$f', 1))
113 call assert_equal('1.230000', printf('%1$f', 1.23))
114 call assert_equal('1.230000', printf('%1$F', 1.23))
115 call assert_equal('9999999.9', printf('%1$g', 9999999.9))
116 call assert_equal('9999999.9', printf('%1$G', 9999999.9))
117 call assert_equal('1.230000e+00', printf('%1$e', 1.23))
118 call assert_equal('1.230000E+00', printf('%1$E', 1.23))
119 call assert_equal('1.200000e-02', printf('%1$e', 0.012))
120 call assert_equal('-1.200000e-02', printf('%1$e', -0.012))
121 call assert_equal('0.33', printf('%1$.2f', 1.0 / 3.0))
122
123 #" When precision is 0, the dot should be omitted.
124 call assert_equal(' 2', printf('%1$*2$.f', 7.0 / 3.0, 3))
125 call assert_equal(' 2', printf('%2$*1$.f', 3, 7.0 / 3.0))
126 call assert_equal(' 2', printf('%1$*2$.g', 7.0 / 3.0, 3))
127 call assert_equal(' 2', printf('%2$*1$.g', 3, 7.0 / 3.0))
128 call assert_equal(' 2e+00', printf('%1$*2$.e', 7.0 / 3.0, 7))
129 call assert_equal(' 2e+00', printf('%2$*1$.e', 7, 7.0 / 3.0))
130
131 #" Float zero can be signed.
132 call assert_equal('+0.000000', printf('%1$+f', 0.0))
133 call assert_equal('0.000000', printf('%1$f', 1.0 / (1.0 / 0.0)))
134 call assert_equal('-0.000000', printf('%1$f', 1.0 / (-1.0 / 0.0)))
135 call assert_equal('0.0', printf('%1$s', 1.0 / (1.0 / 0.0)))
136 call assert_equal('-0.0', printf('%1$s', 1.0 / (-1.0 / 0.0)))
137 call assert_equal('0.0', printf('%1$S', 1.0 / (1.0 / 0.0)))
138 call assert_equal('-0.0', printf('%1$S', 1.0 / (-1.0 / 0.0)))
139
140 #" Float infinity can be signed.
141 call assert_equal('inf', printf('%1$f', 1.0 / 0.0))
142 call assert_equal('-inf', printf('%1$f', -1.0 / 0.0))
143 call assert_equal('inf', printf('%1$g', 1.0 / 0.0))
144 call assert_equal('-inf', printf('%1$g', -1.0 / 0.0))
145 call assert_equal('inf', printf('%1$e', 1.0 / 0.0))
146 call assert_equal('-inf', printf('%1$e', -1.0 / 0.0))
147 call assert_equal('INF', printf('%1$F', 1.0 / 0.0))
148 call assert_equal('-INF', printf('%1$F', -1.0 / 0.0))
149 call assert_equal('INF', printf('%1$E', 1.0 / 0.0))
150 call assert_equal('-INF', printf('%1$E', -1.0 / 0.0))
151 call assert_equal('INF', printf('%1$E', 1.0 / 0.0))
152 call assert_equal('-INF', printf('%1$G', -1.0 / 0.0))
153 call assert_equal('+inf', printf('%1$+f', 1.0 / 0.0))
154 call assert_equal('-inf', printf('%1$+f', -1.0 / 0.0))
155 call assert_equal(' inf', printf('%1$ f', 1.0 / 0.0))
156 call assert_equal(' inf', printf('%1$*2$f', 1.0 / 0.0, 6))
157 call assert_equal(' -inf', printf('%1$*2$f', -1.0 / 0.0, 6))
158 call assert_equal(' inf', printf('%1$*2$g', 1.0 / 0.0, 6))
159 call assert_equal(' -inf', printf('%1$*2$g', -1.0 / 0.0, 6))
160 call assert_equal(' +inf', printf('%1$+*2$f', 1.0 / 0.0, 6))
161 call assert_equal(' inf', printf('%1$ *2$f', 1.0 / 0.0, 6))
162 call assert_equal(' +inf', printf('%1$+0*2$f', 1.0 / 0.0, 6))
163 call assert_equal('inf ', printf('%1$-*2$f', 1.0 / 0.0, 6))
164 call assert_equal('-inf ', printf('%1$-*2$f', -1.0 / 0.0, 6))
165 call assert_equal('+inf ', printf('%1$-+*2$f', 1.0 / 0.0, 6))
166 call assert_equal(' inf ', printf('%1$- *2$f', 1.0 / 0.0, 6))
167 call assert_equal('-INF ', printf('%1$-*2$F', -1.0 / 0.0, 6))
168 call assert_equal('+INF ', printf('%1$-+*2$F', 1.0 / 0.0, 6))
169 call assert_equal(' INF ', printf('%1$- *2$F', 1.0 / 0.0, 6))
170 call assert_equal('INF ', printf('%1$-*2$G', 1.0 / 0.0, 6))
171 call assert_equal('-INF ', printf('%1$-*2$G', -1.0 / 0.0, 6))
172 call assert_equal('INF ', printf('%1$-*2$E', 1.0 / 0.0, 6))
173 call assert_equal('-INF ', printf('%1$-*2$E', -1.0 / 0.0, 6))
174 call assert_equal(' inf', printf('%2$*1$f', 6, 1.0 / 0.0))
175 call assert_equal(' -inf', printf('%2$*1$f', 6, -1.0 / 0.0))
176 call assert_equal(' inf', printf('%2$*1$g', 6, 1.0 / 0.0))
177 call assert_equal(' -inf', printf('%2$*1$g', 6, -1.0 / 0.0))
178 call assert_equal(' +inf', printf('%2$+*1$f', 6, 1.0 / 0.0))
179 call assert_equal(' inf', printf('%2$ *1$f', 6, 1.0 / 0.0))
180 call assert_equal(' +inf', printf('%2$+0*1$f', 6, 1.0 / 0.0))
181 call assert_equal('inf ', printf('%2$-*1$f', 6, 1.0 / 0.0))
182 call assert_equal('-inf ', printf('%2$-*1$f', 6, -1.0 / 0.0))
183 call assert_equal('+inf ', printf('%2$-+*1$f', 6, 1.0 / 0.0))
184 call assert_equal(' inf ', printf('%2$- *1$f', 6, 1.0 / 0.0))
185 call assert_equal('-INF ', printf('%2$-*1$F', 6, -1.0 / 0.0))
186 call assert_equal('+INF ', printf('%2$-+*1$F', 6, 1.0 / 0.0))
187 call assert_equal(' INF ', printf('%2$- *1$F', 6, 1.0 / 0.0))
188 call assert_equal('INF ', printf('%2$-*1$G', 6, 1.0 / 0.0))
189 call assert_equal('-INF ', printf('%2$-*1$G', 6, -1.0 / 0.0))
190 call assert_equal('INF ', printf('%2$-*1$E', 6, 1.0 / 0.0))
191 call assert_equal('-INF ', printf('%2$-*1$E', 6, -1.0 / 0.0))
192 call assert_equal('inf', printf('%1$s', 1.0 / 0.0))
193 call assert_equal('-inf', printf('%1$s', -1.0 / 0.0))
194
195 #" Test special case where max precision is truncated at 340.
196 call assert_equal('1.000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000', printf('%1$.*2$f', 1.0, 330))
197 call assert_equal('1.000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000', printf('%2$.*1$f', 330, 1.0))
198 call assert_equal('1.0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000', printf('%1$.*2$f', 1.0, 340))
199 call assert_equal('1.0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000', printf('%2$.*1$f', 340, 1.0))
200 call assert_equal('1.0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000', printf('%1$.*2$f', 1.0, 350))
201 call assert_equal('1.0000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000', printf('%2$.*1$f', 350, 1.0))
202
203 #" Float nan (not a number) has no sign.
204 call assert_equal('nan', printf('%1$f', sqrt(-1.0)))
205 call assert_equal('nan', printf('%1$f', 0.0 / 0.0))
206 call assert_equal('nan', printf('%1$f', -0.0 / 0.0))
207 call assert_equal('nan', printf('%1$g', 0.0 / 0.0))
208 call assert_equal('nan', printf('%1$e', 0.0 / 0.0))
209 call assert_equal('NAN', printf('%1$F', 0.0 / 0.0))
210 call assert_equal('NAN', printf('%1$G', 0.0 / 0.0))
211 call assert_equal('NAN', printf('%1$E', 0.0 / 0.0))
212 call assert_equal('NAN', printf('%1$F', -0.0 / 0.0))
213 call assert_equal('NAN', printf('%1$G', -0.0 / 0.0))
214 call assert_equal('NAN', printf('%1$E', -0.0 / 0.0))
215 call assert_equal(' nan', printf('%1$*2$f', 0.0 / 0.0, 6))
216 call assert_equal(' nan', printf('%1$0*2$f', 0.0 / 0.0, 6))
217 call assert_equal('nan ', printf('%1$-*2$f', 0.0 / 0.0, 6))
218 call assert_equal('nan ', printf('%1$- *2$f', 0.0 / 0.0, 6))
219 call assert_equal(' nan', printf('%2$*1$f', 6, 0.0 / 0.0))
220 call assert_equal(' nan', printf('%2$0*1$f', 6, 0.0 / 0.0))
221 call assert_equal('nan ', printf('%2$-*1$f', 6, 0.0 / 0.0))
222 call assert_equal('nan ', printf('%2$- *1$f', 6, 0.0 / 0.0))
223 call assert_equal('nan', printf('%1$s', 0.0 / 0.0))
224 call assert_equal('nan', printf('%1$s', -0.0 / 0.0))
225 call assert_equal('nan', printf('%1$S', 0.0 / 0.0))
226 call assert_equal('nan', printf('%1$S', -0.0 / 0.0))
227 END
228 call v9.CheckLegacyAndVim9Success(lines)
Christ van Willegen0c6181f2023-08-13 18:03:14 +0200229endfunc
230
231func Test_printf_pos_errors()
232 call v9.CheckLegacyAndVim9Failure(['echo printf("%1$d", {})'], 'E728:')
233 call v9.CheckLegacyAndVim9Failure(['echo printf("%1$d", [])'], 'E745:')
234 call v9.CheckLegacyAndVim9Failure(['echo printf("%1$d", 1, 2)'], 'E767:')
235 call v9.CheckLegacyAndVim9Failure(['echo printf("%*d", 1)'], 'E766:')
Yegappan Lakshmanan413f8392023-09-28 22:46:37 +0200236 call v9.CheckLegacyAndVim9Failure(['echo printf("%1$s")'], 'E1503:')
Christ van Willegen0c6181f2023-08-13 18:03:14 +0200237 call v9.CheckLegacyAndVim9Failure(['echo printf("%1$d", 1.2)'], 'E805:')
Yegappan Lakshmanan413f8392023-09-28 22:46:37 +0200238 call v9.CheckLegacyAndVim9Failure(['echo printf("%1$f")'], 'E1503:')
Christ van Willegenc35fc032024-03-14 18:30:41 +0100239
240 call v9.CheckLegacyAndVim9Failure(['echo printf("%f", "a")'], 'E807:')
241
242 call v9.CheckLegacyAndVim9Failure(["call printf('%1$d%2$d', 1, 3, 4)"], "E767:")
243
244 call v9.CheckLegacyAndVim9Failure(["call printf('%2$d%d', 1, 3)"], "E1500:")
245 call v9.CheckLegacyAndVim9Failure(["call printf('%d%2$d', 1, 3)"], "E1500:")
246 call v9.CheckLegacyAndVim9Failure(["call printf('%2$*1$d%d', 1, 3)"], "E1500:")
247 call v9.CheckLegacyAndVim9Failure(["call printf('%d%2$*1$d', 1, 3)"], "E1500:")
248 call v9.CheckLegacyAndVim9Failure(["call printf('%2$.*1$d%d', 1, 3)"], "E1500:")
249 call v9.CheckLegacyAndVim9Failure(["call printf('%d%2$.*1$d', 1, 3)"], "E1500:")
250 call v9.CheckLegacyAndVim9Failure(["call printf('%1$%')"], "E1500:")
251 call v9.CheckLegacyAndVim9Failure(["call printf('%1$')"], "E1500:")
252 call v9.CheckLegacyAndVim9Failure(["call printf('%1$_')"], "E1500:")
253 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*3$.*d', 3)"], "E1500:")
254 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*.*2$d', 3)"], "E1500:")
255 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*.*d', 3)"], "E1500:")
256 call v9.CheckLegacyAndVim9Failure(["call printf('%*.*1$d', 3)"], "E1500:")
257 call v9.CheckLegacyAndVim9Failure(["call printf('%*1$.*d', 3)"], "E1500:")
258 call v9.CheckLegacyAndVim9Failure(["call printf('%*1$.*1$d', 3)"], "E1500:")
259
260 call v9.CheckLegacyAndVim9Failure(["call printf('%2$d', 3, 3)"], "E1501:")
261
262 call v9.CheckLegacyAndVim9Failure(["call printf('%2$*1$d %1$ld', 3, 3)"], "E1502:")
263 call v9.CheckLegacyAndVim9Failure(["call printf('%1$s %1$*1$d', 3)"], "E1502:")
264 call v9.CheckLegacyAndVim9Failure(["call printf('%1$p %1$*1$d', 3)"], "E1502:")
265 call v9.CheckLegacyAndVim9Failure(["call printf('%1$f %1$*1$d', 3)"], "E1502:")
266 call v9.CheckLegacyAndVim9Failure(["call printf('%1$lud %1$*1$d', 3)"], "E1502:")
267 call v9.CheckLegacyAndVim9Failure(["call printf('%1$llud %1$*1$d', 3)"], "E1502:")
268 call v9.CheckLegacyAndVim9Failure(["call printf('%1$lld %1$*1$d', 3)"], "E1502:")
269 call v9.CheckLegacyAndVim9Failure(["call printf('%1$s %1$*1$d', 3)"], "E1502:")
270 call v9.CheckLegacyAndVim9Failure(["call printf('%1$c %1$*1$d', 3)"], "E1502:")
271 call v9.CheckLegacyAndVim9Failure(["call printf('%1$ld %1$*1$d', 3)"], "E1502:")
272 call v9.CheckLegacyAndVim9Failure(["call printf('%1$ld %2$*1$d', 3, 3)"], "E1502:")
273 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*1$ld', 3)"], "E1502:")
274 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*1$.*1$ld', 3)"], "E1502:")
275
276 call v9.CheckLegacyAndVim9Failure(["call printf('%1$d%2$d', 3)"], "E1503:")
277
278 call v9.CheckLegacyAndVim9Failure(["call printf('%1$d %1$s', 3)"], "E1504:")
279 call v9.CheckLegacyAndVim9Failure(["call printf('%1$ld %1$s', 3)"], "E1504:")
280 call v9.CheckLegacyAndVim9Failure(["call printf('%1$ud %1$d', 3)"], "E1504:")
281 call v9.CheckLegacyAndVim9Failure(["call printf('%1$s %1$f', 3.0)"], "E1504:")
282 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*1$d %1$ld', 3)"], "E1504:")
283 call v9.CheckLegacyAndVim9Failure(["call printf('%1$s %1$d', 3)"], "E1504:")
284 call v9.CheckLegacyAndVim9Failure(["call printf('%1$p %1$d', 3)"], "E1504:")
285 call v9.CheckLegacyAndVim9Failure(["call printf('%1$f %1$d', 3)"], "E1504:")
286 call v9.CheckLegacyAndVim9Failure(["call printf('%1$lud %1$d', 3)"], "E1504:")
287 call v9.CheckLegacyAndVim9Failure(["call printf('%1$llud %1$d', 3)"], "E1504:")
288 call v9.CheckLegacyAndVim9Failure(["call printf('%1$lld %1$d', 3)"], "E1504:")
289 call v9.CheckLegacyAndVim9Failure(["call printf('%1$s %1$d', 3)"], "E1504:")
290 call v9.CheckLegacyAndVim9Failure(["call printf('%1$c %1$d', 3)"], "E1504:")
291 call v9.CheckLegacyAndVim9Failure(["call printf('%1$ld %1$d', 3)"], "E1504:")
292
293 call v9.CheckLegacyAndVim9Failure(["call printf('%1$.2$d', 3)"], "E1505:")
294 call v9.CheckLegacyAndVim9Failure(["call printf('%01$d', 3)"], "E1505:")
295 call v9.CheckLegacyAndVim9Failure(["call printf('%01$0d', 3)"], "E1505:")
296 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*2d', 3)"], "E1505:")
297 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*3.*2$d', 3)"], "E1505:")
298 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*3$.2$d', 3)"], "E1505:")
299 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*3$.*2d', 3)"], "E1505:")
300 call v9.CheckLegacyAndVim9Failure(["call printf('%1$1$.5d', 5)"], "E1505:")
301 call v9.CheckLegacyAndVim9Failure(["call printf('%1$5.1$d', 5)"], "E1505:")
302 call v9.CheckLegacyAndVim9Failure(["call printf('%1$1$.1$d', 5)"], "E1505:")
303
304 call v9.CheckLegacyAndVim9Failure(["call printf('%.123456789$d', 5)"], "E1510:")
305 call v9.CheckLegacyAndVim9Failure(["call printf('%.123456789d', 5)"], "E1510:")
306 call v9.CheckLegacyAndVim9Failure(["call printf('%123456789$d', 5)"], "E1510:")
307 call v9.CheckLegacyAndVim9Failure(["call printf('%123456789d', 5)"], "E1510:")
308
309 call v9.CheckLegacyAndVim9Failure(["call printf('%123456789$5.5d', 5)"], "E1510:")
310 call v9.CheckLegacyAndVim9Failure(["call printf('%1$123456789.5d', 5)"], "E1510:")
311 call v9.CheckLegacyAndVim9Failure(["call printf('%1$5.123456789d', 5)"], "E1510:")
312 call v9.CheckLegacyAndVim9Failure(["call printf('%123456789$987654321.5d', 5)"], "E1510:")
313 call v9.CheckLegacyAndVim9Failure(["call printf('%1$123456789.987654321d', 5)"], "E1510:")
314 call v9.CheckLegacyAndVim9Failure(["call printf('%123456789$5.987654321d', 5)"], "E1510:")
315
316 call v9.CheckLegacyAndVim9Failure(["call printf('%123456789$*1$.5d', 5)"], "E1510:")
317 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*123456789$.5d', 5)"], "E1510:")
318 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*1$.123456789d', 5)"], "E1510:")
319 call v9.CheckLegacyAndVim9Failure(["call printf('%123456789$*987654321$.5d', 5)"], "E1510:")
320 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*123456789$.987654321d', 5)"], "E1510:")
321 call v9.CheckLegacyAndVim9Failure(["call printf('%123456789$*1$.987654321d', 5)"], "E1510:")
322
323 call v9.CheckLegacyAndVim9Failure(["call printf('%123456789$5.*1$d', 5)"], "E1510:")
324 call v9.CheckLegacyAndVim9Failure(["call printf('%1$123456789.*1$d', 5)"], "E1510:")
325 call v9.CheckLegacyAndVim9Failure(["call printf('%1$5.*123456789$d', 5)"], "E1510:")
326 call v9.CheckLegacyAndVim9Failure(["call printf('%123456789$987654321.*1$d', 5)"], "E1510:")
327 call v9.CheckLegacyAndVim9Failure(["call printf('%1$123456789.*987654321$d', 5)"], "E1510:")
328 call v9.CheckLegacyAndVim9Failure(["call printf('%123456789$5.*987654321$d', 5)"], "E1510:")
329
330 call v9.CheckLegacyAndVim9Failure(["call printf('%123456789$*1$.*1$d', 5)"], "E1510:")
331 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*123456789$.*1$d', 5)"], "E1510:")
332 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*1$.*123456789d', 5)"], "E1510:")
333 call v9.CheckLegacyAndVim9Failure(["call printf('%123456789$*987654321$.*1$d', 5)"], "E1510:")
334 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*123456789$.*987654321$d', 5)"], "E1510:")
335 call v9.CheckLegacyAndVim9Failure(["call printf('%123456789$*1$.*987654321$d', 5)"], "E1510:")
336
337 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*2$.*1$d', 5, 9999)"], "E1510:")
338 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*1$.*2$d', 5, 9999)"], "E1510:")
339 call v9.CheckLegacyAndVim9Failure(["call printf('%2$*3$.*1$d', 5, 9123, 9321)"], "E1510:")
340 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*2$.*3$d', 5, 9123, 9321)"], "E1510:")
341 call v9.CheckLegacyAndVim9Failure(["call printf('%2$*1$.*3$d', 5, 9123, 9312)"], "E1510:")
342
343 call v9.CheckLegacyAndVim9Failure(["call printf('%1$*2$d', 5, 9999)"], "E1510:")
Christ van Willegen0c6181f2023-08-13 18:03:14 +0200344endfunc
345
346func Test_printf_pos_64bit()
347 let lines =<< trim END
348 call assert_equal("123456789012345", printf('%1$d', 123456789012345))
349 END
350 call v9.CheckLegacyAndVim9Success(lines)
351endfunc
352
353func Test_printf_pos_spec_s()
354 let lines =<< trim END
355 #" number
356 call assert_equal("1234567890", printf('%1$s', 1234567890))
357
358 #" string
359 call assert_equal("abcdefgi", printf('%1$s', "abcdefgi"))
360
361 #" float
362 call assert_equal("1.23", printf('%1$s', 1.23))
363
364 #" list
365 VAR lvalue = [1, 'two', ['three', 4]]
366 call assert_equal(string(lvalue), printf('%1$s', lvalue))
367
368 #" dict
369 VAR dvalue = {'key1': 'value1', 'key2': ['list', 'lvalue'], 'key3': {'dict': 'lvalue'}}
370 call assert_equal(string(dvalue), printf('%1$s', dvalue))
371
372 #" funcref
373 call assert_equal('printf', printf('%1$s', 'printf'->function()))
374
375 #" partial
376 call assert_equal(string(function('printf', ['%1$s'])), printf('%1$s', function('printf', ['%1$s'])))
377 END
378 call v9.CheckLegacyAndVim9Success(lines)
379endfunc
380
381func Test_printf_pos_spec_b()
382 let lines =<< trim END
383 call assert_equal("0", printf('%1$b', 0))
384 call assert_equal("00001100", printf('%1$0*2$b', 12, 8))
385 call assert_equal("11111111", printf('%1$0*2$b', 0xff, 8))
386 call assert_equal(" 1111011", printf('%1$*2$b', 123, 10))
387 call assert_equal("0001111011", printf('%1$0*2$b', 123, 10))
388 call assert_equal(" 0b1111011", printf('%1$#*2$b', 123, 10))
389 call assert_equal("0B01111011", printf('%1$#0*2$B', 123, 10))
390 call assert_equal("00001100", printf('%2$0*1$b', 8, 12))
391 call assert_equal("11111111", printf('%2$0*1$b', 8, 0xff))
392 call assert_equal(" 1111011", printf('%2$*1$b', 10, 123))
393 call assert_equal("0001111011", printf('%2$0*1$b', 10, 123))
394 call assert_equal(" 0b1111011", printf('%2$#*1$b', 10, 123))
395 call assert_equal("0B01111011", printf('%2$#0*1$B', 10, 123))
396 call assert_equal("1001001100101100000001011010010", printf('%1$b', 1234567890))
397 call assert_equal("11100000100100010000110000011011101111101111001", printf('%1$b', 123456789012345))
398 call assert_equal("1111111111111111111111111111111111111111111111111111111111111111", printf('%1$b', -1))
399 END
400 call v9.CheckLegacyAndVim9Success(lines)
401endfunc
402
403" vim: shiftwidth=2 sts=2 expandtab