From b9243c037a5cfa00bb794a9c54e758d39948d21f Mon Sep 17 00:00:00 2001
From: bringert <bringert@cs.chalmers.se>
Date: Wed, 4 Jul 2007 11:27:06 +0000
Subject: [PATCH] Fized some typos in Toy1.

---
 examples/regulus/toy1/Toy1a.gf    | 2 +-
 examples/regulus/toy1/Toy1aEng.gf | 6 +++---
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/examples/regulus/toy1/Toy1a.gf b/examples/regulus/toy1/Toy1a.gf
index 2478360b4..cab51455b 100644
--- a/examples/regulus/toy1/Toy1a.gf
+++ b/examples/regulus/toy1/Toy1a.gf
@@ -1,4 +1,4 @@
-abstract Toy1 = {
+abstract Toy1a = {
 
 flags startcat = Utterance ;
 
diff --git a/examples/regulus/toy1/Toy1aEng.gf b/examples/regulus/toy1/Toy1aEng.gf
index 1d71eabf1..d0748cc82 100644
--- a/examples/regulus/toy1/Toy1aEng.gf
+++ b/examples/regulus/toy1/Toy1aEng.gf
@@ -1,6 +1,6 @@
 --# -path=.:prelude
 
-concrete Toy1Eng of Toy1 = open Prelude in {
+concrete Toy1aEng of Toy1a = open Prelude in {
 
 -- grammar Toy1 from the Regulus book
 
@@ -42,8 +42,8 @@ lin
   light = mkNoun "light" ;
   fan = mkNoun "fan" ;
 
-  switchOn _ = mkVerb "switch" "swithced" "on" ;
-  switchOff _ = mkVerb "switch" "swithced" "off" ;
+  switchOn _ = mkVerb "switch" "switched" "on" ;
+  switchOff _ = mkVerb "switch" "switched" "off" ;
 
   dim = mkVerb "dim" "dimmed" [] ;