1
0
forked from GitHub/gf-core

pattern macros: oper f : pattern T = # p ; used as #f in patterns

This commit is contained in:
aarne
2009-05-18 15:01:18 +00:00
parent e3c0d8b49c
commit 3583561492
4 changed files with 27 additions and 8 deletions

View File

@@ -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"
}