Commit 928bf589 authored by Bruno Guillaume's avatar Bruno Guillaume

add efs in node output

parent fb8719fc
......@@ -939,7 +939,7 @@ module G_graph = struct
xpos = (match G_fs.get_string_atom "pos" fs with Some p -> p | None -> "_");
feats = (G_fs.to_conll ~exclude: ["phon"; "lemma"; "cat"; "pos"; "position"] fs);
deps = List.map (fun (gov,lab) -> ( Conll.Id.of_string gov, lab)) sorted_gov_labs;
efs = [];
efs = G_node.get_efs node;
} ) snodes in
{
Conll.file = None;
......
......@@ -75,6 +75,8 @@ module G_node = struct
| Some l -> Some {t with next = l}
| None -> None
let get_efs n = n.efs
let string_efs n = match n.efs with
| [] -> "_"
| list -> String.concat "|" (List.map (fun (f,v) -> sprintf "%s=%s" f v) list)
......
......@@ -53,6 +53,7 @@ module G_node: sig
val get_name: Gid.t -> t -> string
val get_efs: t -> (string * string) list
val string_efs: t -> string
val is_conll_root: t -> bool
......
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