2012-08-16 01:00:30 +01:00
|
|
|
#include "builtin.h"
|
|
|
|
|
|
2012-09-02 16:31:59 +01:00
|
|
|
static void f_false(jv input[], jv output[]) {
|
2012-09-02 21:45:27 +01:00
|
|
|
jv_free(input[0]);
|
2012-09-02 16:31:59 +01:00
|
|
|
output[0] = jv_false();
|
2012-08-16 01:00:30 +01:00
|
|
|
}
|
|
|
|
|
|
2012-09-02 16:31:59 +01:00
|
|
|
static void f_true(jv input[], jv output[]) {
|
2012-09-02 21:45:27 +01:00
|
|
|
jv_free(input[0]);
|
2012-09-02 16:31:59 +01:00
|
|
|
output[0] = jv_true();
|
2012-08-16 01:00:30 +01:00
|
|
|
}
|
|
|
|
|
|
2012-09-03 16:14:52 +01:00
|
|
|
static void f_null(jv input[], jv output[]) {
|
|
|
|
|
jv_free(input[0]);
|
|
|
|
|
output[0] = jv_null();
|
|
|
|
|
}
|
2012-08-16 01:16:08 +01:00
|
|
|
|
2012-09-02 16:31:59 +01:00
|
|
|
static void f_plus(jv input[], jv output[]) {
|
2012-09-02 21:45:27 +01:00
|
|
|
jv_free(input[0]);
|
2012-09-02 16:31:59 +01:00
|
|
|
jv a = input[2];
|
|
|
|
|
jv b = input[1];
|
|
|
|
|
if (jv_get_kind(a) == JV_KIND_NUMBER && jv_get_kind(b) == JV_KIND_NUMBER) {
|
|
|
|
|
output[0] = jv_number(jv_number_value(a) +
|
|
|
|
|
jv_number_value(b));
|
|
|
|
|
} else if (jv_get_kind(a) == JV_KIND_ARRAY && jv_get_kind(b) == JV_KIND_ARRAY) {
|
|
|
|
|
output[0] = jv_array_concat(a, b);
|
2012-08-16 01:16:08 +01:00
|
|
|
} else {
|
2012-09-02 16:31:59 +01:00
|
|
|
output[0] = jv_string("wtf gaize");
|
2012-09-02 21:45:27 +01:00
|
|
|
jv_free(a);
|
|
|
|
|
jv_free(b);
|
2012-08-16 01:16:08 +01:00
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
2012-08-16 01:00:30 +01:00
|
|
|
struct cfunction function_list[] = {
|
|
|
|
|
{f_true, "true", CALL_BUILTIN_1_1},
|
|
|
|
|
{f_false, "false", CALL_BUILTIN_1_1},
|
2012-09-03 16:14:52 +01:00
|
|
|
{f_null, "null", CALL_BUILTIN_1_1},
|
2012-08-16 01:16:08 +01:00
|
|
|
{f_plus, "_plus", CALL_BUILTIN_3_1},
|
2012-08-16 01:00:30 +01:00
|
|
|
};
|
|
|
|
|
struct symbol_table builtins = {function_list, sizeof(function_list)/sizeof(function_list[0])};
|