diff options
| author | Sébastien Dailly <sebastien@chimrod.com> | 2021-09-03 17:44:44 +0200 |
|---|---|---|
| committer | Sébastien Dailly <sebastien@chimrod.com> | 2021-09-03 17:44:44 +0200 |
| commit | 66cb521749672586fd5b1182b14e3c5d44829616 (patch) | |
| tree | 92adafc00225ce4775c3a98c59ac56582d4b0b5a /src/lib/reader.ml | |
| parent | 025faa27075a15d9f3b2cb7f29c2228d3e4cb049 (diff) | |
Extract representation in dedicated library
Diffstat (limited to 'src/lib/reader.ml')
| -rw-r--r-- | src/lib/reader.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lib/reader.ml b/src/lib/reader.ml index 45ea69e..9a8e840 100644 --- a/src/lib/reader.ml +++ b/src/lib/reader.ml @@ -7,7 +7,7 @@ let sound_to_string = fun t -> let buff = Buffer.create 16 in List.iter t - ~f:(fun f -> Buffer.add_string buff (Sounds.repr (module Sounds.Repr) f)); + ~f:(fun f -> Buffer.add_string buff (Sounds.repr (module Repr.Default) f)); Buffer.contents buff let succeed (res : Sounds.t list) = |