Fixed typo

85950981 · Louis Duchemin · daf6fca8 · 85950981
Commit 85950981 authored Oct 23, 2020 by Louis Duchemin
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

lib/toolbox/gemma.ml lib/toolbox/gemma.ml +1 -1

No files found.
--- a/lib/toolbox/gemma.ml
+++ b/lib/toolbox/gemma.ml
@@ -76,7 +76,7 @@ module Result_file = struct

  let parse_locus_id locus_id =
    match String.split ~on:'_' locus_id with
-    | [ _;+ index; residue ] -> (Int.of_string index, Char.of_string residue)
+    | [ _; index; residue ] -> (Int.of_string index, Char.of_string residue)
    | _ -> failwith "Locus ID parsing failed"

  let parse_line pval_parser fields =