From: malc <av1474@comtv.ru>
To: "Daniel Bünzli" <daniel.buenzli@erratique.ch>
Cc: caml-list@inria.fr
Subject: Re: [Caml-list] Cross-platform cpu count
Date: Fri, 2 Sep 2011 04:38:34 +0400 (MSD) [thread overview]
Message-ID: <alpine.LNX.2.00.1109020437270.18561@linmac> (raw)
In-Reply-To: <CALgo1QJh+q4b9HA4vbS4WSiWxGvhaSexh0i=z=OLQo=dxbuSAg@mail.gmail.com>
On Fri, 2 Sep 2011, Daniel B?nzli wrote:
> Hello,
>
> Can anybody confirm me that the following code works on cygwin :
>
> let cpu_count () =
> try match Sys.os_type with
> | "Win32" -> int_of_string (Sys.getenv "NUMBER_OF_PROCESSORS")
> | _ ->
> let i = Unix.open_process_in "getconf _NPROCESSORS_ONLN" in
> let close () = ignore (Unix.close_process_in i) in
> try Scanf.fscanf i "%d" (fun n -> close (); n) with e -> close (); raise e
> with
> | Not_found | Sys_error _ | Failure _ | Scanf.Scan_failure _
> | End_of_file | Unix.Unix_error (_, _, _) -> 1
>
> Thanks,
>
http://repo.or.cz/w/apc.git/blob/55de75ccb853f5e4443fd484e5eb95e1342e72bd:/ml_apc.c
has code to get number of cpus for linux/windows/solaris and osx
--
mailto:av1474@comtv.ru
next prev parent reply other threads:[~2011-09-02 0:38 UTC|newest]
Thread overview: 11+ messages / expand[flat|nested] mbox.gz Atom feed top
2011-09-02 0:04 Daniel Bünzli
2011-09-02 0:38 ` malc [this message]
2011-09-02 0:47 ` Daniel Bünzli
2011-09-02 7:39 ` David Allsopp
2011-09-02 10:03 ` Daniel Bünzli
2011-09-02 12:51 ` malc
2011-09-02 13:05 ` David Allsopp
2011-09-02 13:42 ` malc
2011-09-02 7:51 ` Richard W.M. Jones
2011-09-02 8:19 ` David Allsopp
2011-09-02 14:58 ` Richard W.M. Jones
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=alpine.LNX.2.00.1109020437270.18561@linmac \
--to=av1474@comtv.ru \
--cc=caml-list@inria.fr \
--cc=daniel.buenzli@erratique.ch \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox