Files
gf-core/lib/resource-1.0/spanish/TextSpa.gf
2006-02-20 22:11:57 +00:00

12 lines
283 B
Plaintext

concrete TextSpa of Text = {
-- This works for the special punctuation marks of Spanish.
lin
TEmpty = {s = []} ;
TFullStop x xs = {s = x.s ++ "." ++ xs.s} ;
TQuestMark x xs = {s = "¿" ++ x.s ++ "?" ++ xs.s} ;
TExclMark x xs = {s = "¡" ++ x.s ++ "!" ++ xs.s} ;
}