Procházet zdrojové kódy

Added missing overrides.

woollybah před 5 roky
rodič
revize
122bb68311

+ 20 - 20
jconv.mod/jconv.bmx

@@ -911,7 +911,7 @@ End Type
 
 Type TBoolSerializer Extends TJConvSerializer
 
-	Method Serialize:TJSON(source:Object, sourceType:String)
+	Method Serialize:TJSON(source:Object, sourceType:String) Override
 
 		Local value:TBool = TBool(source)
 		If value Then
@@ -919,7 +919,7 @@ Type TBoolSerializer Extends TJConvSerializer
 		End If
 	End Method
 
-	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object)
+	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object) Override
 		If TJSONBool(json) Then
 			If Not obj Then
 				obj = New TBool(TJSONBool(json).isTrue)
@@ -933,14 +933,14 @@ End Type
 
 Type TByteSerializer Extends TJConvSerializer
 
-	Method Serialize:TJSON(source:Object, sourceType:String)
+	Method Serialize:TJSON(source:Object, sourceType:String) Override
 		Local value:TByte = TByte(source)
 		If value Then
 			Return New TJSONInteger.Create(value.value)
 		End If
 	End Method
 
-	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object)
+	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object) Override
 		If TJSONInteger(json) Then
 			If Not obj Then
 				obj = New TByte(Byte(TJSONInteger(json).Value()))
@@ -954,14 +954,14 @@ End Type
 
 Type TShortSerializer Extends TJConvSerializer
 
-	Method Serialize:TJSON(source:Object, sourceType:String)
+	Method Serialize:TJSON(source:Object, sourceType:String) Override
 		Local value:TShort = TShort(source)
 		If value Then
 			Return New TJSONInteger.Create(value.value)
 		End If
 	End Method
 
-	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object)
+	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object) Override
 		If TJSONInteger(json) Then
 			If Not obj Then
 				obj = New TShort(Short(TJSONInteger(json).Value()))
@@ -975,14 +975,14 @@ End Type
 
 Type TIntSerializer Extends TJConvSerializer
 
-	Method Serialize:TJSON(source:Object, sourceType:String)
+	Method Serialize:TJSON(source:Object, sourceType:String) Override
 		Local value:TInt = TInt(source)
 		If value Then
 			Return New TJSONInteger.Create(value.value)
 		End If
 	End Method
 
-	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object)
+	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object) Override
 		If TJSONInteger(json) Then
 			If Not obj Then
 				obj = New TInt(Int(TJSONInteger(json).Value()))
@@ -996,14 +996,14 @@ End Type
 
 Type TUIntSerializer Extends TJConvSerializer
 
-	Method Serialize:TJSON(source:Object, sourceType:String)
+	Method Serialize:TJSON(source:Object, sourceType:String) Override
 		Local value:TUInt = TUInt(source)
 		If value Then
 			Return New TJSONInteger.Create(value.value)
 		End If
 	End Method
 
-	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object)
+	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object) Override
 		If TJSONInteger(json) Then
 			If Not obj Then
 				obj = New TUInt(UInt(TJSONInteger(json).Value()))
@@ -1017,14 +1017,14 @@ End Type
 
 Type TSizetSerializer Extends TJConvSerializer
 
-	Method Serialize:TJSON(source:Object, sourceType:String)
+	Method Serialize:TJSON(source:Object, sourceType:String) Override
 		Local value:TSize_T = TSize_T(source)
 		If value Then
 			Return New TJSONInteger.Create(value.value)
 		End If
 	End Method
 
-	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object)
+	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object) Override
 		If TJSONInteger(json) Then
 			If Not obj Then
 				obj = New TSize_T(Size_T(TJSONInteger(json).Value()))
@@ -1038,14 +1038,14 @@ End Type
 
 Type TLongSerializer Extends TJConvSerializer
 
-	Method Serialize:TJSON(source:Object, sourceType:String)
+	Method Serialize:TJSON(source:Object, sourceType:String) Override
 		Local value:TLong = TLong(source)
 		If value Then
 			Return New TJSONInteger.Create(value.value)
 		End If
 	End Method
 
-	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object)
+	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object) Override
 		If TJSONInteger(json) Then
 			If Not obj Then
 				obj = New TLong(Long(TJSONInteger(json).Value()))
@@ -1059,14 +1059,14 @@ End Type
 
 Type TULongSerializer Extends TJConvSerializer
 
-	Method Serialize:TJSON(source:Object, sourceType:String)
+	Method Serialize:TJSON(source:Object, sourceType:String) Override
 		Local value:TULong = TULong(source)
 		If value Then
 			Return New TJSONInteger.Create(value.value)
 		End If
 	End Method
 
-	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object)
+	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object) Override
 		If TJSONInteger(json) Then
 			If Not obj Then
 				obj = New TULong(ULong(TJSONInteger(json).Value()))
@@ -1080,14 +1080,14 @@ End Type
 
 Type TFloatSerializer Extends TJConvSerializer
 
-	Method Serialize:TJSON(source:Object, sourceType:String)
+	Method Serialize:TJSON(source:Object, sourceType:String) Override
 		Local value:TFloat = TFloat(source)
 		If value Then
 			Return New TJSONReal.Create(value.value)
 		End If
 	End Method
 
-	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object)
+	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object) Override
 		If TJSONReal(json) Then
 			If Not obj Then
 				obj = New TFloat(Float(TJSONReal(json).Value()))
@@ -1101,14 +1101,14 @@ End Type
 
 Type TDoubleSerializer Extends TJConvSerializer
 
-	Method Serialize:TJSON(source:Object, sourceType:String)
+	Method Serialize:TJSON(source:Object, sourceType:String) Override
 		Local value:TDouble = TDouble(source)
 		If value Then
 			Return New TJSONReal.Create(value.value)
 		End If
 	End Method
 
-	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object)
+	Method Deserialize:Object(json:TJSON, typeId:TTypeId, obj:Object) Override
 		If TJSONReal(json) Then
 			If Not obj Then
 				obj = New TDouble(Double(TJSONReal(json).Value()))

+ 2 - 2
max2d.mod/max2d.bmx

@@ -223,11 +223,11 @@ Type TMax2DGraphics Extends TGraphics
 		Return t
 	End Function
 	
-	Method Resize(width:Int, height:Int)
+	Method Resize(width:Int, height:Int) Override
 		_graphics.Resize(width, height)
 	End Method
 	
-	Method Position(x:Int, y:Int)
+	Method Position(x:Int, y:Int) Override
 		_graphics.Position(x, y)
 	End Method
 End Type

+ 1 - 1
maxunit.mod/maxunit.bmx

@@ -408,7 +408,7 @@ Type AssertionFailedException
 		Return this
 	End Function
 	
-	Method toString:String()
+	Method toString:String() Override
 		Return message
 	End Method
 End Type

+ 1 - 1
stringbuilder.mod/stringbuilder.bmx

@@ -390,7 +390,7 @@ Public
 	
 	If the other object is not a string builder, the standard object comparison is made.
 	End Rem
-	Method Compare:Int(o:Object)
+	Method Compare:Int(o:Object) Override
 		If TStringBuilder(o) Then
 			Return bmx_stringbuilder_compare(buffer, TStringBuilder(o).buffer)
 		End If