iTasksTTY.dcl 287 Bytes
Newer Older
1 2
definition module iTasksTTY

Mart Lubbers's avatar
Mart Lubbers committed
3 4 5 6 7
from TTY import :: TTYSettings
import iTasks

derive class iTask TTYSettings

8 9
enterTTYSettings :: Task TTYSettings

Mart Lubbers's avatar
Mart Lubbers committed
10
syncSerialChannel :: TTYSettings (b -> String) (String -> (Either String [a], String)) (Shared ([a],[b],Bool)) -> Task () | iTask a & iTask b