Explorar o código

Ignore extraneous type definitions.
Fixes #68.

woollybah %!s(int64=10) %!d(string=hai) anos
pai
achega
76a538157c
Modificáronse 1 ficheiros con 5 adicións e 0 borrados
  1. 5 0
      parser.bmx

+ 5 - 0
parser.bmx

@@ -1050,6 +1050,10 @@ Type TParser
 				Err "Call to super class constructor must be first statement in a constructor."
 				Err "Call to super class constructor must be first statement in a constructor."
 			EndIf
 			EndIf
 			Local id$=ParseIdent()
 			Local id$=ParseIdent()
+			
+			' eat any type stuff
+			ParseConstNumberType()
+
 			expr=New TInvokeSuperExpr.Create( id,ParseArgs( stmt ) )
 			expr=New TInvokeSuperExpr.Create( id,ParseArgs( stmt ) )
 		Default
 		Default
 			Select _tokeType
 			Select _tokeType
@@ -1110,6 +1114,7 @@ Type TParser
 			Select _toke
 			Select _toke
 			Case "."
 			Case "."
 				NextToke
 				NextToke
+				
 				expr=New TIdentExpr.Create( ParseIdent(),expr )
 				expr=New TIdentExpr.Create( ParseIdent(),expr )
 				
 				
 				ParseConstNumberType()
 				ParseConstNumberType()