Skip to content
Permalink
Browse files

Fixed topological sort in Consang (fix #716)

  • Loading branch information
GuillaumeBrochu committed Jan 29, 2019
1 parent 6a48966 commit db1ccaba6a47b2ad8861d22d92188dfadc3900e7
Showing with 1 addition and 1 deletion.
  1. +1 −1 lib/consang.ml
@@ -94,7 +94,7 @@ let topological_sort base poi =
| _ -> ()
done;
let todo =
let stop = nb_of_persons base - 1 in
let stop = nb_of_persons base in
let rec loop i acc =
if i >= stop then acc else
loop (i + 1) (if tab.(i) = 0 then i :: acc else acc)

0 comments on commit db1ccab

Please sign in to comment.
You can’t perform that action at this time.