mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-07 18:22:50 -06:00
10 lines
207 B
Plaintext
10 lines
207 B
Plaintext
concrete LiteralsCnc of Literals = open Prelude in {
|
|
lincat S = SS ;
|
|
lin
|
|
mkString s = ss ("«" ++ s.s ++ "»") ;
|
|
mkInt s = s ;
|
|
mkFloat s = s ;
|
|
|
|
and s1 s2 = ss (s1.s ++ "and" ++ s2.s) ;
|
|
}
|