From mboxrd@z Thu Jan 1 00:00:00 1970 Received: (from majordomo@localhost) by pauillac.inria.fr (8.7.6/8.7.3) id LAA21449; Thu, 13 Mar 2003 11:45:33 +0100 (MET) X-Authentication-Warning: pauillac.inria.fr: majordomo set sender to owner-caml-list@pauillac.inria.fr using -f Received: from concorde.inria.fr (concorde.inria.fr [192.93.2.39]) by pauillac.inria.fr (8.7.6/8.7.3) with ESMTP id LAA22329 for ; Thu, 13 Mar 2003 11:45:31 +0100 (MET) Received: from quux.msi.co.jp (quux.msi.co.jp [192.51.54.2]) by concorde.inria.fr (8.11.1/8.11.1) with ESMTP id h2DAjTf06356 for ; Thu, 13 Mar 2003 11:45:29 +0100 (MET) Received: from hide.msi.co.jp (hide.msi.co.jp [192.51.54.11]) by quux.msi.co.jp (8.9.3/3.7W01081412-msi-ms) with SMTP id TAA07888 for ; Thu, 13 Mar 2003 19:45:27 +0900 (JST) Received: from asuka.msi.co.jp ([192.51.53.132]) by hide.msi.co.jp (SAVSMTP 3.0.0.44) with SMTP id M2003031319452514896 for ; Thu, 13 Mar 2003 19:45:25 +0900 Received: from localhost (grover.msi.co.jp [192.51.53.141]) by asuka.msi.co.jp (8.8.8+Sun/8.8.8) with ESMTP id TAA28852 for ; Thu, 13 Mar 2003 19:45:11 +0900 (JST) To: caml-list@inria.fr Subject: Re: [Caml-list] how to do a browser In-Reply-To: References: X-Mailer: Mew version 1.94.2 on Emacs 20.7 / Mule 4.0 (HANANOEN) Mime-Version: 1.0 Content-Type: Text/Plain; charset=us-ascii Content-Transfer-Encoding: 7bit Message-Id: <20030313194508H.ikeda@msi.co.jp> Date: Thu, 13 Mar 2003 19:45:08 +0900 From: IKEDA Katsumi X-Dispatcher: imput version 990905(IM130) X-Spam: no; 0.00; ikeda:01 katsumi:01 caml-list:01 vjo:99 00008:99 listbox:01 opendir:01 readdir:01 endline:01 usr:01 unix:02 suppose:03 let:04 ocamlbrowser:06 path:06 Sender: owner-caml-list@pauillac.inria.fr Precedence: bulk Hi, From: "deerf hal" Message-ID: > > i have look to ocamlbrowser sources but it is a little bit hard to > understand the code. > i suppose that could be done with a listbox (with option brower) but i don't > know how to have the list of the files of a directory > thank To have it, use Unix.opendir and Unix.readdir. For example, let my_ls path = let dh = Unix.opendir path in try while (true) do print_endline (Unix.readdir dh); done with End_of_file -> ();; # my_ls "/usr";; Regards, -- IKEDA Katsumi ------------------- To unsubscribe, mail caml-list-request@inria.fr Archives: http://caml.inria.fr Bug reports: http://caml.inria.fr/bin/caml-bugs FAQ: http://caml.inria.fr/FAQ/ Beginner's list: http://groups.yahoo.com/group/ocaml_beginners