summaryrefslogtreecommitdiff
path: root/src/compiler/GF/Speech
diff options
context:
space:
mode:
authorkr.angelov <kr.angelov@gmail.com>2014-10-09 19:34:12 +0000
committerkr.angelov <kr.angelov@gmail.com>2014-10-09 19:34:12 +0000
commitf8b73d593ca147e48a723d3dceda7c5977d21ae6 (patch)
tree674b540b555f240ca2b32f65cb86e233cd1f2af9 /src/compiler/GF/Speech
parent86e9acc7a7b714307e08ab25117ca03cecb00936 (diff)
Prelude.CAPIT is now a built-in primitive. It still generates &| in the Haskell runtime but will be intepreted in the C runtime
Diffstat (limited to 'src/compiler/GF/Speech')
-rw-r--r--src/compiler/GF/Speech/PGFToCFG.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/compiler/GF/Speech/PGFToCFG.hs b/src/compiler/GF/Speech/PGFToCFG.hs
index 49744f22e..e5090fa0f 100644
--- a/src/compiler/GF/Speech/PGFToCFG.hs
+++ b/src/compiler/GF/Speech/PGFToCFG.hs
@@ -97,6 +97,7 @@ pgfToCFG pgf lang = mkCFG (showCId (lookStartCat pgf)) extCats (startRules ++ co
---- AR 3/6/2010
symbolToCFSymbol SymBIND = [Terminal "&+"]
symbolToCFSymbol SymSOFT_BIND = []
+ symbolToCFSymbol SymCAPIT = [Terminal "&|"]
symbolToCFSymbol SymNE = []
fixProfile :: Array DotPos Symbol -> Int -> Profile