Lines Matching refs:stream
7 | [< ' (' ' | '\n' | '\r' | '\t'); stream >] -> lex stream
10 | [< ' ('A' .. 'Z' | 'a' .. 'z' as c); stream >] ->
13 lex_ident buffer stream
16 | [< ' ('0' .. '9' as c); stream >] ->
19 lex_number buffer stream
22 | [< ' ('#'); stream >] ->
23 lex_comment stream
26 | [< 'c; stream >] ->
27 [< 'Token.Kwd c; lex stream >]
29 (* end of stream. *)
33 | [< ' ('0' .. '9' | '.' as c); stream >] ->
35 lex_number buffer stream
36 | [< stream=lex >] ->
37 [< 'Token.Number (float_of_string (Buffer.contents buffer)); stream >]
40 | [< ' ('A' .. 'Z' | 'a' .. 'z' | '0' .. '9' as c); stream >] ->
42 lex_ident buffer stream
43 | [< stream=lex >] ->
45 | "def" -> [< 'Token.Def; stream >]
46 | "extern" -> [< 'Token.Extern; stream >]
47 | "if" -> [< 'Token.If; stream >]
48 | "then" -> [< 'Token.Then; stream >]
49 | "else" -> [< 'Token.Else; stream >]
50 | "for" -> [< 'Token.For; stream >]
51 | "in" -> [< 'Token.In; stream >]
52 | "binary" -> [< 'Token.Binary; stream >]
53 | "unary" -> [< 'Token.Unary; stream >]
54 | "var" -> [< 'Token.Var; stream >]
55 | id -> [< 'Token.Ident id; stream >]
58 | [< ' ('\n'); stream=lex >] -> stream
