@@ -14,12 +14,8 @@ demo1 = do
1414 runProcess node $ do
1515 liftIO $ print "Starting process"
1616 lpid1 <- spawnLocal (logger 1)
17−-- liftIO $ print "baz"
18−-- lpid2 <- spawnLocal (logger 2)
1917 spawnLocal (chatty "jim1" lpid1)
20−-- spawnLocal (chatty "jim2" lpid2)
2118 spawnLocal (chatty "bob1" lpid1)
22−-- spawnLocal (chatty "bob2" lpid2)
2319 liftIO $ threadDelay 500000
2420 return ()
2521