10 months ago Paul Boddie Renamed the utf8string class to unicode, eliminating the unicode function. This means that the simple case of merely returning an object if it is already a Unicode object no longer occurs when using the unicode callable, but such behaviour might be better supported with more general customised instantiation functionality.
     1 /* Native functions for list operations.     2      3 Copyright (C) 2016, 2017 Paul Boddie <>     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 <>.    17 */    18     19 #ifndef __NATIVE_LIST_H__    20 #define __NATIVE_LIST_H__    21     22 #include "types.h"    23     24 /* List operations. */    25     26 __attr __fn_native_list_list_init(__attr __self, __attr size);    27 __attr __fn_native_list_list_setsize(__attr __self, __attr _data, __attr size);    28 __attr __fn_native_list_list_append(__attr __self, __attr self, __attr value);    29 __attr __fn_native_list_list_concat(__attr __self, __attr self, __attr other);    30 __attr __fn_native_list_list_len(__attr self, __attr _data);    31 __attr __fn_native_list_list_nonempty(__attr __self, __attr _data);    32 __attr __fn_native_list_list_element(__attr __self, __attr _data, __attr index);    33 __attr __fn_native_list_list_setelement(__attr __self, __attr _data, __attr index, __attr value);    34     35 /* Module initialisation. */    36     37 void __main_native_list();    38     39 #endif /* __NATIVE_LIST_H__ */