ilyakooo0/syntax
1
0
Fork 0
mirror of https://github.com/ilyakooo0/syntax.git synced 2024-07-07 04:26:23 +03:00
Code Issues Projects Releases Wiki Activity

Add missing implementation of *vecN for ReaderCT.

Browse Source
This commit is contained in:
Paweł Nowak 2014-12-15 20:26:52 +01:00
parent d0ca4e212a
commit 64f67b7102
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Data/Syntax.hs
View File

@ -166,6 +166,10 @@ instance Syntax syn => Syntax (ReaderCT env syn) where
takeWhile1 = clift . takeWhile1
takeTill = clift . takeTill
takeTill1 = clift . takeTill1
vecN n e = ReaderCT $ vecN n . runReaderCT e
ivecN n e = ReaderCT $ ivecN n . runReaderCT e
uvecN n e = ReaderCT $ uvecN n . runReaderCT e
uivecN n e = ReaderCT $ uivecN n . runReaderCT e
-- | Execute a computation in an isolated context.
--