Prototyping oinc server in haskell