Commit 9eddb2e6 authored by POTTIER Francois's avatar POTTIER Francois

Expose [first_symbol].

parent f777acc2
......@@ -1372,6 +1372,8 @@ module Analysis = struct
let first = FIRST.nonterminal
let first_symbol = FIRST.symbol
(* An initial definition of [nullable_first_prod]. *)
let nullable_first_prod prod i =
......
......@@ -438,6 +438,7 @@ module Analysis : sig
(* [first nt] is the FIRST set of the non-terminal symbol [nt]. *)
val first: Nonterminal.t -> TerminalSet.t
val first_symbol: Symbol.t -> TerminalSet.t
(* [nullable_first_prod prod i] considers the suffix of the production
[prod] defined by offset [i]. It returns its NULLABLE flag as well
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment