diff --git a/ChangeLog b/ChangeLog
index 55b931091..2508cfd52 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -6,6 +6,7 @@
 	* Tools/AGSOutput.m: Support (name) syntax for specifying a protocol
 	cross reference using [(name)-method]
 	* Tools/autogsdoc.m: Improve documentation of method references.
+	* Tools/AGSparser.m: Handle @class statements.
 
 2001-12-16  Richard Frith-Macdonald <rfm@gnu.org>
 
diff --git a/Tools/AGSParser.m b/Tools/AGSParser.m
index 117aace87..728a4729f 100644
--- a/Tools/AGSParser.m
+++ b/Tools/AGSParser.m
@@ -878,6 +878,15 @@ fail:
 	      {
 		return methods;
 	      }
+	    else if ([token isEqual: @"class"] == YES)
+	      {
+		/*
+		 * Pre-declaration of one or more classes ... rather like a
+		 * normal C statement, it ends with a semicolon.
+		 */
+		[self skipStatementLine];
+		return nil;
+	      }
 	    else
 	      {
 		[self log: @"@method list with unknown directive '%@'", token];