9 lines
215 B
Haskell
9 lines
215 B
Haskell
|
import Control.Monad
|
||
|
|
import Control.Concurrent
|
||
|
|
import System.Posix.User
|
||
|
|
|
||
|
|
main = do
|
||
|
|
void $ forkIO $ forever $ getGroupEntryForID 0
|
||
|
|
void $ forkIO $ forever $ getGroupEntryForID 0
|
||
|
|
threadDelay (3*1000*1000)
|