mirror of
https://github.com/simplex-chat/simplexmq.git
synced 2026-05-16 11:35:21 +00:00
Evgeny Poberezkin
13 lines
206 B
Haskell
13 lines
206 B
Haskell
module Main where
|
|
|
|
import Network.Socket (ServiceName)
|
|
import Server (runSMPServer)
|
|
|
|
port :: ServiceName
|
|
port = "5223"
|
|
|
|
main :: IO ()
|
|
main = do
|
|
putStrLn $ "Listening on port " ++ port
|
|
runSMPServer port
|