Skip to content

Instantly share code, notes, and snippets.

{-# LANGUAGE OverloadedStrings #-}
import Data.Attoparsec.Char8
import Data.Word
import Control.Applicative
data IP = IP Int Int Int Int deriving (Show)
parseIP :: Parser IP
parseIP = do
{-# LANGUAGE OverloadedStrings #-}
import Data.Attoparsec.Char8
import Data.Word
import Control.Applicative
data IP = IP Int Int Int Int deriving (Show)
data Command = PrivMsg String String
Failed to load resource http://localhost:8000/socket.io/1/?t=1392064293074
Firing ready event poker.js:340
Firing bet event poker.js:367
Firing bet event poker.js:350
Firing bet event poker.js:367
10
Firing ready event poker.js:340
23
Firing ready event poker.js:340