MyParser: hook for external parser

1 files changed, 13 insertions, 0 deletions

diff --git a/src/GF/API/MyParser.hs b/src/GF/API/MyParser.hs
new file mode 100644
index 000000000..3bb749a20
--- /dev/null
+++ b/src/GF/API/MyParser.hs
@@ -0,0 +1,13 @@
+module MyParser where
+
+import ShellState
+import CFIdent
+import CF
+import Operations
+
+-- template to define your own parser
+
+-- type CFParser = [CFTok] -> ([(CFTree,[CFTok])],String)
+
+myParser :: StateGrammar -> CFCat -> CFParser
+myParser gr cat toks = ([],"Would you like to add your own parser?")