mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-01 15:22:50 -06:00
Fix punctuation to use SOFT_BIND and BIND in the whole RGL
This commit is contained in:
@@ -1,10 +1,10 @@
|
||||
concrete TextMon of Text = CatMon ** {
|
||||
concrete TextMon of Text = CatMon ** open Prelude in {
|
||||
flags coding=utf8 ;
|
||||
|
||||
lin
|
||||
TEmpty = {s = []} ;
|
||||
TFullStop p t = {s = p.s ++ "." ++ t.s} ;
|
||||
TQuestMark p t = {s = p.s ++ "?" ++ t.s} ;
|
||||
TExclMark p t = {s = p.s ++ "!" ++ t.s} ;
|
||||
TFullStop p t = {s = p.s ++ SOFT_BIND ++ "." ++ t.s} ;
|
||||
TQuestMark p t = {s = p.s ++ SOFT_BIND ++ "?" ++ t.s} ;
|
||||
TExclMark p t = {s = p.s ++ SOFT_BIND ++ "!" ++ t.s} ;
|
||||
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user