From faa3144390363256e30df634b91b86d9f7522e1a Mon Sep 17 00:00:00 2001
From: bringert <unknown>
Date: Wed, 11 May 2005 08:34:17 +0000
Subject: [PATCH] Fixed some missing lincats and a syntax error introduced when
 adding lincats.

---
 examples/numerals/kulung.gf | 2 +-
 examples/numerals/kwami.gf  | 2 ++
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/examples/numerals/kulung.gf b/examples/numerals/kulung.gf
index 3ae2db724..c14028b5c 100644
--- a/examples/numerals/kulung.gf
+++ b/examples/numerals/kulung.gf
@@ -12,7 +12,7 @@ lincat Numeral =    { s : Str } ;
 lincat Digit = {s : DForm => Str} ;
 lincat Sub10 = {s : DForm => Str ; size : Size} ;
 lincat Sub100 = {s : Str ; size : Size} ;
-lincat Sub1000 = {s : Scale => Str ; size : Size} 
+lincat Sub1000 = {s : Scale => Str ; size : Size} ;
 lincat Sub1000000 = { s : Str } ;
 
 oper mkNum : Str -> Str -> Str -> Str -> Lin Digit = 
diff --git a/examples/numerals/kwami.gf b/examples/numerals/kwami.gf
index 9ae1cd1d9..43e56456b 100644
--- a/examples/numerals/kwami.gf
+++ b/examples/numerals/kwami.gf
@@ -7,6 +7,8 @@ flags coding=latinasupplement ;
 param Size = sg | two | three | other ;
 
 oper LinDigit = {s : Str ; size : Size} ;
+
+lincat Numeral = {s : Str} ;
 lincat Digit = LinDigit ;
 lincat Sub10 = LinDigit ;
 lincat Sub100 = LinDigit ;