~

2025-11-30 03:33:25 +01:00 · 2025-11-30 03:33:25 +01:00 · 9bf0a84095
commit 9bf0a84095
parent 11a69c9404
11 changed files with 186 additions and 196 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 =