Fix testsuite entry point.
Peeker: add MonadReader interface.
Peeker: add Data.Map peeker.
Peeker: add stateS.