s <- openSerial \"\/dev\/ttyUSB0\" B9600 8 One NoParity NoFlowControl forM_ \"AT\\r\" $ sendChar s -- from Control.Monad.Loops response <- unfoldM (recvChar s) print response closeSerial s
- data StopBits
- data Parity
- data FlowControl
- data BaudRate
- data SerialPort
- hOpenSerial :: String -> BaudRate -> Word8 -> StopBits -> Parity -> FlowControl -> IO Handle
- openSerial :: String -> BaudRate -> Word8 -> StopBits -> Parity -> FlowControl -> IO SerialPort
- sendChar :: SerialPort -> Char -> IO ()
- recvChar :: SerialPort -> IO (Maybe Char)
- closeSerial :: SerialPort -> IO ()
Types
data BaudRate
data SerialPort Source
Simple, non-portable.
:: String | The filename of the serial port, such as |
-> BaudRate | |
-> Word8 | The number of bits per word, typically 8 |
-> StopBits | Almost always |
-> Parity | Error checking |
-> FlowControl | |
-> IO Handle |
Open and configure a serial port and return a Handle
Portable methods.
:: String | The filename of the serial port, such as |
-> BaudRate | |
-> Word8 | The number of bits per word, typically 8 |
-> StopBits | Almost always |
-> Parity | |
-> FlowControl | |
-> IO SerialPort |
closeSerial :: SerialPort -> IO ()Source