Version française
Home     About     Download     Resources     Contact us    

This site is updated infrequently. For up-to-date information, please visit the new OCaml website at

Browse thread
[Caml-list] Strange slowness of input_line on mingw
[ Home ] [ Index: by date | by threads ]
[ Search: ]

[ Message by date: previous | next ] [ Message in thread: previous | next ] [ Thread: previous | next ]
Date: 2002-10-24 (14:05)
From: Yaron M. Minsky <yminsky@C...>
Subject: [Caml-list] Strange slowness of input_line on mingw
I've noticed some strangely slow behavior from input_line on mingw.  I
wrote a simple loop to scan through a file, and found that for a given
file, it took about 10 seconds to run, whereas wc -l took only a small
fraction of a second -- the difference was about a factor of 70.  This is
on a W2K machine using mingw.  On the other hand, using the same file on a
linux box, the difference between wc -l and my code was only about a
factor of 3.
Any ideas where the big difference might be coming from?   The code I
wrote is attached below.

open Printf

let fname = try Sys.argv.(1) with _ -> printf "Must provide filename\n";
exit (-1)let file = open_in fname
(* let read = Newparse.create_tick_reader file*)

let () =
    while true do
      ignore (input_line file);
      End_of_file -> printf "File ended.  Hah!\n"

|--------/            Yaron M. Minsky              \--------|
|--------\ /--------|

Open PGP --- KeyID B1FFD916 (new key as of Dec 4th)
Fingerprint: 5BF6 83E1 0CE3 1043 95D8 F8D5 9F12 B3A9 B1FF D916

To unsubscribe, mail Archives:
Bug reports: FAQ:
Beginner's list: