changeset 25902 | 5214cbdc37e5 |
parent 25901 | 0203c50a589f |
child 25998 | a7527c5769bb |
25901:0203c50a589f | 25902:5214cbdc37e5 |
---|---|
199 7 |
199 7 |
200 |
200 |
201 names that should be caught by fallback mechanism |
201 names that should be caught by fallback mechanism |
202 |
202 |
203 $ try -- '-a-b-c-' |
203 $ try -- '-a-b-c-' |
204 (negate |
204 ('symbol', '-a-b-c-') |
205 ('symbol', 'a-b-c-')) |
|
206 * set: |
205 * set: |
207 <baseset [4]> |
206 <baseset [4]> |
208 4 |
207 4 |
209 $ log -a-b-c- |
208 $ log -a-b-c- |
210 4 |
209 4 |
210 $ try '+a+b+c+' |
|
211 ('symbol', '+a+b+c+') |
|
212 * set: |
|
213 <baseset [3]> |
|
214 3 |
|
215 $ try '+a+b+c+:' |
|
216 (rangepost |
|
217 ('symbol', '+a+b+c+')) |
|
218 * set: |
|
219 <spanset+ 3:9> |
|
220 3 |
|
221 4 |
|
222 5 |
|
223 6 |
|
224 7 |
|
225 8 |
|
226 9 |
|
227 $ try ':+a+b+c+' |
|
228 (rangepre |
|
229 ('symbol', '+a+b+c+')) |
|
230 * set: |
|
231 <spanset+ 0:3> |
|
232 0 |
|
233 1 |
|
234 2 |
|
235 3 |
|
236 $ try -- '-a-b-c-:+a+b+c+' |
|
237 (range |
|
238 ('symbol', '-a-b-c-') |
|
239 ('symbol', '+a+b+c+')) |
|
240 * set: |
|
241 <spanset- 3:4> |
|
242 4 |
|
243 3 |
|
244 $ log '-a-b-c-:+a+b+c+' |
|
245 4 |
|
246 3 |
|
211 |
247 |
212 $ try -- -a-b-c--a # complains |
248 $ try -- -a-b-c--a # complains |
213 (minus |
249 (minus |
214 (minus |
250 (minus |
215 (minus |
251 (minus |