From 64f67b710209adc1ce5a77975d6d55e7203cccd1 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Pawe=C5=82=20Nowak?= <pawel834@gmail.com>
Date: Mon, 15 Dec 2014 20:26:52 +0100
Subject: [PATCH] Add missing implementation of *vecN for ReaderCT.

---
 Data/Syntax.hs | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/Data/Syntax.hs b/Data/Syntax.hs
index 18540f5..abf9bb9 100644
--- a/Data/Syntax.hs
+++ b/Data/Syntax.hs
@@ -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.
 --