How to implement regex quantifiers ?

[heilingbrunner]

Regex knows quantifiers for example:
[0-9]{3}
for matching three numbers.
I need simple rules to parse this:

1A2BB3CCC

The result should be '1A', '2BB' and '3CCC'. The leading number is the length of the following letters.
I tried:

search
	= (d:digit l:letter{d} {return d + l;})+
letter
	= [a-zA-Z]
digit 'digit'
	= [0-9]

with input 1A2BB3CCC. No success.

Any idea/help ?

Thank you.

[hildjj]

Being worked on in #291

[heilingbrunner]

Any workarounds for limited length ?
I tried this. Do you have any better idea ?

Grammar:

search
	= (t1/t2/t3/t4/t5)+

t1 = d:'1' l:l1 {return d + l;}
t2 = d:'2' l:l2 {return d + l;}
t3 = d:'3' l:l3 {return d + l;}
t4 = d:'4' l:l4 {return d + l;}
t5 = d:'5' l:l5 {return d + l;}

letter
	= [a-zA-Z]

l1 = letter
l2 = $(l1 l1)
l3 = $(l1 l1 l1)
l4 = $(l1 l1 l1 l1)
l5 = $(l1 l1 l1 l1 l1)

Input:
1A2BB3CCC

Result:

[
  '1A',
  '2BB',
  '3CCC'
]

[hildjj]

Something like this seems to work:

search
	= pair*
    
pair
	= $(n:number l:$letter+ &{ return l.length === n }) 

number
	= n:$[0-9]+ { return parseInt(n, 10) }
    
letter
	= [a-zA-Z]

[heilingbrunner]

I will try. Thank you !!

[hildjj]

Now that 3.0.0 is out, you can do this:

search
	= (d:digit l:$letter|d| {return `${d}${l}`;})+
letter
	= [a-zA-Z]
digit 'digit'
	= n:[0-9]+ { return parseInt(n, 10) }

[hildjj]

I'm going to close this, but open it back up or comment here if 3.0.0 doesn't solve your problem.