~

2025-11-30 10:26:34 +01:00 · 2025-11-30 10:26:34 +01:00 · b5e73d487c
commit b5e73d487c
parent f468380451
10 changed files with 92 additions and 106 deletions
--- a/src/amount.ml
+++ b/src/amount.ml
@ -56,7 +56,8 @@ let of_string =
    choice
      [
        char '+' *> return (Some Sign_plus);
-        char '-' *> return (Some Sign_minus); return None;
+        char '-' *> return (Some Sign_minus);
+        return None;
      ]
  in
  let parse_currency =