diff options
| author | Pierre Weis <Pierre.Weis@inria.fr> | 2003-05-14 17:07:22 +0000 |
|---|---|---|
| committer | Pierre Weis <Pierre.Weis@inria.fr> | 2003-05-14 17:07:22 +0000 |
| commit | 2b7e706ab84a5143393555c9fefff3254afcb9bc (patch) | |
| tree | 6ec949fd176e5216ae80a162f690cc976670d292 /stdlib | |
| parent | 3712db9d8700fdb8c25d9c97fa4692cf90ab83f9 (diff) | |
Suppression code mort.
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@5565 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'stdlib')
| -rw-r--r-- | stdlib/scanf.ml | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/stdlib/scanf.ml b/stdlib/scanf.ml index 7fb919d40..6d0c43de6 100644 --- a/stdlib/scanf.ml +++ b/stdlib/scanf.ml @@ -698,10 +698,6 @@ let kscanf ib ef fmt f = | 'N' -> let x = Scanning.token_count ib in scan_fmt (stack f x) (i + 1) - | 'r' -> - Obj.magic (fun reader arg -> - let x = reader ib arg in - scan_fmt (stack f x) (succ i)) | c -> bad_format fmt i c and scan_fmt_stoppers i = |