(Est) Replace all {lock_C = <>} with lin C {...}

This commit is contained in:
Inari Listenmaa
2022-04-14 20:02:44 +08:00
parent 76f23214c1
commit 4e8ff8e7fd
8 changed files with 91 additions and 117 deletions

View File

@@ -178,13 +178,8 @@ concrete NounEst of Noun = CatEst ** open ResEst, HjkEst, MorphoEst, Prelude in
UseN2 n = n ;
Use2N3 f = lin N2 {
s = f.s ;
c2 = f.c2 ;
isPre = f.isPre
} ;
Use3N3 f = lin N2 {
s = f.s ;
Use2N3 f = f ;
Use3N3 f = f ** {
c2 = f.c3 ;
isPre = f.isPre2
} ;