Lichen

templates/native/common.h

850:6024d7e1d83a
2018-07-12 Paul Boddie Support trailing data after attributes in objects, employed by float instances to store their double-precision numeric data which needs more space than single attributes on some systems. In order to initialise such instances statically, specific object types must be indicated instead of the generic __obj type. This then requires casting to __ref of direct references to objects. Added an underflow error. Added initial testing of floating point numbers. trailing-data
     1 /* Common operations for native functions.     2      3 Copyright (C) 2016, 2017, 2018 Paul Boddie <paul@boddie.org.uk>     4      5 This program is free software; you can redistribute it and/or modify it under     6 the terms of the GNU General Public License as published by the Free Software     7 Foundation; either version 3 of the License, or (at your option) any later     8 version.     9     10 This program is distributed in the hope that it will be useful, but WITHOUT    11 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS    12 FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more    13 details.    14     15 You should have received a copy of the GNU General Public License along with    16 this program.  If not, see <http://www.gnu.org/licenses/>.    17 */    18     19 #ifndef __NATIVE_COMMON_H__    20 #define __NATIVE_COMMON_H__    21     22 #include "types.h"    23     24 /* Utility macro for the special integer representation. */    25     26 #define __new_int(VALUE) __INTVALUE(VALUE)    27     28 /* Utility functions. */    29     30 __attr __new_str(char *s, int size);    31 __attr __new_list(__fragment *f);    32 __attr __new_float(double n);    33 __fragment *__fragment_append(__fragment *data, __attr value);    34     35 #endif /* __NATIVE_COMMON_H__ */