Просмотр исходного кода

Fixed 'Then' after 'Else If' not allowed in parser.

Mark Sibly 9 лет назад
Родитель
Сommit
e3c40f5243
1 измененных файлов с 5 добавлено и 3 удалено
  1. 5 3
      src/mx2cc/parser.monkey2

+ 5 - 3
src/mx2cc/parser.monkey2

@@ -715,11 +715,13 @@ Class Parser
 
 
 			Try
 			Try
 				If toke="elseif"
 				If toke="elseif"
+				
 					cond=ParseExpr()
 					cond=ParseExpr()
-					If block ParseEol() Else CParse( "then" )
-				Else
-					If block ParseEol()
+					CParse( "then" )
+
 				Endif
 				Endif
+
+				If block ParseEol()
 			
 			
 			Catch ex:ParseEx
 			Catch ex:ParseEx