Ruby 3.1.3p185 (2022-11-24 revision 1a6b16756e0ba6b95ab71a441357ed5484e33498)
builtin.h
1#ifndef BUILTIN_H_INCLUDED
2#define BUILTIN_H_INCLUDED
3
4// invoke
5
7 // for invocation
8 const void * const func_ptr;
9 const int argc;
10
11 // for load
12 const int index;
13 const char * const name;
14
15 // for jit
16 void (*compiler)(FILE *, long, unsigned, bool);
17};
18
19#define RB_BUILTIN_FUNCTION(_i, _name, _fname, _arity, _compiler) {\
20 .name = #_name, \
21 .func_ptr = (void *)_fname, \
22 .argc = _arity, \
23 .index = _i, \
24 .compiler = _compiler, \
25}
26
27void rb_load_with_builtin_functions(const char *feature_name, const struct rb_builtin_function *table);
28
29#ifndef rb_execution_context_t
31#define rb_execution_context_t rb_execution_context_t
32#endif
33
34/* The following code is generated by the following Ruby script:
35
3616.times{|i|
37 args = (i > 0 ? ', ' : '') + (0...i).map{"VALUE"}.join(', ')
38 puts "static inline void rb_builtin_function_check_arity#{i}(VALUE (*f)(rb_execution_context_t *ec, VALUE self#{args})){}"
39}
40*/
41
42static inline void rb_builtin_function_check_arity0(VALUE (*f)(rb_execution_context_t *ec, VALUE self)){}
43static inline void rb_builtin_function_check_arity1(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE)){}
44static inline void rb_builtin_function_check_arity2(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE)){}
45static inline void rb_builtin_function_check_arity3(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE)){}
46static inline void rb_builtin_function_check_arity4(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE)){}
47static inline void rb_builtin_function_check_arity5(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE)){}
48static inline void rb_builtin_function_check_arity6(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
49static inline void rb_builtin_function_check_arity7(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
50static inline void rb_builtin_function_check_arity8(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
51static inline void rb_builtin_function_check_arity9(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
52static inline void rb_builtin_function_check_arity10(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
53static inline void rb_builtin_function_check_arity11(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
54static inline void rb_builtin_function_check_arity12(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
55static inline void rb_builtin_function_check_arity13(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
56static inline void rb_builtin_function_check_arity14(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
57static inline void rb_builtin_function_check_arity15(VALUE (*f)(rb_execution_context_t *ec, VALUE self, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE, VALUE)){}
58
59PUREFUNC(VALUE rb_vm_lvar_exposed(rb_execution_context_t *ec, int index));
60VALUE rb_vm_lvar_exposed(rb_execution_context_t *ec, int index);
61
62// __builtin_inline!
63
64PUREFUNC(static inline VALUE rb_vm_lvar(rb_execution_context_t *ec, int index));
65
66static inline VALUE
67rb_vm_lvar(rb_execution_context_t *ec, int index)
68{
69#if defined(VM_CORE_H_EC_DEFINED) && VM_CORE_H_EC_DEFINED
70 return ec->cfp->ep[index];
71#else
72 return rb_vm_lvar_exposed(ec, index);
73#endif
74}
75
76// dump/load
77
78struct builtin_binary {
79 const char *feature; // feature name
80 const unsigned char *bin; // binary by ISeq#to_binary
81 size_t bin_size;
82};
83
84#endif // BUILTIN_H_INCLUDED