Compiler/lexical analyzer: Difference between revisions
Content added Content deleted
m (J: bugfix (digit character constants) and use a less generic name in task example) |
m (J: bugfix (chrvals result has empty tokens which are not numbers)) |
||
Line 4,856: | Line 4,856: | ||
shift=: |.!.0 |
shift=: |.!.0 |
||
numvals=: {{ |
numvals=: {{ |
||
ndx=. I.*/@> y e.L:0 '0123456789' |
ndx=. I.(0<#@>y)**/@> y e.L:0 '0123456789' |
||
({{".y,'x'}}each ndx{y) ndx} y |
({{".y,'x'}}each ndx{y) ndx} y |
||
}} |
}} |
||
chrvals=: {{ |
chrvals=: {{ |
||
q=. y=<,'''' |
q=. y=<,'''' |