Commit 34d90977 authored by POTTIER Francois's avatar POTTIER Francois

Remove [Action.filenames] from the .cmly API.

parent 31538de9
......@@ -76,7 +76,6 @@ module type GRAMMAR = sig
type t
val expr : t -> ocamlexpr
val keywords : t -> Keyword.keyword list
val filenames : t -> string list
end
module Production : sig
......
......@@ -54,7 +54,6 @@ type identifier = string
type action = {
a_expr: ocamlexpr;
a_keywords: Keyword.keyword list;
a_filenames: string list;
}
type producer_def =
......
......@@ -154,7 +154,6 @@ module Make (G : sig val grammar : grammar end) : GRAMMAR = struct
type t = action
let expr t = t.a_expr
let keywords t = t.a_keywords
let filenames t = t.a_filenames
end
module Production = struct
......
......@@ -70,7 +70,6 @@ let action (a : Action.t) : action =
{
a_expr = Printer.string_of_expr (Action.to_il_expr a);
a_keywords = Keyword.KeywordSet.elements (Action.keywords a);
a_filenames = Action.filenames a;
}
let rhs (prod : Production.index) : producer_def array =
......
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