node-marshal 0.2.1 → 0.2.2

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.
@@ -1,3 +1,3 @@
1
- #!/usr/bin/ruby
2
- require 'mkmf'
1
+ #!/usr/bin/ruby
2
+ require 'mkmf'
3
3
  create_makefile('nodemarshal')
@@ -1,321 +1,321 @@
1
- /*
2
- * Simpilfied and modified node.h file from Ruby 1.9.3 source code
3
- * Copyright (C) 1993-2007 Yukihiro Matsumoto
4
- * Copyright (C) 2015 Alexey Voskov
5
- */
6
-
7
- #ifndef RUBY_NODE_H
8
- #define RUBY_NODE_H 1
9
-
10
- #if defined(__cplusplus)
11
- extern "C" {
12
- #if 0
13
- } /* satisfy cc-mode */
14
- #endif
15
- #endif
16
-
17
-
18
- enum node_type {
19
- NODE_SCOPE,
20
- #define NODE_SCOPE NODE_SCOPE
21
- NODE_BLOCK,
22
- #define NODE_BLOCK NODE_BLOCK
23
- NODE_IF,
24
- #define NODE_IF NODE_IF
25
- NODE_CASE,
26
- #define NODE_CASE NODE_CASE
27
- NODE_WHEN,
28
- #define NODE_WHEN NODE_WHEN
29
- NODE_OPT_N,
30
- #define NODE_OPT_N NODE_OPT_N
31
- NODE_WHILE,
32
- #define NODE_WHILE NODE_WHILE
33
- NODE_UNTIL,
34
- #define NODE_UNTIL NODE_UNTIL
35
- NODE_ITER,
36
- #define NODE_ITER NODE_ITER
37
- NODE_FOR,
38
- #define NODE_FOR NODE_FOR
39
- NODE_BREAK,
40
- #define NODE_BREAK NODE_BREAK
41
- NODE_NEXT,
42
- #define NODE_NEXT NODE_NEXT
43
- NODE_REDO,
44
- #define NODE_REDO NODE_REDO
45
- NODE_RETRY,
46
- #define NODE_RETRY NODE_RETRY
47
- NODE_BEGIN,
48
- #define NODE_BEGIN NODE_BEGIN
49
- NODE_RESCUE,
50
- #define NODE_RESCUE NODE_RESCUE
51
- NODE_RESBODY,
52
- #define NODE_RESBODY NODE_RESBODY
53
- NODE_ENSURE,
54
- #define NODE_ENSURE NODE_ENSURE
55
- NODE_AND,
56
- #define NODE_AND NODE_AND
57
- NODE_OR,
58
- #define NODE_OR NODE_OR
59
- NODE_MASGN,
60
- #define NODE_MASGN NODE_MASGN
61
- NODE_LASGN,
62
- #define NODE_LASGN NODE_LASGN
63
- NODE_DASGN,
64
- #define NODE_DASGN NODE_DASGN
65
- NODE_DASGN_CURR,
66
- #define NODE_DASGN_CURR NODE_DASGN_CURR
67
- NODE_GASGN,
68
- #define NODE_GASGN NODE_GASGN
69
- NODE_IASGN,
70
- #define NODE_IASGN NODE_IASGN
71
- NODE_IASGN2,
72
- #define NODE_IASGN2 NODE_IASGN2
73
- NODE_CDECL,
74
- #define NODE_CDECL NODE_CDECL
75
- NODE_CVASGN,
76
- #define NODE_CVASGN NODE_CVASGN
77
- NODE_CVDECL,
78
- #define NODE_CVDECL NODE_CVDECL
79
- NODE_OP_ASGN1,
80
- #define NODE_OP_ASGN1 NODE_OP_ASGN1
81
- NODE_OP_ASGN2,
82
- #define NODE_OP_ASGN2 NODE_OP_ASGN2
83
- NODE_OP_ASGN_AND,
84
- #define NODE_OP_ASGN_AND NODE_OP_ASGN_AND
85
- NODE_OP_ASGN_OR,
86
- #define NODE_OP_ASGN_OR NODE_OP_ASGN_OR
87
- NODE_CALL,
88
- #define NODE_CALL NODE_CALL
89
- NODE_FCALL,
90
- #define NODE_FCALL NODE_FCALL
91
- NODE_VCALL,
92
- #define NODE_VCALL NODE_VCALL
93
- NODE_SUPER,
94
- #define NODE_SUPER NODE_SUPER
95
- NODE_ZSUPER,
96
- #define NODE_ZSUPER NODE_ZSUPER
97
- NODE_ARRAY,
98
- #define NODE_ARRAY NODE_ARRAY
99
- NODE_ZARRAY,
100
- #define NODE_ZARRAY NODE_ZARRAY
101
- NODE_VALUES,
102
- #define NODE_VALUES NODE_VALUES
103
- NODE_HASH,
104
- #define NODE_HASH NODE_HASH
105
- NODE_RETURN,
106
- #define NODE_RETURN NODE_RETURN
107
- NODE_YIELD,
108
- #define NODE_YIELD NODE_YIELD
109
- NODE_LVAR,
110
- #define NODE_LVAR NODE_LVAR
111
- NODE_DVAR,
112
- #define NODE_DVAR NODE_DVAR
113
- NODE_GVAR,
114
- #define NODE_GVAR NODE_GVAR
115
- NODE_IVAR,
116
- #define NODE_IVAR NODE_IVAR
117
- NODE_CONST,
118
- #define NODE_CONST NODE_CONST
119
- NODE_CVAR,
120
- #define NODE_CVAR NODE_CVAR
121
- NODE_NTH_REF,
122
- #define NODE_NTH_REF NODE_NTH_REF
123
- NODE_BACK_REF,
124
- #define NODE_BACK_REF NODE_BACK_REF
125
- NODE_MATCH,
126
- #define NODE_MATCH NODE_MATCH
127
- NODE_MATCH2,
128
- #define NODE_MATCH2 NODE_MATCH2
129
- NODE_MATCH3,
130
- #define NODE_MATCH3 NODE_MATCH3
131
- NODE_LIT,
132
- #define NODE_LIT NODE_LIT
133
- NODE_STR,
134
- #define NODE_STR NODE_STR
135
- NODE_DSTR,
136
- #define NODE_DSTR NODE_DSTR
137
- NODE_XSTR,
138
- #define NODE_XSTR NODE_XSTR
139
- NODE_DXSTR,
140
- #define NODE_DXSTR NODE_DXSTR
141
- NODE_EVSTR,
142
- #define NODE_EVSTR NODE_EVSTR
143
- NODE_DREGX,
144
- #define NODE_DREGX NODE_DREGX
145
- NODE_DREGX_ONCE,
146
- #define NODE_DREGX_ONCE NODE_DREGX_ONCE
147
- NODE_ARGS,
148
- #define NODE_ARGS NODE_ARGS
149
- NODE_ARGS_AUX,
150
- #define NODE_ARGS_AUX NODE_ARGS_AUX
151
- NODE_OPT_ARG,
152
- #define NODE_OPT_ARG NODE_OPT_ARG
153
- NODE_POSTARG,
154
- #define NODE_POSTARG NODE_POSTARG
155
- NODE_ARGSCAT,
156
- #define NODE_ARGSCAT NODE_ARGSCAT
157
- NODE_ARGSPUSH,
158
- #define NODE_ARGSPUSH NODE_ARGSPUSH
159
- NODE_SPLAT,
160
- #define NODE_SPLAT NODE_SPLAT
161
- NODE_TO_ARY,
162
- #define NODE_TO_ARY NODE_TO_ARY
163
- NODE_BLOCK_ARG,
164
- #define NODE_BLOCK_ARG NODE_BLOCK_ARG
165
- NODE_BLOCK_PASS,
166
- #define NODE_BLOCK_PASS NODE_BLOCK_PASS
167
- NODE_DEFN,
168
- #define NODE_DEFN NODE_DEFN
169
- NODE_DEFS,
170
- #define NODE_DEFS NODE_DEFS
171
- NODE_ALIAS,
172
- #define NODE_ALIAS NODE_ALIAS
173
- NODE_VALIAS,
174
- #define NODE_VALIAS NODE_VALIAS
175
- NODE_UNDEF,
176
- #define NODE_UNDEF NODE_UNDEF
177
- NODE_CLASS,
178
- #define NODE_CLASS NODE_CLASS
179
- NODE_MODULE,
180
- #define NODE_MODULE NODE_MODULE
181
- NODE_SCLASS,
182
- #define NODE_SCLASS NODE_SCLASS
183
- NODE_COLON2,
184
- #define NODE_COLON2 NODE_COLON2
185
- NODE_COLON3,
186
- #define NODE_COLON3 NODE_COLON3
187
- NODE_DOT2,
188
- #define NODE_DOT2 NODE_DOT2
189
- NODE_DOT3,
190
- #define NODE_DOT3 NODE_DOT3
191
- NODE_FLIP2,
192
- #define NODE_FLIP2 NODE_FLIP2
193
- NODE_FLIP3,
194
- #define NODE_FLIP3 NODE_FLIP3
195
- NODE_SELF,
196
- #define NODE_SELF NODE_SELF
197
- NODE_NIL,
198
- #define NODE_NIL NODE_NIL
199
- NODE_TRUE,
200
- #define NODE_TRUE NODE_TRUE
201
- NODE_FALSE,
202
- #define NODE_FALSE NODE_FALSE
203
- NODE_ERRINFO,
204
- #define NODE_ERRINFO NODE_ERRINFO
205
- NODE_DEFINED,
206
- #define NODE_DEFINED NODE_DEFINED
207
- NODE_POSTEXE,
208
- #define NODE_POSTEXE NODE_POSTEXE
209
- NODE_ALLOCA,
210
- #define NODE_ALLOCA NODE_ALLOCA
211
- NODE_BMETHOD,
212
- #define NODE_BMETHOD NODE_BMETHOD
213
- NODE_MEMO,
214
- #define NODE_MEMO NODE_MEMO
215
- NODE_IFUNC,
216
- #define NODE_IFUNC NODE_IFUNC
217
- NODE_DSYM,
218
- #define NODE_DSYM NODE_DSYM
219
- NODE_ATTRASGN,
220
- #define NODE_ATTRASGN NODE_ATTRASGN
221
- NODE_PRELUDE,
222
- #define NODE_PRELUDE NODE_PRELUDE
223
- NODE_LAMBDA,
224
- #define NODE_LAMBDA NODE_LAMBDA
225
- NODE_OPTBLOCK,
226
- #define NODE_OPTBLOCK NODE_OPTBLOCK
227
- NODE_LAST
228
- #define NODE_LAST NODE_LAST
229
- };
230
-
231
- typedef struct RNode {
232
- VALUE flags;
233
- VALUE nd_reserved; /* ex nd_file */
234
- union {
235
- struct RNode *node;
236
- ID id;
237
- VALUE value;
238
- VALUE (*cfunc)(ANYARGS);
239
- ID *tbl;
240
- } u1;
241
- union {
242
- struct RNode *node;
243
- ID id;
244
- long argc;
245
- VALUE value;
246
- } u2;
247
- union {
248
- struct RNode *node;
249
- ID id;
250
- long state;
251
- struct rb_global_entry *entry;
252
- long cnt;
253
- VALUE value;
254
- } u3;
255
- } NODE;
256
-
257
- #define RNODE(obj) (R_CAST(RNode)(obj))
258
-
259
- /* 0..4:T_TYPES, 5:FL_MARK, 6:reserved, 7:NODE_FL_NEWLINE */
260
- #define NODE_FL_NEWLINE (((VALUE)1)<<7)
261
- #define NODE_FL_CREF_PUSHED_BY_EVAL NODE_FL_NEWLINE
262
-
263
- #define NODE_TYPESHIFT 8
264
- #define NODE_TYPEMASK (((VALUE)0x7f)<<NODE_TYPESHIFT)
265
-
266
- #define nd_type(n) ((int) (((RNODE(n))->flags & NODE_TYPEMASK)>>NODE_TYPESHIFT))
267
- #define nd_set_type(n,t) \
268
- RNODE(n)->flags=((RNODE(n)->flags&~NODE_TYPEMASK)|((((unsigned long)(t))<<NODE_TYPESHIFT)&NODE_TYPEMASK))
269
-
270
- #define NODE_LSHIFT (NODE_TYPESHIFT+7)
271
- #define NODE_LMASK (((SIGNED_VALUE)1<<(sizeof(VALUE)*CHAR_BIT-NODE_LSHIFT))-1)
272
- #define nd_line(n) (int)(RNODE(n)->flags>>NODE_LSHIFT)
273
- #define nd_set_line(n,l) \
274
- RNODE(n)->flags=((RNODE(n)->flags&~(-1<<NODE_LSHIFT))|(((l)&NODE_LMASK)<<NODE_LSHIFT))
275
-
276
- #define NEW_NODE(t,a0,a1,a2) rb_node_newnode((t),(VALUE)(a0),(VALUE)(a1),(VALUE)(a2))
277
-
278
-
279
- #if defined __GNUC__ && __GNUC__ >= 4
280
- #pragma GCC visibility push(default)
281
- #endif
282
-
283
- /* ===== Some version-specific Ruby internals ===== */
284
- extern char *ruby_node_name(int type);
285
- extern VALUE rb_iseq_new_top(NODE *node, VALUE name, VALUE path, VALUE absolute_path, VALUE parent);
286
- extern VALUE rb_realpath_internal(VALUE basedir, VALUE path, int strict);
287
- /* ================================================ */
288
-
289
-
290
- VALUE rb_parser_dump_tree(NODE *node, int comment);
291
-
292
- NODE *rb_compile_cstr(const char*, const char*, int, int);
293
- NODE *rb_compile_string(const char*, VALUE, int);
294
- NODE *rb_compile_file(const char*, VALUE, int);
295
-
296
- NODE *rb_node_newnode(enum node_type,VALUE,VALUE,VALUE);
297
- NODE *rb_node_newnode_longlife(enum node_type,VALUE,VALUE,VALUE);
298
-
299
- struct rb_global_entry {
300
- struct rb_global_variable *var;
301
- ID id;
302
- };
303
-
304
- struct rb_global_entry *rb_global_entry(ID);
305
- VALUE rb_gvar_get(struct rb_global_entry *);
306
- VALUE rb_gvar_set(struct rb_global_entry *, VALUE);
307
- VALUE rb_gvar_defined(struct rb_global_entry *);
308
- const struct kwtable *rb_reserved_word(const char *, unsigned int);
309
-
310
- #if defined __GNUC__ && __GNUC__ >= 4
311
- #pragma GCC visibility pop
312
- #endif
313
-
314
- #if defined(__cplusplus)
315
- #if 0
316
- { /* satisfy cc-mode */
317
- #endif
318
- } /* extern "C" { */
319
- #endif
320
-
321
- #endif /* RUBY_NODE_H */
1
+ /*
2
+ * Simpilfied and modified node.h file from Ruby 1.9.3 source code
3
+ * Copyright (C) 1993-2007 Yukihiro Matsumoto
4
+ * Copyright (C) 2015 Alexey Voskov
5
+ */
6
+
7
+ #ifndef RUBY_NODE_H
8
+ #define RUBY_NODE_H 1
9
+
10
+ #if defined(__cplusplus)
11
+ extern "C" {
12
+ #if 0
13
+ } /* satisfy cc-mode */
14
+ #endif
15
+ #endif
16
+
17
+
18
+ enum node_type {
19
+ NODE_SCOPE,
20
+ #define NODE_SCOPE NODE_SCOPE
21
+ NODE_BLOCK,
22
+ #define NODE_BLOCK NODE_BLOCK
23
+ NODE_IF,
24
+ #define NODE_IF NODE_IF
25
+ NODE_CASE,
26
+ #define NODE_CASE NODE_CASE
27
+ NODE_WHEN,
28
+ #define NODE_WHEN NODE_WHEN
29
+ NODE_OPT_N,
30
+ #define NODE_OPT_N NODE_OPT_N
31
+ NODE_WHILE,
32
+ #define NODE_WHILE NODE_WHILE
33
+ NODE_UNTIL,
34
+ #define NODE_UNTIL NODE_UNTIL
35
+ NODE_ITER,
36
+ #define NODE_ITER NODE_ITER
37
+ NODE_FOR,
38
+ #define NODE_FOR NODE_FOR
39
+ NODE_BREAK,
40
+ #define NODE_BREAK NODE_BREAK
41
+ NODE_NEXT,
42
+ #define NODE_NEXT NODE_NEXT
43
+ NODE_REDO,
44
+ #define NODE_REDO NODE_REDO
45
+ NODE_RETRY,
46
+ #define NODE_RETRY NODE_RETRY
47
+ NODE_BEGIN,
48
+ #define NODE_BEGIN NODE_BEGIN
49
+ NODE_RESCUE,
50
+ #define NODE_RESCUE NODE_RESCUE
51
+ NODE_RESBODY,
52
+ #define NODE_RESBODY NODE_RESBODY
53
+ NODE_ENSURE,
54
+ #define NODE_ENSURE NODE_ENSURE
55
+ NODE_AND,
56
+ #define NODE_AND NODE_AND
57
+ NODE_OR,
58
+ #define NODE_OR NODE_OR
59
+ NODE_MASGN,
60
+ #define NODE_MASGN NODE_MASGN
61
+ NODE_LASGN,
62
+ #define NODE_LASGN NODE_LASGN
63
+ NODE_DASGN,
64
+ #define NODE_DASGN NODE_DASGN
65
+ NODE_DASGN_CURR,
66
+ #define NODE_DASGN_CURR NODE_DASGN_CURR
67
+ NODE_GASGN,
68
+ #define NODE_GASGN NODE_GASGN
69
+ NODE_IASGN,
70
+ #define NODE_IASGN NODE_IASGN
71
+ NODE_IASGN2,
72
+ #define NODE_IASGN2 NODE_IASGN2
73
+ NODE_CDECL,
74
+ #define NODE_CDECL NODE_CDECL
75
+ NODE_CVASGN,
76
+ #define NODE_CVASGN NODE_CVASGN
77
+ NODE_CVDECL,
78
+ #define NODE_CVDECL NODE_CVDECL
79
+ NODE_OP_ASGN1,
80
+ #define NODE_OP_ASGN1 NODE_OP_ASGN1
81
+ NODE_OP_ASGN2,
82
+ #define NODE_OP_ASGN2 NODE_OP_ASGN2
83
+ NODE_OP_ASGN_AND,
84
+ #define NODE_OP_ASGN_AND NODE_OP_ASGN_AND
85
+ NODE_OP_ASGN_OR,
86
+ #define NODE_OP_ASGN_OR NODE_OP_ASGN_OR
87
+ NODE_CALL,
88
+ #define NODE_CALL NODE_CALL
89
+ NODE_FCALL,
90
+ #define NODE_FCALL NODE_FCALL
91
+ NODE_VCALL,
92
+ #define NODE_VCALL NODE_VCALL
93
+ NODE_SUPER,
94
+ #define NODE_SUPER NODE_SUPER
95
+ NODE_ZSUPER,
96
+ #define NODE_ZSUPER NODE_ZSUPER
97
+ NODE_ARRAY,
98
+ #define NODE_ARRAY NODE_ARRAY
99
+ NODE_ZARRAY,
100
+ #define NODE_ZARRAY NODE_ZARRAY
101
+ NODE_VALUES,
102
+ #define NODE_VALUES NODE_VALUES
103
+ NODE_HASH,
104
+ #define NODE_HASH NODE_HASH
105
+ NODE_RETURN,
106
+ #define NODE_RETURN NODE_RETURN
107
+ NODE_YIELD,
108
+ #define NODE_YIELD NODE_YIELD
109
+ NODE_LVAR,
110
+ #define NODE_LVAR NODE_LVAR
111
+ NODE_DVAR,
112
+ #define NODE_DVAR NODE_DVAR
113
+ NODE_GVAR,
114
+ #define NODE_GVAR NODE_GVAR
115
+ NODE_IVAR,
116
+ #define NODE_IVAR NODE_IVAR
117
+ NODE_CONST,
118
+ #define NODE_CONST NODE_CONST
119
+ NODE_CVAR,
120
+ #define NODE_CVAR NODE_CVAR
121
+ NODE_NTH_REF,
122
+ #define NODE_NTH_REF NODE_NTH_REF
123
+ NODE_BACK_REF,
124
+ #define NODE_BACK_REF NODE_BACK_REF
125
+ NODE_MATCH,
126
+ #define NODE_MATCH NODE_MATCH
127
+ NODE_MATCH2,
128
+ #define NODE_MATCH2 NODE_MATCH2
129
+ NODE_MATCH3,
130
+ #define NODE_MATCH3 NODE_MATCH3
131
+ NODE_LIT,
132
+ #define NODE_LIT NODE_LIT
133
+ NODE_STR,
134
+ #define NODE_STR NODE_STR
135
+ NODE_DSTR,
136
+ #define NODE_DSTR NODE_DSTR
137
+ NODE_XSTR,
138
+ #define NODE_XSTR NODE_XSTR
139
+ NODE_DXSTR,
140
+ #define NODE_DXSTR NODE_DXSTR
141
+ NODE_EVSTR,
142
+ #define NODE_EVSTR NODE_EVSTR
143
+ NODE_DREGX,
144
+ #define NODE_DREGX NODE_DREGX
145
+ NODE_DREGX_ONCE,
146
+ #define NODE_DREGX_ONCE NODE_DREGX_ONCE
147
+ NODE_ARGS,
148
+ #define NODE_ARGS NODE_ARGS
149
+ NODE_ARGS_AUX,
150
+ #define NODE_ARGS_AUX NODE_ARGS_AUX
151
+ NODE_OPT_ARG,
152
+ #define NODE_OPT_ARG NODE_OPT_ARG
153
+ NODE_POSTARG,
154
+ #define NODE_POSTARG NODE_POSTARG
155
+ NODE_ARGSCAT,
156
+ #define NODE_ARGSCAT NODE_ARGSCAT
157
+ NODE_ARGSPUSH,
158
+ #define NODE_ARGSPUSH NODE_ARGSPUSH
159
+ NODE_SPLAT,
160
+ #define NODE_SPLAT NODE_SPLAT
161
+ NODE_TO_ARY,
162
+ #define NODE_TO_ARY NODE_TO_ARY
163
+ NODE_BLOCK_ARG,
164
+ #define NODE_BLOCK_ARG NODE_BLOCK_ARG
165
+ NODE_BLOCK_PASS,
166
+ #define NODE_BLOCK_PASS NODE_BLOCK_PASS
167
+ NODE_DEFN,
168
+ #define NODE_DEFN NODE_DEFN
169
+ NODE_DEFS,
170
+ #define NODE_DEFS NODE_DEFS
171
+ NODE_ALIAS,
172
+ #define NODE_ALIAS NODE_ALIAS
173
+ NODE_VALIAS,
174
+ #define NODE_VALIAS NODE_VALIAS
175
+ NODE_UNDEF,
176
+ #define NODE_UNDEF NODE_UNDEF
177
+ NODE_CLASS,
178
+ #define NODE_CLASS NODE_CLASS
179
+ NODE_MODULE,
180
+ #define NODE_MODULE NODE_MODULE
181
+ NODE_SCLASS,
182
+ #define NODE_SCLASS NODE_SCLASS
183
+ NODE_COLON2,
184
+ #define NODE_COLON2 NODE_COLON2
185
+ NODE_COLON3,
186
+ #define NODE_COLON3 NODE_COLON3
187
+ NODE_DOT2,
188
+ #define NODE_DOT2 NODE_DOT2
189
+ NODE_DOT3,
190
+ #define NODE_DOT3 NODE_DOT3
191
+ NODE_FLIP2,
192
+ #define NODE_FLIP2 NODE_FLIP2
193
+ NODE_FLIP3,
194
+ #define NODE_FLIP3 NODE_FLIP3
195
+ NODE_SELF,
196
+ #define NODE_SELF NODE_SELF
197
+ NODE_NIL,
198
+ #define NODE_NIL NODE_NIL
199
+ NODE_TRUE,
200
+ #define NODE_TRUE NODE_TRUE
201
+ NODE_FALSE,
202
+ #define NODE_FALSE NODE_FALSE
203
+ NODE_ERRINFO,
204
+ #define NODE_ERRINFO NODE_ERRINFO
205
+ NODE_DEFINED,
206
+ #define NODE_DEFINED NODE_DEFINED
207
+ NODE_POSTEXE,
208
+ #define NODE_POSTEXE NODE_POSTEXE
209
+ NODE_ALLOCA,
210
+ #define NODE_ALLOCA NODE_ALLOCA
211
+ NODE_BMETHOD,
212
+ #define NODE_BMETHOD NODE_BMETHOD
213
+ NODE_MEMO,
214
+ #define NODE_MEMO NODE_MEMO
215
+ NODE_IFUNC,
216
+ #define NODE_IFUNC NODE_IFUNC
217
+ NODE_DSYM,
218
+ #define NODE_DSYM NODE_DSYM
219
+ NODE_ATTRASGN,
220
+ #define NODE_ATTRASGN NODE_ATTRASGN
221
+ NODE_PRELUDE,
222
+ #define NODE_PRELUDE NODE_PRELUDE
223
+ NODE_LAMBDA,
224
+ #define NODE_LAMBDA NODE_LAMBDA
225
+ NODE_OPTBLOCK,
226
+ #define NODE_OPTBLOCK NODE_OPTBLOCK
227
+ NODE_LAST
228
+ #define NODE_LAST NODE_LAST
229
+ };
230
+
231
+ typedef struct RNode {
232
+ VALUE flags;
233
+ VALUE nd_reserved; /* ex nd_file */
234
+ union {
235
+ struct RNode *node;
236
+ ID id;
237
+ VALUE value;
238
+ VALUE (*cfunc)(ANYARGS);
239
+ ID *tbl;
240
+ } u1;
241
+ union {
242
+ struct RNode *node;
243
+ ID id;
244
+ long argc;
245
+ VALUE value;
246
+ } u2;
247
+ union {
248
+ struct RNode *node;
249
+ ID id;
250
+ long state;
251
+ struct rb_global_entry *entry;
252
+ long cnt;
253
+ VALUE value;
254
+ } u3;
255
+ } NODE;
256
+
257
+ #define RNODE(obj) (R_CAST(RNode)(obj))
258
+
259
+ /* 0..4:T_TYPES, 5:FL_MARK, 6:reserved, 7:NODE_FL_NEWLINE */
260
+ #define NODE_FL_NEWLINE (((VALUE)1)<<7)
261
+ #define NODE_FL_CREF_PUSHED_BY_EVAL NODE_FL_NEWLINE
262
+
263
+ #define NODE_TYPESHIFT 8
264
+ #define NODE_TYPEMASK (((VALUE)0x7f)<<NODE_TYPESHIFT)
265
+
266
+ #define nd_type(n) ((int) (((RNODE(n))->flags & NODE_TYPEMASK)>>NODE_TYPESHIFT))
267
+ #define nd_set_type(n,t) \
268
+ RNODE(n)->flags=((RNODE(n)->flags&~NODE_TYPEMASK)|((((unsigned long)(t))<<NODE_TYPESHIFT)&NODE_TYPEMASK))
269
+
270
+ #define NODE_LSHIFT (NODE_TYPESHIFT+7)
271
+ #define NODE_LMASK (((SIGNED_VALUE)1<<(sizeof(VALUE)*CHAR_BIT-NODE_LSHIFT))-1)
272
+ #define nd_line(n) (int)(RNODE(n)->flags>>NODE_LSHIFT)
273
+ #define nd_set_line(n,l) \
274
+ RNODE(n)->flags=((RNODE(n)->flags&~(-1<<NODE_LSHIFT))|(((l)&NODE_LMASK)<<NODE_LSHIFT))
275
+
276
+ #define NEW_NODE(t,a0,a1,a2) rb_node_newnode((t),(VALUE)(a0),(VALUE)(a1),(VALUE)(a2))
277
+
278
+
279
+ #if defined __GNUC__ && __GNUC__ >= 4
280
+ #pragma GCC visibility push(default)
281
+ #endif
282
+
283
+ /* ===== Some version-specific Ruby internals ===== */
284
+ extern char *ruby_node_name(int type);
285
+ extern VALUE rb_iseq_new_top(NODE *node, VALUE name, VALUE path, VALUE absolute_path, VALUE parent);
286
+ extern VALUE rb_realpath_internal(VALUE basedir, VALUE path, int strict);
287
+ /* ================================================ */
288
+
289
+
290
+ VALUE rb_parser_dump_tree(NODE *node, int comment);
291
+
292
+ NODE *rb_compile_cstr(const char*, const char*, int, int);
293
+ NODE *rb_compile_string(const char*, VALUE, int);
294
+ NODE *rb_compile_file(const char*, VALUE, int);
295
+
296
+ NODE *rb_node_newnode(enum node_type,VALUE,VALUE,VALUE);
297
+ NODE *rb_node_newnode_longlife(enum node_type,VALUE,VALUE,VALUE);
298
+
299
+ struct rb_global_entry {
300
+ struct rb_global_variable *var;
301
+ ID id;
302
+ };
303
+
304
+ struct rb_global_entry *rb_global_entry(ID);
305
+ VALUE rb_gvar_get(struct rb_global_entry *);
306
+ VALUE rb_gvar_set(struct rb_global_entry *, VALUE);
307
+ VALUE rb_gvar_defined(struct rb_global_entry *);
308
+ const struct kwtable *rb_reserved_word(const char *, unsigned int);
309
+
310
+ #if defined __GNUC__ && __GNUC__ >= 4
311
+ #pragma GCC visibility pop
312
+ #endif
313
+
314
+ #if defined(__cplusplus)
315
+ #if 0
316
+ { /* satisfy cc-mode */
317
+ #endif
318
+ } /* extern "C" { */
319
+ #endif
320
+
321
+ #endif /* RUBY_NODE_H */