i1 : (ZZParser : charAnalyzer) "123456789" o1 = 123456789 |
i2 : (ZZParser : charAnalyzer) "-123456789" o2 = -123456789 |
i3 : class oo o3 = ZZ o3 : Ring |
-- Parsing.m2:90 Function % Parser := (fun,p) -> new Parser from ( c -> if (p' := p c) =!= null then if c === null then fun p' else fun % p' ) | symbol class value location of symbol | ------ ----- ----- ------------------ | fun : CompiledFunction -- times Parsing.m2:90:22-90:22 | p : Parser -- {*Function[Parsing.m2:117:7-123:84]*} Parsing.m2:90:26-90:26