Debug info

4 files changed, 42 insertions, 102 deletions

diff --git a/data/new-sample-grammars/cbs.gram b/data/new-sample-grammars/cbs.gram
index dd3e76d..a72de3e 100755
--- a/data/new-sample-grammars/cbs.gram
+++ b/data/new-sample-grammars/cbs.gram
@@ -94,17 +94,12 @@ pragma prefix-with [boss-title] [boss-title-co] [boss-title-vice]
 	Technical
 	Manifesto
 
-[boss-department] [boss-department-1]
-	[boss-department-1]
-	[boss-department-1]
-	[boss-department-1]
+[boss-department] <^4> [boss-department-1]
 	[boss-department-2]
 
 [boss-officer] Catalyst
 	Futurist
-	Officer
-	Officer
-	Officer
+	<^3> Officer
 
 [boss-dept-of] of [boss-department-1]
 
@@ -536,8 +531,7 @@ pragma export-rule [boss]
 	game changer
 	visionary
 
-[person-single] [person-single-spec]
-	[person-single-spec]
+[person-single] <^2> [person-single-spec]
 	[boss]
 
 [person-plural] key people
@@ -940,22 +934,12 @@ pragma export-rule [boss]
 
 pragma export-rule [growth]
 
-[thing-with-adj] [thing-adjective] , [thing-adjective] [thing-atom]
-	[thing-adjective] , [thing-adjective] [thing-atom]
-	[thing-adjective] , [thing-adjective] [thing-atom]
-	[thing-adjective] and [thing-adjective] [thing-atom]
-	[thing-adjective] and [thing-adjective] [thing-atom]
-	[thing-adjective] and [thing-adjective] [thing-atom]
-	[thing-adjective] [thing-atom]
-	[thing-adjective] [thing-atom]
-	[thing-adjective] [thing-atom]
-	[thing-adjective] [thing-atom]
-	[thing-adjective] [thing-atom]
-	[thing-adjective] and/or [thing-adjective] [thing-atom]
-	[thing-adjective] and/or [thing-adjective] [thing-atom]
+[thing-with-adj] <^3> [thing-adjective] , [thing-adjective] [thing-atom]
+	<^3> [thing-adjective] and [thing-adjective] [thing-atom]
+	<^4> [thing-adjective] [thing-atom]
+	<^2> [thing-adjective] and/or [thing-adjective] [thing-atom]
 	[growth]
-	[thing-adjective] [thing-adjective] [thing-adjective] [thing-atom]
-	[thing-adjective] [thing-adjective] [thing-adjective] [thing-adjective] [thing-atom]
+	<^2> [thing-adjective] [thing-adjective] [thing-adjective] [thing-atom]
 
 [thing] [thing-with-adj]
 	[thing-atom]
@@ -1023,21 +1007,13 @@ pragma export-rule [thing]
 	gradually
 	aggressively
 
-[eventual-adverb] {empty}
-	{empty}
-	{empty}
+[eventual-adverb] <^3> {empty}
 	[eventual-adverb-1]
 
 [random-article] the
 	our
-	a
-	an
-	a
-	an
-	a
-	an
-	a
-	an
+	<^4> a
+	<^4> an
 	{empty}
 
 [eventual-postfix-adverb-1] going forward
@@ -1082,10 +1058,7 @@ pragma export-rule [thing]
 	, paving the way for [random-article] [thing]
 
 [eventual-postfix-adverb] [eventual-postfix-adverb-1]
-	{empty}
-	{empty}
-	{empty}
-	{empty}
+	<^4> {empty}
 
 pragma export-rule [eventual-postfix-adverb-1]
 
@@ -1306,19 +1279,11 @@ pragma export-rule [eventual-postfix-adverb-1]
 [thing-verb-def-ending] add value
 	deliver maximum impact
 
