a small example of a REPL server

[Catonano]

Could anyone write a small example of a REPL server for me ?

The manual indicates some functions but then the code for the REPL is
overwhelming

A really small example, like the one for reading strings from the current
input port that I offered in another thread, would help

>From that, I could start for learning how to make it concurrent and maybe
let it talk a different protocol

Thanks