summaryrefslogtreecommitdiff
path: root/src/runtime/haskell/PGF/Macros.hs
diff options
context:
space:
mode:
authorkrasimir <krasimir@chalmers.se>2015-05-11 13:01:39 +0000
committerkrasimir <krasimir@chalmers.se>2015-05-11 13:01:39 +0000
commit1e0d7be4f4322836093d744c916fe02bfbcf9418 (patch)
tree21b259b2c9eb31ce9fbcfe5d168d1747f6a2c5c2 /src/runtime/haskell/PGF/Macros.hs
parent13998e32873758c0b1964a62f738b9916e666b86 (diff)
added all orthographic primitives
Diffstat (limited to 'src/runtime/haskell/PGF/Macros.hs')
-rw-r--r--src/runtime/haskell/PGF/Macros.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/runtime/haskell/PGF/Macros.hs b/src/runtime/haskell/PGF/Macros.hs
index 8ca2a4f29..42d16683a 100644
--- a/src/runtime/haskell/PGF/Macros.hs
+++ b/src/runtime/haskell/PGF/Macros.hs
@@ -220,7 +220,9 @@ computeSeq filter seq args = concatMap compute seq
compute SymNE = [LeafNE]
compute SymBIND = [LeafKS "&+"]
compute SymSOFT_BIND = []
+ compute SymSOFT_SPACE = []
compute SymCAPIT = [LeafKS "&|"]
+ compute SymALL_CAPIT = [LeafKS "&|"]
compute (SymKP syms alts) = [LeafKP (concatMap compute syms) [(concatMap compute syms,cs) | (syms,cs) <- alts]]
getArg d r