more accurate treatment of negative "have" clauses in Phrasebook

1 files changed, 7 insertions, 3 deletions

diff --git a/examples/phrasebook/SentencesGer.gf b/examples/phrasebook/SentencesGer.gf
index 22facc45c..e33f0f0c6 100644
--- a/examples/phrasebook/SentencesGer.gf
+++ b/examples/phrasebook/SentencesGer.gf
@@ -1,8 +1,12 @@
-concrete SentencesGer of Sentences = NumeralGer ** SentencesI - [PYesToNo] with 
+concrete SentencesGer of Sentences = NumeralGer ** SentencesI - 
+  [PYesToNo,SHaveNo,SHaveNoMass] with 
   (Syntax = SyntaxGer),
   (Symbolic = SymbolicGer),
-  (Lexicon = LexiconGer) ** open Prelude in {
+  (Lexicon = LexiconGer) ** open Prelude, SyntaxGer in {
 
-  lin PYesToNo = mkPhrase (lin Utt (ss "doch")) ;
+  lin 
+    PYesToNo = mkPhrase (lin Utt (ss "doch")) ;
+    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)) ;
 
 }