Commit 5e1f8dc5 authored by Bruno Guillaume's avatar Bruno Guillaume
Browse files

can count without pattern

parent bf54d325
......@@ -221,9 +221,6 @@ let clean () =
let count () =
handle
(fun () ->
match !Grew_args.patterns with
| [] -> Log.fwarning "No pattern given (use option -patterns)"
| _ ->
printf "Corpus\t# sentences";
List.iter (fun p -> printf "\t%s" (p |> Filename.basename |> Filename.remove_extension)) !Grew_args.patterns;
printf "\n";
......
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