1 USING: accessors io io.streams.string kernel mime.multipart
2 tools.test make multiline ;
3 IN: mime.multipart.tests
7 "azzbzzczzdzz" <string-reader> "z" <multipart-stream> 1 >>n
8 [ , ] [ ] multipart-step-loop drop
14 "azzbzzczzdzz" <string-reader> "z" <multipart-stream> 2 >>n
15 [ , ] [ ] multipart-step-loop drop
21 "azzbzzczzdzz" <string-reader> "z" <multipart-stream> 3 >>n
22 [ , ] [ ] multipart-step-loop drop
28 "azzbzzczzdzz" <string-reader> "z" <multipart-stream> 4 >>n
29 [ , ] [ ] multipart-step-loop drop
35 "azzbzzczzdzz" <string-reader> "z" <multipart-stream> 5 >>n
36 [ , ] [ ] multipart-step-loop drop
43 "aazzbzzczzdzz" <string-reader> "z" <multipart-stream> 1 >>n
44 [ , ] [ ] multipart-step-loop drop
50 "aazzbzzczzdzz" <string-reader> "z" <multipart-stream> 2 >>n
51 [ , ] [ ] multipart-step-loop drop
57 "aazzbzzczzdzz" <string-reader> "z" <multipart-stream> 3 >>n
58 [ , ] [ ] multipart-step-loop drop
64 "aazzbzzczzdzz" <string-reader> "z" <multipart-stream> 4 >>n
65 [ , ] [ ] multipart-step-loop drop
71 "aazzbzzczzdzz" <string-reader> "z" <multipart-stream> 5 >>n
72 [ , ] [ ] multipart-step-loop drop
80 "azzbzzczzdzz" <string-reader> "zz" <multipart-stream> 1 >>n
81 [ , ] [ ] multipart-step-loop drop
85 [ { "a" "z" "z" "b" "z" "z" "c" "z" "z" "d" "zz" } ] [
87 "azzbzzczzdzz" <string-reader> "zzz" <multipart-stream> 1 >>n
88 [ , ] [ ] multipart-step-loop drop
92 [ { "a" "z" "z" "b" "z" "z" "c" "z" "z" "d" f } ] [
94 "azzbzzczzdzzz" <string-reader> "zzz" <multipart-stream> 1 >>n
95 [ , ] [ ] multipart-step-loop drop
99 [ { "az" "zb" "zz" "cz" "zd" f } ] [
101 "azzbzzczzdzzz" <string-reader> "zzz" <multipart-stream> 2 >>n
102 [ , ] [ ] multipart-step-loop drop
106 [ { "a" "zzb" "zzc" "zzd" f } ] [
108 "azzbzzczzdzzz" <string-reader> "zzz" <multipart-stream> 3 >>n
109 [ , ] [ ] multipart-step-loop drop
113 [ { "az" "zbzz" "czzd" f } ] [
115 "azzbzzczzdzzz" <string-reader> "zzz" <multipart-stream> 4 >>n
116 [ , ] [ ] multipart-step-loop drop
120 [ { "azz" "bzzcz" "zd" f } ] [
122 "azzbzzczzdzzz" <string-reader> "zzz" <multipart-stream> 5 >>n
123 [ , ] [ ] multipart-step-loop drop
128 [ { "a" f f "b" f f "c" f f "d" f f } ] [
130 "azzbzzczzdzz" <string-reader> "z" <multipart-stream> 1 >>n
131 [ , ] [ ] multipart-loop-all
135 [ { "a" f f "b" f f "c" f f "d" f f } ] [
137 "azzbzzczzdzz" <string-reader> "z" <multipart-stream> 2 >>n
138 [ , ] [ ] multipart-loop-all
142 [ { "a" f f "b" f f "c" f f "d" f f } ] [
144 "azzbzzczzdzz" <string-reader> "z" <multipart-stream> 3 >>n
145 [ , ] [ ] multipart-loop-all
149 [ { "a" f f "b" f f "c" f f "d" f f } ] [
151 "azzbzzczzdzz" <string-reader> "z" <multipart-stream> 4 >>n
152 [ , ] [ ] multipart-loop-all
156 [ { "a" f f "b" f f "c" f f "d" f f } ] [
158 "azzbzzczzdzz" <string-reader> "z" <multipart-stream> 5 >>n
159 [ , ] [ ] multipart-loop-all
164 [ { "a" "a" f f "b" f f "c" f f "d" f f } ] [
166 "aazzbzzczzdzz" <string-reader> "z" <multipart-stream> 1 >>n
167 [ , ] [ ] multipart-loop-all
171 [ { "aa" f f "b" f f "c" f f "d" f f } ] [
173 "aazzbzzczzdzz" <string-reader> "z" <multipart-stream> 2 >>n
174 [ , ] [ ] multipart-loop-all
178 [ { "aa" f f "b" f f "c" f f "d" f f } ] [
180 "aazzbzzczzdzz" <string-reader> "z" <multipart-stream> 3 >>n
181 [ , ] [ ] multipart-loop-all
185 [ { "aa" f f "b" f f "c" f f "d" f f } ] [
187 "aazzbzzczzdzz" <string-reader> "z" <multipart-stream> 4 >>n
188 [ , ] [ ] multipart-loop-all
192 [ { "aa" f f "b" f f "c" f f "d" f f } ] [
194 "aazzbzzczzdzz" <string-reader> "z" <multipart-stream> 5 >>n
195 [ , ] [ ] multipart-loop-all
201 [ { "a" f "b" f "c" f "d" f } ] [
203 "azzbzzczzdzz" <string-reader> "zz" <multipart-stream> 1 >>n
204 [ , ] [ ] multipart-loop-all
208 [ { "a" "z" "z" "b" "z" "z" "c" "z" "z" "d" "zz" } ] [
210 "azzbzzczzdzz" <string-reader> "zzz" <multipart-stream> 1 >>n
211 [ , ] [ ] multipart-loop-all
215 [ { "a" "z" "z" "b" "z" "z" "c" "z" "z" "d" f } ] [
217 "azzbzzczzdzzz" <string-reader> "zzz" <multipart-stream> 1 >>n
218 [ , ] [ ] multipart-loop-all
222 [ { "az" "zb" "zz" "cz" "zd" f } ] [
224 "azzbzzczzdzzz" <string-reader> "zzz" <multipart-stream> 2 >>n
225 [ , ] [ ] multipart-loop-all
229 [ { "a" "zzb" "zzc" "zzd" f } ] [
231 "azzbzzczzdzzz" <string-reader> "zzz" <multipart-stream> 3 >>n
232 [ , ] [ ] multipart-loop-all
236 [ { "az" "zbzz" "czzd" f } ] [
238 "azzbzzczzdzzz" <string-reader> "zzz" <multipart-stream> 4 >>n
239 [ , ] [ ] multipart-loop-all
243 [ { "azz" "bzzcz" "zd" f } ] [
245 "azzbzzczzdzzz" <string-reader> "zzz" <multipart-stream> 5 >>n
246 [ , ] [ ] multipart-loop-all