view lphobos/typeinfo1/ti_long.d @ 333:f7190d9eb70c trunk

[svn r354] Fix the regressions between [346] and [353] by making constructors and destructors outside classes fatal errors. Fix tests makefile and add minimize to gc.d.
author ChristianK
date Sat, 12 Jul 2008 09:23:14 +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;
    }
}