Maj ghc 8.0 + add sock5 types

app/Main.hs

@@ -6,8 +6,7 @@ module Main where
 
 import           Tunnel
 
-import           ClassyPrelude          (ByteString, guard, readMay,
-                                         traceShowId)
+import           ClassyPrelude          (ByteString, guard, readMay)
 import qualified Data.ByteString.Char8  as BC
 import           Data.Maybe             (fromMaybe)
 import           System.Console.CmdArgs

src/Protocols.hs

@@ -31,7 +31,6 @@ deriving instance Hashable N.SockAddr
 
 data Protocol = UDP | TCP deriving (Show, Read)
 
-
 data UdpAppData = UdpAppData
   { appAddr  :: N.SockAddr
   , appSem   :: MVar ByteString

stack.yaml

@@ -15,7 +15,7 @@
 # resolver:
 #  name: custom-snapshot
 #  location: "./custom-snapshot.yaml"
-resolver: lts-5.17
+resolver: nightly-2016-06-12
 
 # User packages to be built.
 # Various formats can be used as shown in the example below.

wstunnel.cabal

@@ -28,6 +28,7 @@ library
                      , connection
                      , hslogger
                      , base64-bytestring >= 1.0
+                     , binary >= 0.7
 
   default-language:    Haskell2010