GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-21 18:59:32 -06:00
Code Issues Packages Projects Releases Wiki Activity

Add support for CAPIT and ALL_CAPIT

Browse Source
This commit is contained in:
John J. Camilleri
2021-02-16 15:17:54 +01:00
parent 21f14c2aa1
commit d394cacddf
6 changed files with 15 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
testsuite/lpgf/Bind.gf
View File

@@ -7,4 +7,6 @@ abstract Bind = {
bind : S -> S -> S ;
softbind : S -> S -> S ;
softspace : S -> S -> S ;
capit : S -> S ;
allcapit : S -> S ;
}

3
testsuite/lpgf/Bind.treebank
View File

@@ -15,3 +15,6 @@ BindCnc: hello theregoodbye
Bind: softspace f1 f2
BindCnc: hello there goodbye
Bind: concat (capit f1) (allcapit f2)
BindCnc: Hello there GOODBYE

1
testsuite/lpgf/Bind.trees
View File

@@ -4,3 +4,4 @@ concat f1 f2
bind f1 f2
softbind f1 f2
softspace f1 f2
concat (capit f1) (allcapit f2)

2
testsuite/lpgf/BindCnc.gf
View File

@@ -8,4 +8,6 @@ concrete BindCnc of Bind = open Prelude in {
bind a b = ss (a.s ++ BIND ++ b.s) ;
softbind a b = ss (a.s ++ SOFT_BIND ++ b.s) ;
softspace a b = ss (a.s ++ SOFT_SPACE ++ b.s) ;
capit a = ss (CAPIT ++ a.s) ;
allcapit a = ss (ALL_CAPIT ++ a.s) ;
}