more accurate treatment of negative "have" clauses in Phrasebook

2010-05-29 09:18:20 +00:00
parent deacb02195
commit 510a404467
6 changed files with 40 additions and 10 deletions
--- a/examples/phrasebook/SentencesDut.gf
+++ b/examples/phrasebook/SentencesDut.gf
@@ -1,4 +1,13 @@
-concrete SentencesDut of Sentences = NumeralDut ** SentencesI with 
+concrete SentencesDut of Sentences = NumeralDut ** SentencesI - 
+  [SHaveNo,SHaveNoMass]
+  with 
  (Syntax = SyntaxDut),
  (Symbolic = SymbolicDut),
-  (Lexicon = LexiconDut) ;
+  (Lexicon = LexiconDut) ** open Prelude, SyntaxDut in {
+
+  lin 
+    SHaveNo p k = mkS (mkCl p.name have_V2 (mkNP no_Quant plNum k)) ;
+    SHaveNoMass p k = mkS (mkCl p.name have_V2 (mkNP no_Quant k)) ;
+
+}
+