// (C) Ximian, Inc. http://www.ximian.com
//
+//
+// Copyright (C) 2004 Novell, Inc (http://www.novell.com)
+//
+// Permission is hereby granted, free of charge, to any person obtaining
+// a copy of this software and associated documentation files (the
+// "Software"), to deal in the Software without restriction, including
+// without limitation the rights to use, copy, modify, merge, publish,
+// distribute, sublicense, and/or sell copies of the Software, and to
+// permit persons to whom the Software is furnished to do so, subject to
+// the following conditions:
+//
+// The above copyright notice and this permission notice shall be
+// included in all copies or substantial portions of the Software.
+//
+// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+// MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+// NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+// LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+// OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+// WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+//
+
using System.Globalization;
-using System.Runtime.CompilerServices;
-namespace System {
-
+namespace System
+{
[Serializable]
- public struct Single : IComparable, IFormattable, IConvertible {
+ public struct Single : IComparable, IFormattable, IConvertible
+#if NET_2_0
+ , IComparable <float>
+#endif
+ {
public const float Epsilon = 1.4e-45f;
public const float MaxValue = 3.40282346638528859e38f;
public const float MinValue = -3.40282346638528859e38f;
public const float NaN = 0.0f / 0.0f;
public const float PositiveInfinity = 1.0f / 0.0f;
public const float NegativeInfinity = -1.0f / 0.0f;
-
- // VES needs to know about value. public is workaround
- // so source will compile
- public float value;
-
+
+ internal float m_value;
+
public int CompareTo (object v)
{
if (v == null)
return 1;
if (!(v is System.Single))
- throw new ArgumentException (Locale.GetText ("Value is not a System.Single"));
+ throw new ArgumentException (Locale.GetText ("Value is not a System.Single."));
+
+ float fv = (float)v;
+
+ if (IsPositiveInfinity (m_value) && IsPositiveInfinity (fv))
+ return 0;
+
+ if (IsNegativeInfinity (m_value) && IsNegativeInfinity (fv))
+ return 0;
+
+ if (IsNaN (fv))
+ if (IsNaN (m_value))
+ return 0;
+ else
+ return 1;
+
+ if (IsNaN (m_value))
+ if (IsNaN (fv))
+ return 0;
+ else
+ return -1;
- return (int) (value - ((float) v));
+ if (this.m_value == fv)
+ return 0;
+ else if (this.m_value > fv)
+ return 1;
+ else
+ return -1;
}
public override bool Equals (object o)
if (!(o is System.Single))
return false;
- return ((float) o) == value;
+ if (IsNaN ((float) o)) {
+ return IsNaN (m_value);
+ }
+
+ return ((float) o) == m_value;
+ }
+
+#if NET_2_0
+ public int CompareTo (float value)
+ {
+ if (IsPositiveInfinity (m_value) && IsPositiveInfinity (value))
+ return 0;
+
+ if (IsNegativeInfinity (m_value) && IsNegativeInfinity (value))
+ return 0;
+
+ if (IsNaN (value))
+ if (IsNaN (m_value))
+ return 0;
+ else
+ return 1;
+
+ if (IsNaN (m_value))
+ if (IsNaN (value))
+ return 0;
+ else
+ return -1;
+
+ if (this.m_value == value)
+ return 0;
+ else if (this.m_value > value)
+ return 1;
+ else
+ return -1;
+ }
+
+ public bool Equals (float value)
+ {
+ if (IsNaN (value))
+ return IsNaN (m_value);
+
+ return value == m_value;
}
+#endif
- public override int GetHashCode ()
+ public unsafe override int GetHashCode ()
{
- return (int) value;
+ float f = m_value;
+ return *((int*)&f);
}
public static bool IsInfinity (float f)
public static float Parse (string s)
{
- return Parse (s, (NumberStyles.Float | NumberStyles.AllowThousands), null);
+ double parsed_value = Double.Parse (
+ s, (NumberStyles.Float | NumberStyles.AllowThousands), null);
+ if (parsed_value > (double) float.MaxValue)
+ throw new OverflowException();
+
+ return (float) parsed_value;
}
- public static float Parse (string s, IFormatProvider fp)
+ public static float Parse (string s, IFormatProvider provider)
{
- return Parse (s, (NumberStyles.Float | NumberStyles.AllowThousands), fp);
+ double parsed_value = Double.Parse (
+ s, (NumberStyles.Float | NumberStyles.AllowThousands), provider);
+ if (parsed_value > (double) float.MaxValue)
+ throw new OverflowException();
+
+ return (float) parsed_value;
}
public static float Parse (string s, NumberStyles style)
{
- return Parse (s, style, null);
+ double parsed_value = Double.Parse (s, style, null);
+ if (parsed_value > (double) float.MaxValue)
+ throw new OverflowException();
+
+ return (float) parsed_value;
}
- [MonoTODO]
- public static float Parse (string s, NumberStyles style, IFormatProvider fp)
+ public static float Parse (string s, NumberStyles style, IFormatProvider provider)
{
- // FIXME: I copied this method from System.Double
- // fix it for System.Single
-
- if (s == null) throw new ArgumentNullException();
- if (style > NumberStyles.Any) {
- throw new ArgumentException();
- }
- NumberFormatInfo format = NumberFormatInfo.GetInstance(fp);
- if (format == null) throw new Exception("How did this happen?");
- if (s == format.NaNSymbol) return Single.NaN;
- if (s == format.PositiveInfinitySymbol) return Single.PositiveInfinity;
- if (s == format.NegativeInfinitySymbol) return Single.NegativeInfinity;
- string[] sl;
- long integral = 0;
- long fraction = 0;
- long exponent = 1;
- float retval = 0;
- if ((style & NumberStyles.AllowLeadingWhite) != 0) {
- s.TrimStart(null);
- }
- if ((style & NumberStyles.AllowTrailingWhite) != 0) {
- s.TrimEnd(null);
- }
- sl = s.Split(new Char[] {'e', 'E'}, 2);
- if (sl.Length > 1) {
- if ((style & NumberStyles.AllowExponent) == 0) {
- throw new FormatException();
- }
- exponent = long.Parse(sl[1], NumberStyles.AllowLeadingSign, format);
- }
- s = sl[0];
- sl = s.Split(format.NumberDecimalSeparator.ToCharArray(), 2);
- if (sl.Length > 1) {
- if ((style & NumberStyles.AllowDecimalPoint) == 0) {
- throw new FormatException();
- }
- fraction = long.Parse(sl[1], NumberStyles.None, format);
- }
- NumberStyles tempstyle = NumberStyles.None;
- if ((style & NumberStyles.AllowLeadingSign) != 0){
- tempstyle = NumberStyles.AllowLeadingSign;
- }
-
- if (sl[0].Length > 0)
- integral = long.Parse(sl[0], tempstyle, format);
- else
- integral = 0;
+ double parsed_value = Double.Parse (s, style, provider);
+ if (parsed_value > (double) float.MaxValue)
+ throw new OverflowException();
- retval = fraction;
-
- // FIXME: what about the zeros between the decimal point
- // and the first non-zero digit?
- while (retval >1) retval /= 10;
- if (integral < 0){
- retval -= integral;
- retval = -retval;
- }
- else retval += integral;
- if (exponent != 1) retval *= (float) Math.Pow(10, exponent);
- return retval;
+ return (float) parsed_value;
}
public override string ToString ()
return ToString (null, null);
}
- public string ToString (IFormatProvider fp)
+ public string ToString (IFormatProvider provider)
{
- return ToString (null, fp);
+ return ToString (null, provider);
}
public string ToString (string format)
return ToString (format, null);
}
- [MonoTODO]
- public string ToString (string format, IFormatProvider fp)
+ public string ToString (string format, IFormatProvider provider)
{
- // FIXME: Need to pass format and provider info to this call too.
- return ToStringImpl(value);
+ if (provider is CultureInfo)
+ return SingleFormatter.NumberToString (format, ((CultureInfo) provider).NumberFormat, m_value);
+ else
+ return SingleFormatter.NumberToString (format, (NumberFormatInfo) provider, m_value);
}
- [MethodImplAttribute(MethodImplOptions.InternalCall)]
- private static extern string ToStringImpl (float value);
-
// ============= IConvertible Methods ============ //
-
public TypeCode GetTypeCode ()
{
return TypeCode.Single;
bool IConvertible.ToBoolean (IFormatProvider provider)
{
- return System.Convert.ToBoolean (value);
+ return System.Convert.ToBoolean (m_value);
}
byte IConvertible.ToByte (IFormatProvider provider)
{
- return System.Convert.ToByte (value);
+ return System.Convert.ToByte (m_value);
}
char IConvertible.ToChar (IFormatProvider provider)
{
- return System.Convert.ToChar (value);
+ return System.Convert.ToChar (m_value);
}
DateTime IConvertible.ToDateTime (IFormatProvider provider)
{
- return System.Convert.ToDateTime (value);
+ return System.Convert.ToDateTime (m_value);
}
decimal IConvertible.ToDecimal (IFormatProvider provider)
{
- return System.Convert.ToDecimal (value);
+ return System.Convert.ToDecimal (m_value);
}
double IConvertible.ToDouble (IFormatProvider provider)
{
- return System.Convert.ToDouble (value);
+ return System.Convert.ToDouble (m_value);
}
short IConvertible.ToInt16 (IFormatProvider provider)
{
- return System.Convert.ToInt16 (value);
+ return System.Convert.ToInt16 (m_value);
}
int IConvertible.ToInt32 (IFormatProvider provider)
{
- return System.Convert.ToInt32 (value);
+ return System.Convert.ToInt32 (m_value);
}
long IConvertible.ToInt64 (IFormatProvider provider)
{
- return System.Convert.ToInt64 (value);
+ return System.Convert.ToInt64 (m_value);
}
- [CLSCompliant (false)]
sbyte IConvertible.ToSByte (IFormatProvider provider)
{
- return System.Convert.ToSByte (value);
+ return System.Convert.ToSByte (m_value);
}
-
+
float IConvertible.ToSingle (IFormatProvider provider)
{
- return System.Convert.ToSingle (value);
+ return System.Convert.ToSingle (m_value);
}
object IConvertible.ToType (Type conversionType, IFormatProvider provider)
{
- return System.Convert.ToType (value, conversionType, provider);
+ return System.Convert.ToType (m_value, conversionType, provider);
}
- [CLSCompliant (false)]
ushort IConvertible.ToUInt16 (IFormatProvider provider)
{
- return System.Convert.ToUInt16 (value);
+ return System.Convert.ToUInt16 (m_value);
}
- [CLSCompliant (false)]
uint IConvertible.ToUInt32 (IFormatProvider provider)
{
- return System.Convert.ToUInt32 (value);
+ return System.Convert.ToUInt32 (m_value);
}
- [CLSCompliant (false)]
ulong IConvertible.ToUInt64 (IFormatProvider provider)
{
- return System.Convert.ToUInt64 (value);
+ return System.Convert.ToUInt64 (m_value);
}
}
}