Index: src/Makefile ================================================================== --- src/Makefile +++ src/Makefile @@ -3,10 +3,11 @@ LIB_MINOR = 0 SRCS = array.c \ box.c \ class.c \ + double.c \ int.c \ map.c \ object.c \ range.c \ refpool.c \ ADDED src/double.c Index: src/double.c ================================================================== --- src/double.c +++ src/double.c @@ -0,0 +1,89 @@ +/* + * Copyright (c) 2012, Jonathan Schleifer + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions are met: + * + * 1. Redistributions of source code must retain the above copyright notice, + * this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright notice, + * this list of conditions and the following disclaimer in the documentation + * and/or other materials provided with the distribution. + * + * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" + * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE + * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR + * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF + * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS + * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN + * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) + * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE + * POSSIBILITY OF SUCH DAMAGE. + */ + +#include "object.h" +#include "double.h" + +struct CFWDouble { + CFWObject obj; + double value; +}; + +static bool +ctor(void *ptr, va_list args) +{ + CFWDouble *double_ = ptr; + + double_->value = va_arg(args, double); + + return true; +} + +static bool +equal(void *ptr1, void *ptr2) +{ + CFWObject *obj2 = ptr2; + CFWDouble *double1, *double2; + + if (obj2->cls != cfw_double) + return false; + + double1 = ptr1; + double2 = ptr2; + + return (double1->value == double2->value); +} + +static uint32_t +hash(void *ptr) +{ + CFWDouble *double_ = ptr; + + /* FIXME: Create a proper hash! */ + return (uint32_t)double_->value; +} + +static void* +copy(void *ptr) +{ + return cfw_ref(ptr); +} + +double +cfw_double_value(CFWDouble *double_) +{ + return double_->value; +} + +static CFWClass class = { + .name = "CFWDouble", + .size = sizeof(CFWDouble), + .ctor = ctor, + .equal = equal, + .hash = hash, + .copy = copy +}; +CFWClass *cfw_double = &class; ADDED src/double.h Index: src/double.h ================================================================== --- src/double.h +++ src/double.h @@ -0,0 +1,36 @@ +/* + * Copyright (c) 2012, Jonathan Schleifer + * All rights reserved. + * + * Redistribution and use in source and binary forms, with or without + * modification, are permitted provided that the following conditions are met: + * + * 1. Redistributions of source code must retain the above copyright notice, + * this list of conditions and the following disclaimer. + * 2. Redistributions in binary form must reproduce the above copyright notice, + * this list of conditions and the following disclaimer in the documentation + * and/or other materials provided with the distribution. + * + * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" + * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE + * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE + * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE + * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR + * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF + * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS + * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN + * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) + * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE + * POSSIBILITY OF SUCH DAMAGE. + */ + +#ifndef __COREFW_DOUBLE_H__ +#define __COREFW_DOUBLE_H__ + +#include "class.h" + +typedef struct CFWDouble CFWDouble; +extern CFWClass *cfw_double; +extern double cfw_double_value(CFWDouble*); + +#endif