diff options
| author | Pierre Weis <Pierre.Weis@inria.fr> | 2009-03-30 07:21:02 +0000 |
|---|---|---|
| committer | Pierre Weis <Pierre.Weis@inria.fr> | 2009-03-30 07:21:02 +0000 |
| commit | cb77d49e01f00a0734e284037b34cdaa1ae1a68f (patch) | |
| tree | 2515a4491293396a8db6ba487ce46ddc8b431557 | |
| parent | 928e3fc13e8e6bcb0216045e832033cea44bd9b1 (diff) | |
Wrong scanning of continuation line breaks corrected (BR#4758).
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@9205 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
| -rw-r--r-- | stdlib/scanf.ml | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/stdlib/scanf.ml b/stdlib/scanf.ml index 7fabf64fd..45ae6b1a2 100644 --- a/stdlib/scanf.ml +++ b/stdlib/scanf.ml @@ -791,8 +791,7 @@ let scan_String max ib = | '\n', true | ' ', false -> skip_spaces false (Scanning.ignore_char ib max) - | '\\', false -> loop false max - | c, false -> loop false (Scanning.store_char ib c max) + | c, false -> loop false max | _, _ -> loop false (scan_backslash_char (max - 1) ib) in loop true max ;; |