2009-11-14から1日間の記事一覧
eof = is EOF ins = in '\s\t\r\n' inc = in '()' inw = _ @automaton lisplex in :: buf<[char]> out :: buf<[char]>: @local cbuf :: buf<char> @template nopq: enter: nop exit: nop @template cbufq: enter: cbuf <- EOF exit: out << cbuf @entry space < no</char>…
ins = in '\s\t\r\n' inc = in '()' inw = _ automaton lisplex in out: @var cbuf @entry space: c <- in case c of ins => continue inc => exitto closure inw => exitto word enter: nop exit: nop closure: exitto space enter: cbuf <- EOF exit: out <…