Come trovare il numero di core in fase di esecuzione in Haskell

Question

Haskell ha un metodo per determinare il numero di core CPU presenti su una macchina in fase di esecuzione?

Answer 1

Sì, esiste un tale metodo. Codice da "Real World Haskell": http://book.realworldhaskell.org/read/concurrent-and-multicore-programming.html

import GHC.Conc (numCapabilities) 

main = putStrLn $ "number of cores: " ++ show numCapabilities 

Answer 2

Si potrebbe Copy'n'Paste this code in un file chiamato numCores e compilarlo con il codice Haskell. Che è possibile utilizzare la FFI per importare la sua definizione e utilizzarlo direttamente nel codice Haskell:

{-# LANGUAGE ForeignFunctionInterface #-} 
import Control.Applicative ((<$>)) 
import Foreign.C.Types (CInt) 

foreign import ccall "getNumCores" c_getNumCores :: IO CInt 
getNumCores :: IO Int 
getNumCores = fromEnum <$> c_getNumCores 

Answer 3

A partire dalla versione 6.12, GHC RTS includes a function getNumberOfProcessors, che viene utilizzato per implementare +RTS -N. Puoi accedervi più o meno allo stesso modo delle normali funzioni straniere. Attenzione: GHC-only e funziona solo se il programma è stato costruito con -threaded:

{-# LANGUAGE ForeignFunctionInterface #-} 
import Foreign.C.Types (CInt) 

foreign import ccall "getNumberOfProcessors" c_getNumberOfProcessors :: IO CInt 

main :: IO() 
main = c_getNumberOfProcessors >>= print 

Testing:

$ ghc --make -threaded Main.hs 
[1 of 1] Compiling Main    (Main.hs, Main.o) 
Linking Main ... 
$ ./Main      
1 

Answer 4

Dal base 4.5 è possibile utilizzare getNumProcessors da GHC.Conc. Questo è buono poiché il numero di funzionalità può ora essere impostato dinamicamente con lo setNumCapabilities.

Answer 5

È GHC.Conc.getNumProcessors :: IO Int getNumCapabilities dice quante discussioni sono suggerito di GHC (e dipende +RTS -N parametro opzione.)