Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
Fixed topological sort in Consang (fix #716)
  • Loading branch information
GuillaumeBrochu committed Jan 30, 2019
1 parent 6a48966 commit db1ccab
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion lib/consang.ml
Expand Up @@ -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)
Expand Down

0 comments on commit db1ccab

Please sign in to comment.