59 |
(deftest formatter.cond.13 |
(deftest formatter.cond.13 |
60 |
(let ((fn (formatter "~V[a~;b~;c~;d~;e~;f~;g~;h~;i~]"))) |
(let ((fn (formatter "~V[a~;b~;c~;d~;e~;f~;g~;h~;i~]"))) |
61 |
(loop for i from -1 to 10 |
(loop for i from -1 to 10 |
62 |
collect (formatter-call-to-string fn i nil))) |
collect (formatter-call-to-string fn i))) |
63 |
("" "a" "b" "c" "d" "e" "f" "g" "h" "i" "" "")) |
("" "a" "b" "c" "d" "e" "f" "g" "h" "i" "" "")) |
64 |
|
|
65 |
(deftest format.cond.14 |
(deftest format.cond.14 |
124 |
(deftest formatter.cond\:.6 |
(deftest formatter.cond\:.6 |
125 |
(let ((fn (formatter "~v[a~;b~;c~;d~:;e~]"))) |
(let ((fn (formatter "~v[a~;b~;c~;d~:;e~]"))) |
126 |
(loop for i from -1 to 10 |
(loop for i from -1 to 10 |
127 |
collect (formatter-call-to-string fn i nil))) |
collect (formatter-call-to-string fn i))) |
128 |
("e" "a" "b" "c" "d" "e" "e" "e" "e" "e" "e" "e")) |
("e" "a" "b" "c" "d" "e" "e" "e" "e" "e" "e" "e")) |
129 |
|
|
130 |
(deftest format.cond\:.7 |
(deftest format.cond\:.7 |