-[thing-verb-ending] [thing-verb-thing] [random-article] [thing]
-	[thing-verb-thing] [random-article] [thing]
-	[thing-verb-thing] [random-article] [thing]
-	[thing-verb-thing] [random-article] [thing]
-	[thing-verb-person] the [person]
-	[thing-verb-person] the [person]
-	[thing-verb-person] the [person]
-	[thing-verb-person] the [person]
+[thing-verb-ending] <^4> [thing-verb-thing] [random-article] [thing]
+	<^4> [thing-verb-person] the [person]
 	[thing-verb-def-ending]
 
-[person-verb-ending] [person-verb-def-ending]
-	[person-verb-def-ending]
-	[person-verb-def-ending]
+[person-verb-ending] <^3> [person-verb-def-ending]
 	[person-verb-badthing] [random-article] [bad-things]
 	[person-verb-thing] [random-article] [thing]
 
@@ -1343,12 +1308,8 @@ pragma export-rule [verbphrase-coll-1]
 	we will sharpen our business models to
 
 [proposition] [faukon] [person-verb-ending] [eventual-postfix-adverb]
-	the [person] [eventual-adverb] [person-verb-ending]
-	the [person] [eventual-adverb] [person-verb-ending]
-	the [person] [eventual-adverb] [person-verb-ending]
-	[random-article] [thing] [eventual-adverb] [thing-verb-ending] [eventual-postfix-adverb]
-	[random-article] [thing] [eventual-adverb] [thing-verb-ending] [eventual-postfix-adverb]
-	[random-article] [thing] [eventual-adverb] [thing-verb-ending] [eventual-postfix-adverb]
+	<^3> the [person] [eventual-adverb] [person-verb-ending]
+	<^3> [random-article] [thing] [eventual-adverb] [thing-verb-ending] [eventual-postfix-adverb]
 	[thing] and [thing] [eventual-adverb] [thing-verb-ending] [eventual-postfix-adverb]
 	[thing] , [thing] and [thing] [eventual-adverb] [thing-verb-ending] [eventual-postfix-adverb]
 	there can be no [growth] until we can achieve [random-article] [growth]
diff --git a/data/new-sample-grammars/drakensang/armor.gram b/data/new-sample-grammars/drakensang/armor.gram
index 090b69d..b36d93c 100644
--- a/data/new-sample-grammars/drakensang/armor.gram
+++ b/data/new-sample-grammars/drakensang/armor.gram
@@ -61,21 +61,16 @@ pragma initial-rule [ds-armor]
 	mitts
 	jerkin
 
-[ranger-armorprefix] [ranger-armorprefix-1]
-	[ranger-armormaterial]
-	[ranger-armorprefix-combo]
+[ranger-armorprefix] {empty}
+
+pragma prefix-with [ranger-armorprefix] [ranger-armormaterial] [ranger-armorprefix-1]
+pragma prefix-with [ranger-armorprefix] [ranger-armorprefix-prefix]
 
 [ranger-armorprefix-prefix] grim
 	fearsome
 	spirit
 	cave
 
-pragma prefix-with [ranger-armorprefix] [ranger-armorprefix-prefix]
-
-[ranger-armorprefix-combo] {empty} 
-
-pragma prefix-with [ranger-armorprefix-combo] [ranger-armormaterial] [ranger-armorprefix-1]
-
 [ranger-armorprefix-1] stalkers
 	hunters
 	wolf
