ti_float.d

/*
 * ti_float.d
 *
 * This module implements the TypeInfo for the float type.
 *
 */

module dyndrt.typeinfos.ti_float;

class TypeInfo_f : TypeInfo {
    char[] toString() {
		return "float";
	}

	hash_t getHash(void *p) {
		return *cast(uint *)p;
	}
	int equals(void *p1, void *p2) {
		return _equals(*cast(float *)p1, *cast(float *)p2);
	}

	int compare(void *p1, void *p2) {
		return _compare(*cast(float *)p1, *cast(float *)p2);
	}

	size_t tsize() {
		return float.sizeof;
	}

	void swap(void *p1, void *p2) {
		float t;

		t = *cast(float *)p1;
		*cast(float *)p1 = *cast(float *)p2;
  		*cast(float *)p2 = t;
	}

	void[] init() {
		static float r;

		return (cast(float *)&r)[0 .. 1];
	}

package:
	static int _equals(float f1, float f2) {
		return f1 == f2 || (isnan(f1) && isnan(f2));
	}

	static int _compare(float d1, float d2) {
		// if either are NaN
		if (d1 !<>= d2) {
			if (isnan(d1)) {
				if (isnan(d2)) {
					return 0;
				}
				return -1;
			}
			return 1;
		}

		if (d1 == d2) {
			return 0;
		}
		else if (d1 < d2) {
			return -1;
		}
		return 1;
	}
}