Idris2/tests/base/system_info001/NumProcessors.idr
2021-05-25 16:45:46 +01:00

7 lines
195 B
Idris

import System.Info
main : IO ()
main = do Just np <- getNProcessors
| Nothing => putStrLn "ERROR: Couldn't get number of processors!"
putStrLn $ (show np) ++ " processors"