mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-27 17:08:54 -06:00
remove the utf-8 flags
This commit is contained in:
@@ -1,5 +1,4 @@
|
||||
concrete AdjectiveMkd of Adjective = CatMkd ** open Prelude,ResMkd in {
|
||||
flags
|
||||
coding = "UTF-8" ;
|
||||
|
||||
lin PositA a = a ** {isPre = True} ;
|
||||
}
|
||||
@@ -1,4 +1,2 @@
|
||||
concrete GrammarMkd of Grammar = VerbMkd,SentenceMkd,NounMkd,AdjectiveMkd,NumeralMkd,PhraseMkd,TextX,StructuralMkd,TenseX ** {
|
||||
flags
|
||||
coding = "UTF-8" ;
|
||||
}
|
||||
@@ -1,6 +1,4 @@
|
||||
concrete NounMkd of Noun = CatMkd ** open Prelude,ResMkd in {
|
||||
flags
|
||||
coding = "UTF-8" ;
|
||||
lin AdjCN ap cn = {
|
||||
s = case ap.isPre of {
|
||||
True => \\s,n => ap.s ! s
|
||||
|
||||
@@ -1,6 +1,5 @@
|
||||
concrete SentenceMkd of Sentence = CatMkd ** open Prelude,ResMkd in {
|
||||
flags
|
||||
coding = "UTF-8" ;
|
||||
|
||||
lin PredVP np vp = {present = \\a => np.s ++ vp.present ! a ! np.n ! np.p ;
|
||||
aorist = np.s ++ vp.aorist ! np.n ! np.p ;
|
||||
participle = {aorist = \\a => np.s ++ vp.participle.aorist ! a !
|
||||
|
||||
@@ -1,6 +1,5 @@
|
||||
concrete VerbMkd of Verb = CatMkd ** open Prelude,ResMkd in {
|
||||
flags
|
||||
coding = "UTF-8" ;
|
||||
|
||||
lin ComplSlash vps np = {present = \\a,n,p => vps.present ! a ! n
|
||||
! p
|
||||
++ np.s;
|
||||
|
||||
Reference in New Issue
Block a user