]> git.rmz.io Git - my-scheme.git/commit
Support escaped quotes
authorSamir Benmendil <me@rmz.io>
Sat, 20 Jan 2018 22:32:20 +0000 (22:32 +0000)
committerSamir Benmendil <me@rmz.io>
Sat, 20 Jan 2018 22:32:50 +0000 (22:32 +0000)
commit3144d06ee882e88a81a02c532061a48997506cf6
treea63f35e26c93f115587c0eadc0cbff8e35b6bac8
parent0a6833657330f8514c235e672b1d4dc6e1ec7ad5
Support escaped quotes

`innerChar` matches a char that is not a backslash or a quote. If it is
either, it will match a backslash, capture a following quote and lift a
quote char into the `innerChar` monad.

This will not support anything other than quote after the backslash char.
app/Main.hs