Namespace System
	Class Blittable(Long) Int32
		value As Long
	Public
		Static Function MaxValue() As Long
			Return 2147483647
		End Function
		Static Function MinValue() As Long
			Return -2147483648
		End Function

		Sub Int32( value As Long )
			This.value = value
		End Sub

		Override Function ToString() As String
			Return Str$(value)
		End Function

		Function Operator() As Long
			Return value
		End Function

		Static Function _Create( value As Long ) As Int32
			Return New Int32( value )
		End Function
	End Class
End Namespace