Commit 41764446 authored by bguillaum's avatar bguillaum
Browse files

missing root dep in CONLL output

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/semagramme/libcaml-grew/trunk@7803 7838e531-6607-4d57-9587-6c381814729c
parent 5210adc4
......@@ -717,7 +717,7 @@ module G_graph = struct
let buff = Buffer.create 32 in
Gid_map.iter
(fun gid node ->
let (govs,labs) = List.split (try Gid_map.find gid govs_labs with Not_found -> []) in
let (govs,labs) = List.split (try Gid_map.find gid govs_labs with Not_found -> ["0","root"]) in
let fs = G_node.get_fs node in
bprintf buff "%d\t%s\t%s\t%s\t%s\t%s\t%s\t%s\t_\t_\n"
(get_num gid)
......
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