fixes for BUG 115: http://bug.modelicacommunity.org/show_bug.cgi?id=115

model X end Y; now reports a parse error!

git-svn-id: https://openmodelica.org/svn/OpenModelica/trunk@2604 f25d12d1-65f4-0310-ae8a-bbce733d8d8e

Author: adrpo

modelica_parser/src/modelica_parser.g

@@ -132,16 +132,36 @@ class_type :
 		;
 
 class_specifier: 	
-        IDENT class_specifier2 
-    |   EXTENDS! IDENT (class_modification)? string_comment composition 
-            END! IDENT! 
+        i:IDENT class_specifier2[#i] 
+    |   EXTENDS! i1:IDENT (class_modification)? string_comment composition 
+            END! i2:IDENT! 
         {
+        	// check if the identifiers at the start and end are the same!
+        	if (i1->getText() != i2->getText())
+        	{
+        		throw 
+        		ANTLR_USE_NAMESPACE(antlr)
+        		RecognitionException(
+        		"The identifier at start and end are different", 
+        		modelicafilename, i2->getLine(), i2->getColumn());
+        	}        	
             #class_specifier = #([CLASS_EXTENDS,"CLASS_EXTENDS"],#class_specifier);
         }
         ;
 
-class_specifier2 :
-		( string_comment composition END! IDENT!
+class_specifier2 [RefMyAST i1]:
+		( string_comment composition END! i2:IDENT!
+		  {
+		    // check if the identifiers at the start and end are the same!	
+		  	if (RefMyAST(i1)->getText() != RefMyAST(#i2)->getText())
+		  	{
+        		throw 
+        		ANTLR_USE_NAMESPACE(antlr)
+        		RecognitionException(
+        		"The identifier at start and end are different", 
+        		modelicafilename, i2->getLine(), i2->getColumn());		  		
+		  	}
+		  }		
 		| EQUALS^ base_prefix type_specifier ( class_modification )? comment
 		| EQUALS^ enumeration
         | EQUALS^ pder