summaryrefslogtreecommitdiff
path: root/src/GF/Canon
diff options
context:
space:
mode:
authorpeb <unknown>2005-06-23 12:23:01 +0000
committerpeb <unknown>2005-06-23 12:23:01 +0000
commit34e441d2e35ade46ed560bf7f4139c16a7b0c505 (patch)
treef07cac8cfbbea05dcc5576e6b94e5d9a4b920983 /src/GF/Canon
parent46e7ad75aaf247cf477e57a8974fe253f209e6e6 (diff)
"Committed_by_peb"
Diffstat (limited to 'src/GF/Canon')
-rw-r--r--src/GF/Canon/CMacros.hs9
1 files changed, 6 insertions, 3 deletions
diff --git a/src/GF/Canon/CMacros.hs b/src/GF/Canon/CMacros.hs
index 69ef2e8ee..77f4b0027 100644
--- a/src/GF/Canon/CMacros.hs
+++ b/src/GF/Canon/CMacros.hs
@@ -5,9 +5,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
--- > CVS $Date: 2005/06/17 14:15:17 $
--- > CVS $Author: bringert $
--- > CVS $Revision: 1.25 $
+-- > CVS $Date: 2005/06/23 13:23:01 $
+-- > CVS $Author: peb $
+-- > CVS $Revision: 1.26 $
--
-- Macros for building and analysing terms in GFC concrete syntax.
--
@@ -290,4 +290,7 @@ composOp co trm =
do
as' <- mapM co as
return (FV as')
+ -- peb tried to do this, but then there were errors in GF.Canon.Look.ccompute:
+ -- V x as -> do as' <- mapM co as
+ -- return (V x as')
_ -> return trm -- covers Arg, I, LI, K, E