working on API documentation

2006-01-10 20:51:08 +00:00
parent da26bfb246
commit a46c3d2b00
34 changed files with 217 additions and 274 deletions
--- a/lib/resource-1.0/english/AdjectiveEng.gf
+++ b/lib/resource-1.0/english/AdjectiveEng.gf
@@ -23,12 +23,8 @@ concrete AdjectiveEng of Adjective = CatEng ** open ResEng, Prelude in {
      isPre = False
      } ;

-    SentAP ap s = {
-      s = \\a => ap.s ! a ++ conjThat ++ s.s ; 
-      isPre = False
-      } ;
-    QuestAP ap qs = {
-      s = \\a => ap.s ! a ++ qs.s ! QIndir ; 
+    SentAP ap sc = {
+      s = \\a => ap.s ! a ++ sc.s ; 
      isPre = False
      } ;