@@ -112,11 +107,9 @@ pragma prefix-with [ranger-armorprefix-combo] [ranger-armormaterial] [ranger-arm
 	fist
 	mask
 
-[spellweaver-armorprefix] [spellweaver-armorprefix-1]
-	[spellweaver-armormaterial]
+[spellweaver-armorprefix] {empty}
 
-[spellweaver-armorprefix-combo] [spellweaver-armormaterial] [spellweaver-armorprefix-1]
-	[spellweaver-armorprefix-1] [spellweaver-armormaterial]
+pragma prefix-with [spellweaver-armorprefix] [spellweaver-armormaterial] [spellweaver-armorprefix-1]
 
 [spellweaver-armorprefix-1] apprentice
 	acolyte
diff --git a/data/new-sample-grammars/drakensang/gems.gram b/data/new-sample-grammars/drakensang/gems.gram
index 655bdcb..8ce0467 100644
--- a/data/new-sample-grammars/drakensang/gems.gram
+++ b/data/new-sample-grammars/drakensang/gems.gram
@@ -1,12 +1,13 @@
-[ds-gem] [gem-type]
-	[gem-type]
+[ds-gem] <^2> [gem-type]
 	[gem-type] of qaizah
 	[unique-gem]
 
+pragma prefix-with [ds-gem] [gem-adjective]
+pragma prefix-with [ds-gem] [gem-quality]
+
 pragma initial-rule [ds-gem]
 
-[gem-quality] [gem-quality-normal]
-	[gem-quality-normal]
+[gem-quality] <^2> [gem-quality-normal]
 	[gem-quality-alt]
 
 [gem-quality-normal] flawed
@@ -19,6 +20,7 @@ pragma initial-rule [ds-gem]
 	royal
 
 [gem-quality-alt] [gem-quality-alt-1]
+	[gem-quality-alt-2]
 
 [gem-quality-alt-1] lesser
 	cut
@@ -34,9 +36,6 @@ pragma initial-rule [ds-gem]
 	festive
 	solstice
 
-pragma prefix-with [ds-gem] [gem-adjective]
-pragma prefix-with [ds-gem] [gem-quality]
-
 [gem-type] ruby
 	onyx
 	sapphire
@@ -45,6 +44,9 @@ pragma prefix-with [ds-gem] [gem-quality]
 	amethyst
 	peridot
 
+pragma prefix-with [gem-type] [gem-descr]
+pragma suffix-with [gem-type] [gem-category]
+
 [gem-category] gem
 	jewel
 	star
@@ -59,24 +61,23 @@ pragma prefix-with [ds-gem] [gem-quality]
 	fortified
 	powerful
 
-pragma prefix-with [gem-type] [gem-descr]
-pragma suffix-with [gem-type] [gem-category]
-
-[unique-gem] [gem-category] of [unique-trail]
-	[unique-lead] [gem-category]
-	[unique-type]
-	[gem-category] of [unique-trail]
-	[unique-lead] [gem-category]
-	[unique-type]
+[unique-gem] [unique-type]
 	[gem-category]
 
-[unique-trail] insight
+pragma suffix-with [unique-gem] [unique-trail]
+pragma prefix-with [unique-gem] [unique-lead]
+
+[unique-trail] of [unique-trail-1]
+
+[unique-trail-1] insight
 	immunity
 	rage
 	acceleration
 	shadows
 	willpower
 
+pragma prefix-with [unique-trail-1] [gem-descr]
+
 [unique-lead] solstice
 	fluorite
 	shadow
@@ -86,6 +87,4 @@ pragma suffix-with [gem-type] [gem-category]
 [unique-type] bloodstone
 	moonstone
 
-pragma prefix-with [unique-type] [gem-descr]
-pragma prefix-with [unique-lead] [gem-descr]
-pragma prefix-with [unique-trail] [gem-descr]
+pragma prefix-with [unique-type] [gem-descr] [gem-descr]
diff --git a/data/new-sample-grammars/repinsult.gram b/data/new-sample-grammars/repinsult.gram
index 30ac89d..efc4115 100755
--- a/data/new-sample-grammars/repinsult.gram
+++ b/data/new-sample-grammars/repinsult.gram
@@ -181,16 +181,3 @@ pragma initial-rule [rep-insult]
 	whacko
 	wing nut
 	woman
-
-[rude-scapegoat] → AIDS carriers
-	Arabs
-	atheists
-	Bill Clinton
-	Bill
-	Billary
-	blacks
-	baby-killer
-	Bush-haters
-	Canadians
-	Canucks
-	Can