diff options
| author | Hongbo Zhang <bobzhang1988 AT gmail.com> | 2013-06-02 14:42:33 +0000 |
|---|---|---|
| committer | Hongbo Zhang <bobzhang1988 AT gmail.com> | 2013-06-02 14:42:33 +0000 |
| commit | e97c59d045e33e4bfe31839dd6edd71b549d5c10 (patch) | |
| tree | 3fc691bbb44eeb254a36b31c50f4bd12107138ab | |
| parent | 3fd8ecd355ab681d1dc728b99228d61d586597f0 (diff) | |
fix scanf.ml build
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@13728 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
| -rw-r--r-- | stdlib/scanf.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/stdlib/scanf.ml b/stdlib/scanf.ml index 44199a98c..8f694fd3a 100644 --- a/stdlib/scanf.ml +++ b/stdlib/scanf.ml @@ -637,7 +637,7 @@ let scan_digits_plus basis digitp width ib = let width = Scanning.store_char width ib c in scan_digits width else - bad_input (Printf.sprintf "character %C is not a valid %s digit" basis) + bad_input (Printf.sprintf "character %C is not a valid %s digit" c basis) ;; let is_binary_digit = function |