blob: 6de77228d01143602c9cb829c34ae6e61d049ce4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
|
#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);
}
|
