# NOT RUN {
# reads one character
streamParserNextChar(streamParserFromString("\U00B6"))
# reads a string
stream  <- streamParserFromString("Hello world")
cstream <- streamParserNextChar(stream)
while( cstream$status == "ok" ) {
    print(streamParserPosition(cstream$stream))
    print(cstream$char)
    cstream <- streamParserNextCharSeq(cstream$stream)
streamParserClose(stream)
}
# }
Run the code above in your browser using DataLab