module Sound.OpenSoundControl (module Sound.OpenSoundControl.Type
,module Sound.OpenSoundControl.Time
,module Sound.OpenSoundControl.Transport
,module Sound.OpenSoundControl.Transport.UDP
,module Sound.OpenSoundControl.Transport.TCP
,C.encodeOSC,C.decodeOSC
,openUDP,udpServer
,openTCP,tcpServer) where
import Sound.OpenSoundControl.Coding.Decode.Binary as C
import Sound.OpenSoundControl.Coding.Encode.Builder as C
import Sound.OpenSoundControl.Type
import Sound.OpenSoundControl.Time
import Sound.OpenSoundControl.Transport
import Sound.OpenSoundControl.Transport.UDP
import Sound.OpenSoundControl.Transport.TCP
openUDP :: String -> Int -> IO UDP
openUDP = openUDP' (C.encodeOSC,C.decodeOSC)
udpServer :: String -> Int -> IO UDP
udpServer = udpServer' (C.encodeOSC,C.decodeOSC)
openTCP :: String -> Int -> IO TCP
openTCP = openTCP' (C.encodeOSC,C.decodeOSC)
tcpServer :: Int -> (TCP -> IO ()) -> IO ()
tcpServer = tcpServer' (C.encodeOSC,C.decodeOSC)