Devices/mTaskTCP.dcl

   1 definition module Devices.mTaskTCP
   2
   3 import Devices.mTaskDevice
   4 import iTasks
   5
   6 :: TCPSettings = {host :: String, port :: Int}
   7 derive class iTask TCPSettings
   8
   9 getmTaskTCPDevice :: Task MTaskResource
  10 instance MTaskDuplex TCPSettings