summaryrefslogtreecommitdiff
path: root/src/GF/Grammar
diff options
context:
space:
mode:
authoraarne <aarne@chalmers.se>2009-05-18 15:01:18 +0000
committeraarne <aarne@chalmers.se>2009-05-18 15:01:18 +0000
commit7508fa578551672711fcec8c4b37d79c3a3de5ef (patch)
tree5825bf5dfbc57951c2606c6ec1f80bfa4748cf61 /src/GF/Grammar
parent953c77a08ac708a6f3ee0d8103d80c40e306b77f (diff)
pattern macros: oper f : pattern T = # p ; used as #f in patterns
Diffstat (limited to 'src/GF/Grammar')
-rw-r--r--src/GF/Grammar/Parser.y2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/GF/Grammar/Parser.y b/src/GF/Grammar/Parser.y
index 136480799..fbdb541b4 100644
--- a/src/GF/Grammar/Parser.y
+++ b/src/GF/Grammar/Parser.y
@@ -736,6 +736,8 @@ mkAlts cs = case cs of
return $ Strs $ as ++ bs
PString s -> return $ Strs [K s]
PV x -> return (Vr x) --- for macros; not yet complete
+ PMacro x -> return (Vr x) --- for macros; not yet complete
+ PM m c -> return (Q m c) --- for macros; not yet complete
_ -> fail "no strs from pattern"
}