view lphobos/typeinfo1/ti_long.d @ 341:1bb99290e03a trunk

[svn r362] Started merging the old 'test' dir as well as the newer 'tangotests' dir into 'tests/mini' and 'tests/minicomplex'.
author lindquist
date Sun, 13 Jul 2008 02:51:19 +0200
parents 2c3cd3596187
children
line wrap: on
line source


// long

module typeinfo1.ti_long;

class TypeInfo_l : TypeInfo
{
    char[] toString() { return "long"; }

    hash_t getHash(void *p)
    {
	return *cast(uint *)p + (cast(uint *)p)[1];
    }

    int equals(void *p1, void *p2)
    {
	return *cast(long *)p1 == *cast(long *)p2;
    }

    int compare(void *p1, void *p2)
    {
	if (*cast(long *)p1 < *cast(long *)p2)
	    return -1;
	else if (*cast(long *)p1 > *cast(long *)p2)
	    return 1;
	return 0;
    }

    size_t tsize()
    {
	return long.sizeof;
    }

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

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