revert to using simple strings in SC

This commit is contained in:
krangelov
2019-09-03 20:52:34 +02:00
parent b73c9ede2a
commit 8e70523718
6 changed files with 10 additions and 11 deletions
+1 -2
View File
@@ -1,4 +1,4 @@
concrete CatEng of Cat = CommonX - [Pol,SC,CAdv] ** open ResEng, Prelude in {
concrete CatEng of Cat = CommonX - [Pol,CAdv] ** open ResEng, Prelude in {
flags optimize=all_subs ;
@@ -49,7 +49,6 @@ concrete CatEng of Cat = CommonX - [Pol,SC,CAdv] ** open ResEng, Prelude in {
-- Adjective
AP = {s : Agr => Str ; isPre : Bool} ;
SC = {s : Agr => Str} ;
-- Noun