diff options
Diffstat (limited to 'src/bin/transcriptor.ml')
| -rw-r--r-- | src/bin/transcriptor.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/bin/transcriptor.ml b/src/bin/transcriptor.ml index feb24db..d759452 100644 --- a/src/bin/transcriptor.ml +++ b/src/bin/transcriptor.ml @@ -14,7 +14,7 @@ let process (optional_line : string option) = | Ok response -> print_endline response | Error err -> print_endline err in let res2 = Result.map - (fun t-> Sounds.repr (module Repr.Tengwar) t) + (fun t-> Sounds.repr (module Repr.Anatar) t) result in let () = match res2 with | Ok response -> print_endline response |