70 lines
1.6 KiB
C
70 lines
1.6 KiB
C
#include "internal.h"
|
|
#include "vm_core.h"
|
|
#include "iseq.h"
|
|
#include "builtin.h"
|
|
|
|
#if CROSS_COMPILING
|
|
|
|
#define INCLUDED_BY_BUILTIN_C 1
|
|
#include "mini_builtin.c"
|
|
|
|
#else
|
|
|
|
#include "builtin_binary.inc"
|
|
|
|
static const unsigned char*
|
|
builtin_lookup(const char *feature, size_t *psize)
|
|
{
|
|
static int index = 0;
|
|
int i = index++;
|
|
|
|
// usually, `builtin_binary` order is loading order at miniruby.
|
|
if (LIKELY(strcmp(builtin_binary[i].feature, feature) == 0)) {
|
|
found:
|
|
*psize = builtin_binary[i].bin_size;
|
|
return builtin_binary[i].bin;
|
|
}
|
|
else {
|
|
if (0) fprintf(stderr, "builtin_lookup: cached index miss (index:%d)\n", i);
|
|
for (i=0; i<BUILTIN_BINARY_SIZE; i++) {
|
|
if (strcmp(builtin_binary[i].feature, feature) == 0) {
|
|
goto found;
|
|
}
|
|
}
|
|
}
|
|
rb_bug("builtin_lookup: can not find %s\n", feature);
|
|
}
|
|
|
|
void
|
|
rb_load_with_builtin_functions(const char *feature_name, const struct rb_builtin_function *table)
|
|
{
|
|
// search binary
|
|
size_t size;
|
|
const unsigned char *bin = builtin_lookup(feature_name, &size);
|
|
|
|
// load binary
|
|
rb_vm_t *vm = GET_VM();
|
|
if (vm->builtin_function_table != NULL) rb_bug("vm->builtin_function_table should be NULL.");
|
|
vm->builtin_function_table = table;
|
|
vm->builtin_inline_index = 0;
|
|
const rb_iseq_t *iseq = rb_iseq_ibf_load_bytes((const char *)bin, size);
|
|
vm->builtin_function_table = NULL;
|
|
|
|
// exec
|
|
rb_iseq_eval(rb_iseq_check(iseq));
|
|
}
|
|
|
|
#endif
|
|
|
|
void
|
|
Init_builtin(void)
|
|
{
|
|
// nothing
|
|
}
|
|
|
|
void
|
|
Init_builtin_features(void)
|
|
{
|
|
rb_load_with_builtin_functions("gem_prelude", NULL);
|
|
}
|