rubyparser.h

   1 #ifndef RUBY_RUBYPARSER_H
   2 #define RUBY_RUBYPARSER_H 1
   3 /*
   4  * This is a header file for librubyparser interface
   5  */
   6
   7 #include <stdarg.h> /* for va_list */
   8 #include <assert.h>
   9
  10 #ifdef UNIVERSAL_PARSER
  11
  12 #define rb_encoding const void
  13 #define OnigCodePoint unsigned int
  14 #include "parser_st.h"
  15 #ifndef RUBY_RUBY_H
  16 #include "parser_value.h"
  17 #endif
  18
  19 #else
  20
  21 #include "ruby/encoding.h"
  22
  23 #endif
  24
  25 #ifndef FLEX_ARY_LEN
  26 /* From internal/compilers.h */
  27 /* A macro for defining a flexible array, like: VALUE ary[FLEX_ARY_LEN]; */
  28 #if defined(__STDC_VERSION__) && (__STDC_VERSION__ >= 199901L)
  29 # define FLEX_ARY_LEN   /* VALUE ary[]; */
  30 #elif defined(__GNUC__) && !defined(__STRICT_ANSI__)
  31 # define FLEX_ARY_LEN 0 /* VALUE ary[0]; */
  32 #else
  33 # define FLEX_ARY_LEN 1 /* VALUE ary[1]; */
  34 #endif
  35 #endif
  36
  37 #if defined(__GNUC__)
  38 # if defined(__MINGW_PRINTF_FORMAT)
  39 #   define RUBYPARSER_ATTRIBUTE_FORMAT(string_index, argument_index) __attribute__((format(__MINGW_PRINTF_FORMAT, string_index, argument_index)))
  40 # else
  41 #   define RUBYPARSER_ATTRIBUTE_FORMAT(string_index, argument_index) __attribute__((format(printf, string_index, argument_index)))
  42 # endif
  43 #elif defined(__clang__)
  44 # define RUBYPARSER_ATTRIBUTE_FORMAT(string_index, argument_index) __attribute__((__format__(__printf__, string_index, argument_index)))
  45 #else
  46 # define RUBYPARSER_ATTRIBUTE_FORMAT(string_index, argument_index)
  47 #endif
  48
  49 /*
  50  * Parser String
  51  */
  52 enum rb_parser_string_coderange_type {
  53     /** The object's coderange is unclear yet. */
  54     RB_PARSER_ENC_CODERANGE_UNKNOWN  = 0,
  55     RB_PARSER_ENC_CODERANGE_7BIT     = 1,
  56     RB_PARSER_ENC_CODERANGE_VALID    = 2,
  57     RB_PARSER_ENC_CODERANGE_BROKEN   = 3
  58 };
  59
  60 typedef struct rb_parser_string {
  61     enum rb_parser_string_coderange_type coderange;
  62     rb_encoding *enc;
  63     /* Length of the string, not including terminating NUL character. */
  64     long len;
  65     /* Pointer to the contents of the string. */
  66     char *ptr;
  67 } rb_parser_string_t;
  68
  69 enum rb_parser_shareability {
  70     rb_parser_shareable_none,
  71     rb_parser_shareable_literal,
  72     rb_parser_shareable_copy,
  73     rb_parser_shareable_everything,
  74 };
  75
  76 typedef void* rb_parser_input_data;
  77
  78 /*
  79  * AST Node
  80  */
  81 enum node_type {
  82     NODE_SCOPE,
  83     NODE_BLOCK,
  84     NODE_IF,
  85     NODE_UNLESS,
  86     NODE_CASE,
  87     NODE_CASE2,
  88     NODE_CASE3,
  89     NODE_WHEN,
  90     NODE_IN,
  91     NODE_WHILE,
  92     NODE_UNTIL,
  93     NODE_ITER,
  94     NODE_FOR,
  95     NODE_FOR_MASGN,
  96     NODE_BREAK,
  97     NODE_NEXT,
  98     NODE_REDO,
  99     NODE_RETRY,
 100     NODE_BEGIN,
 101     NODE_RESCUE,
 102     NODE_RESBODY,
 103     NODE_ENSURE,
 104     NODE_AND,
 105     NODE_OR,
 106     NODE_MASGN,
 107     NODE_LASGN,
 108     NODE_DASGN,
 109     NODE_GASGN,
 110     NODE_IASGN,
 111     NODE_CDECL,
 112     NODE_CVASGN,
 113     NODE_OP_ASGN1,
 114     NODE_OP_ASGN2,
 115     NODE_OP_ASGN_AND,
 116     NODE_OP_ASGN_OR,
 117     NODE_OP_CDECL,
 118     NODE_CALL,
 119     NODE_OPCALL,
 120     NODE_FCALL,
 121     NODE_VCALL,
 122     NODE_QCALL,
 123     NODE_SUPER,
 124     NODE_ZSUPER,
 125     NODE_LIST,
 126     NODE_ZLIST,
 127     NODE_HASH,
 128     NODE_RETURN,
 129     NODE_YIELD,
 130     NODE_LVAR,
 131     NODE_DVAR,
 132     NODE_GVAR,
 133     NODE_IVAR,
 134     NODE_CONST,
 135     NODE_CVAR,
 136     NODE_NTH_REF,
 137     NODE_BACK_REF,
 138     NODE_MATCH,
 139     NODE_MATCH2,
 140     NODE_MATCH3,
 141     NODE_INTEGER,
 142     NODE_FLOAT,
 143     NODE_RATIONAL,
 144     NODE_IMAGINARY,
 145     NODE_STR,
 146     NODE_DSTR,
 147     NODE_XSTR,
 148     NODE_DXSTR,
 149     NODE_EVSTR,
 150     NODE_REGX,
 151     NODE_DREGX,
 152     NODE_ONCE,
 153     NODE_ARGS,
 154     NODE_ARGS_AUX,
 155     NODE_OPT_ARG,
 156     NODE_KW_ARG,
 157     NODE_POSTARG,
 158     NODE_ARGSCAT,
 159     NODE_ARGSPUSH,
 160     NODE_SPLAT,
 161     NODE_BLOCK_PASS,
 162     NODE_DEFN,
 163     NODE_DEFS,
 164     NODE_ALIAS,
 165     NODE_VALIAS,
 166     NODE_UNDEF,
 167     NODE_CLASS,
 168     NODE_MODULE,
 169     NODE_SCLASS,
 170     NODE_COLON2,
 171     NODE_COLON3,
 172     NODE_DOT2,
 173     NODE_DOT3,
 174     NODE_FLIP2,
 175     NODE_FLIP3,
 176     NODE_SELF,
 177     NODE_NIL,
 178     NODE_TRUE,
 179     NODE_FALSE,
 180     NODE_ERRINFO,
 181     NODE_DEFINED,
 182     NODE_POSTEXE,
 183     NODE_SYM,
 184     NODE_DSYM,
 185     NODE_ATTRASGN,
 186     NODE_LAMBDA,
 187     NODE_ARYPTN,
 188     NODE_HSHPTN,
 189     NODE_FNDPTN,
 190     NODE_ERROR,
 191     NODE_LINE,
 192     NODE_FILE,
 193     NODE_ENCODING,
 194     NODE_LAST
 195 };
 196
 197 typedef struct rb_ast_id_table {
 198     int size;
 199     ID ids[FLEX_ARY_LEN];
 200 } rb_ast_id_table_t;
 201
 202 typedef struct rb_code_position_struct {
 203     int lineno;
 204     int column;
 205 } rb_code_position_t;
 206
 207 typedef struct rb_code_location_struct {
 208     rb_code_position_t beg_pos;
 209     rb_code_position_t end_pos;
 210 } rb_code_location_t;
 211 #define YYLTYPE rb_code_location_t
 212 #define YYLTYPE_IS_DECLARED 1
 213
 214 typedef struct rb_parser_ast_token {
 215     int id;
 216     const char *type_name;
 217     rb_parser_string_t *str;
 218     rb_code_location_t loc;
 219 } rb_parser_ast_token_t;
 220
 221 /*
 222  * Array-like object for parser
 223  */
 224 typedef void* rb_parser_ary_data;
 225
 226 enum rb_parser_ary_data_type {
 227     PARSER_ARY_DATA_AST_TOKEN,
 228     PARSER_ARY_DATA_SCRIPT_LINE
 229 };
 230
 231 typedef struct rb_parser_ary {
 232     enum rb_parser_ary_data_type data_type;
 233     rb_parser_ary_data *data;
 234     long len;  // current size
 235     long capa; // capacity
 236 } rb_parser_ary_t;
 237
 238 /* Header part of AST Node */
 239 typedef struct RNode {
 240     VALUE flags;
 241     rb_code_location_t nd_loc;
 242     int node_id;
 243 } NODE;
 244
 245 typedef struct RNode_SCOPE {
 246     NODE node;
 247
 248     rb_ast_id_table_t *nd_tbl;
 249     struct RNode *nd_body;
 250     struct RNode_ARGS *nd_args;
 251 } rb_node_scope_t;
 252
 253 typedef struct RNode_BLOCK {
 254     NODE node;
 255
 256     struct RNode *nd_head;
 257     struct RNode *nd_end;
 258     struct RNode *nd_next;
 259 } rb_node_block_t;
 260
 261 typedef struct RNode_IF {
 262     NODE node;
 263
 264     struct RNode *nd_cond;
 265     struct RNode *nd_body;
 266     struct RNode *nd_else;
 267 } rb_node_if_t;
 268
 269 typedef struct RNode_UNLESS {
 270     NODE node;
 271
 272     struct RNode *nd_cond;
 273     struct RNode *nd_body;
 274     struct RNode *nd_else;
 275 } rb_node_unless_t;
 276
 277 typedef struct RNode_CASE {
 278     NODE node;
 279
 280     struct RNode *nd_head;
 281     struct RNode *nd_body;
 282 } rb_node_case_t;
 283
 284 typedef struct RNode_CASE2 {
 285     NODE node;
 286
 287     struct RNode *nd_head;
 288     struct RNode *nd_body;
 289 } rb_node_case2_t;
 290
 291 typedef struct RNode_CASE3 {
 292     NODE node;
 293
 294     struct RNode *nd_head;
 295     struct RNode *nd_body;
 296 } rb_node_case3_t;
 297
 298 typedef struct RNode_WHEN {
 299     NODE node;
 300
 301     struct RNode *nd_head;
 302     struct RNode *nd_body;
 303     struct RNode *nd_next;
 304 } rb_node_when_t;
 305
 306 typedef struct RNode_IN {
 307     NODE node;
 308
 309     struct RNode *nd_head;
 310     struct RNode *nd_body;
 311     struct RNode *nd_next;
 312 } rb_node_in_t;
 313
 314 /* RNode_WHILE and RNode_UNTIL should be same structure */
 315 typedef struct RNode_WHILE {
 316     NODE node;
 317
 318     struct RNode *nd_cond;
 319     struct RNode *nd_body;
 320     long nd_state;
 321 } rb_node_while_t;
 322
 323 typedef struct RNode_UNTIL {
 324     NODE node;
 325
 326     struct RNode *nd_cond;
 327     struct RNode *nd_body;
 328     long nd_state;
 329 } rb_node_until_t;
 330
 331 /* RNode_ITER and RNode_FOR should be same structure */
 332 typedef struct RNode_ITER {
 333     NODE node;
 334
 335     struct RNode *nd_body;
 336     struct RNode *nd_iter;
 337 } rb_node_iter_t;
 338
 339 typedef struct RNode_FOR {
 340     NODE node;
 341
 342     struct RNode *nd_body;
 343     struct RNode *nd_iter;
 344 } rb_node_for_t;
 345
 346 typedef struct RNode_FOR_MASGN {
 347     NODE node;
 348
 349     struct RNode *nd_var;
 350 } rb_node_for_masgn_t;
 351
 352 /* RNode_BREAK, RNode_NEXT and RNode_REDO should be same structure */
 353 typedef struct RNode_BREAK {
 354     NODE node;
 355
 356     struct RNode *nd_chain;
 357     struct RNode *nd_stts;
 358 } rb_node_break_t;
 359
 360 typedef struct RNode_NEXT {
 361     NODE node;
 362
 363     struct RNode *nd_chain;
 364     struct RNode *nd_stts;
 365 } rb_node_next_t;
 366
 367 typedef struct RNode_REDO {
 368     NODE node;
 369
 370     struct RNode *nd_chain;
 371 } rb_node_redo_t;
 372
 373 typedef struct RNode_RETRY {
 374     NODE node;
 375 } rb_node_retry_t;
 376
 377 typedef struct RNode_BEGIN {
 378     NODE node;
 379
 380     struct RNode *nd_body;
 381 } rb_node_begin_t;
 382
 383 typedef struct RNode_RESCUE {
 384     NODE node;
 385
 386     struct RNode *nd_head;
 387     struct RNode *nd_resq;
 388     struct RNode *nd_else;
 389 } rb_node_rescue_t;
 390
 391 typedef struct RNode_RESBODY {
 392     NODE node;
 393
 394     struct RNode *nd_args;
 395     struct RNode *nd_body;
 396     struct RNode *nd_next;
 397 } rb_node_resbody_t;
 398
 399 typedef struct RNode_ENSURE {
 400     NODE node;
 401
 402     struct RNode *nd_head;
 403     struct RNode *nd_ensr;
 404 } rb_node_ensure_t;
 405
 406 /* RNode_AND and RNode_OR should be same structure */
 407 typedef struct RNode_AND {
 408     NODE node;
 409
 410     struct RNode *nd_1st;
 411     struct RNode *nd_2nd;
 412 } rb_node_and_t;
 413
 414 typedef struct RNode_OR {
 415     NODE node;
 416
 417     struct RNode *nd_1st;
 418     struct RNode *nd_2nd;
 419 } rb_node_or_t;
 420
 421 typedef struct RNode_MASGN {
 422     NODE node;
 423
 424     struct RNode *nd_head;
 425     struct RNode *nd_value;
 426     struct RNode *nd_args;
 427 } rb_node_masgn_t;
 428
 429 typedef struct RNode_LASGN {
 430     NODE node;
 431
 432     ID nd_vid;
 433     struct RNode *nd_value;
 434 } rb_node_lasgn_t;
 435
 436 typedef struct RNode_DASGN {
 437     NODE node;
 438
 439     ID nd_vid;
 440     struct RNode *nd_value;
 441 } rb_node_dasgn_t;
 442
 443 typedef struct RNode_GASGN {
 444     NODE node;
 445
 446     ID nd_vid;
 447     struct RNode *nd_value;
 448 } rb_node_gasgn_t;
 449
 450 typedef struct RNode_IASGN {
 451     NODE node;
 452
 453     ID nd_vid;
 454     struct RNode *nd_value;
 455 } rb_node_iasgn_t;
 456
 457 typedef struct RNode_CDECL {
 458     NODE node;
 459
 460     ID nd_vid;
 461     struct RNode *nd_value;
 462     struct RNode *nd_else;
 463     enum rb_parser_shareability shareability;
 464 } rb_node_cdecl_t;
 465
 466 typedef struct RNode_CVASGN {
 467     NODE node;
 468
 469     ID nd_vid;
 470     struct RNode *nd_value;
 471 } rb_node_cvasgn_t;
 472
 473 typedef struct RNode_OP_ASGN1 {
 474     NODE node;
 475
 476     struct RNode *nd_recv;
 477     ID nd_mid;
 478     struct RNode *nd_index;
 479     struct RNode *nd_rvalue;
 480 } rb_node_op_asgn1_t;
 481
 482 typedef struct RNode_OP_ASGN2 {
 483     NODE node;
 484
 485     struct RNode *nd_recv;
 486     struct RNode *nd_value;
 487     ID nd_vid;
 488     ID nd_mid;
 489     bool nd_aid;
 490 } rb_node_op_asgn2_t;
 491
 492 typedef struct RNode_OP_ASGN_AND {
 493     NODE node;
 494
 495     struct RNode *nd_head;
 496     struct RNode *nd_value;
 497 } rb_node_op_asgn_and_t;
 498
 499 typedef struct RNode_OP_ASGN_OR {
 500     NODE node;
 501
 502     struct RNode *nd_head;
 503     struct RNode *nd_value;
 504 } rb_node_op_asgn_or_t;
 505
 506 typedef struct RNode_OP_CDECL {
 507     NODE node;
 508
 509     struct RNode *nd_head;
 510     struct RNode *nd_value;
 511     ID nd_aid;
 512     enum rb_parser_shareability shareability;
 513 } rb_node_op_cdecl_t;
 514
 515 typedef struct RNode_CALL {
 516     NODE node;
 517
 518     struct RNode *nd_recv;
 519     ID nd_mid;
 520     struct RNode *nd_args;
 521 } rb_node_call_t;
 522
 523 typedef struct RNode_OPCALL {
 524     NODE node;
 525
 526     struct RNode *nd_recv;
 527     ID nd_mid;
 528     struct RNode *nd_args;
 529 } rb_node_opcall_t;
 530
 531 typedef struct RNode_FCALL {
 532     NODE node;
 533
 534     ID nd_mid;
 535     struct RNode *nd_args;
 536 } rb_node_fcall_t;
 537
 538 typedef struct RNode_VCALL {
 539     NODE node;
 540
 541     ID nd_mid;
 542 } rb_node_vcall_t;
 543
 544 typedef struct RNode_QCALL {
 545     NODE node;
 546
 547     struct RNode *nd_recv;
 548     ID nd_mid;
 549     struct RNode *nd_args;
 550 } rb_node_qcall_t;
 551
 552 typedef struct RNode_SUPER {
 553     NODE node;
 554
 555     struct RNode *nd_args;
 556 } rb_node_super_t;
 557
 558 typedef struct RNode_ZSUPER {
 559     NODE node;
 560 } rb_node_zsuper_t;
 561
 562 /*
 563
 564   Structure of LIST:
 565
 566   LIST                     +--> LIST
 567    * head --> element      |     * head
 568    * alen (length of list) |     * nd_end (point to the last LIST)
 569    * next -----------------+     * next
 570
 571
 572   RNode_LIST and RNode_VALUES should be same structure
 573 */
 574 typedef struct RNode_LIST {
 575     NODE node;
 576
 577     struct RNode *nd_head; /* element */
 578     union {
 579         long nd_alen;
 580         struct RNode *nd_end; /* Second list node has this structure */
 581     } as;
 582     struct RNode *nd_next; /* next list node */
 583 } rb_node_list_t;
 584
 585 typedef struct RNode_ZLIST {
 586     NODE node;
 587 } rb_node_zlist_t;
 588
 589 typedef struct RNode_VALUES {
 590     NODE node;
 591
 592     struct RNode *nd_head;
 593     long nd_alen;
 594     struct RNode *nd_next;
 595 } rb_node_values_t;
 596
 597 typedef struct RNode_HASH {
 598     NODE node;
 599
 600     struct RNode *nd_head;
 601     long nd_brace;
 602 } rb_node_hash_t;
 603
 604 typedef struct RNode_RETURN {
 605     NODE node;
 606
 607     struct RNode *nd_stts;
 608 } rb_node_return_t;
 609
 610 typedef struct RNode_YIELD {
 611     NODE node;
 612
 613     struct RNode *nd_head;
 614 } rb_node_yield_t;
 615
 616 typedef struct RNode_LVAR {
 617     NODE node;
 618
 619     ID nd_vid;
 620 } rb_node_lvar_t;
 621
 622 typedef struct RNode_DVAR {
 623     NODE node;
 624
 625     ID nd_vid;
 626 } rb_node_dvar_t;
 627
 628 typedef struct RNode_GVAR {
 629     NODE node;
 630
 631     ID nd_vid;
 632 } rb_node_gvar_t;
 633
 634 typedef struct RNode_IVAR {
 635     NODE node;
 636
 637     ID nd_vid;
 638 } rb_node_ivar_t;
 639
 640 typedef struct RNode_CONST {
 641     NODE node;
 642
 643     ID nd_vid;
 644 } rb_node_const_t;
 645
 646 typedef struct RNode_CVAR {
 647     NODE node;
 648
 649     ID nd_vid;
 650 } rb_node_cvar_t;
 651
 652 typedef struct RNode_NTH_REF {
 653     NODE node;
 654
 655     long nd_nth;
 656 } rb_node_nth_ref_t;
 657
 658 typedef struct RNode_BACK_REF {
 659     NODE node;
 660
 661     long nd_nth;
 662 } rb_node_back_ref_t;
 663
 664 /* RNode_MATCH and RNode_REGX should be same structure */
 665 typedef struct RNode_MATCH {
 666     NODE node;
 667
 668     struct rb_parser_string *string;
 669     int options;
 670 } rb_node_match_t;
 671
 672 typedef struct RNode_MATCH2 {
 673     NODE node;
 674
 675     struct RNode *nd_recv;
 676     struct RNode *nd_value;
 677     struct RNode *nd_args;
 678 } rb_node_match2_t;
 679
 680 typedef struct RNode_MATCH3 {
 681     NODE node;
 682
 683     struct RNode *nd_recv;
 684     struct RNode *nd_value;
 685 } rb_node_match3_t;
 686
 687 typedef struct RNode_INTEGER {
 688     NODE node;
 689
 690     char *val;
 691     int minus;
 692     int base;
 693 } rb_node_integer_t;
 694
 695 typedef struct RNode_FLOAT {
 696     NODE node;
 697
 698     char *val;
 699     int minus;
 700 } rb_node_float_t;
 701
 702 typedef struct RNode_RATIONAL {
 703     NODE node;
 704
 705     char *val;
 706     int minus;
 707     int base;
 708     int seen_point;
 709 } rb_node_rational_t;
 710
 711 enum rb_numeric_type {
 712     integer_literal,
 713     float_literal,
 714     rational_literal
 715 };
 716
 717 typedef struct RNode_IMAGINARY {
 718     NODE node;
 719
 720     char *val;
 721     int minus;
 722     int base;
 723     int seen_point;
 724     enum rb_numeric_type type;
 725 } rb_node_imaginary_t;
 726
 727 /* RNode_STR and RNode_XSTR should be same structure */
 728 typedef struct RNode_STR {
 729     NODE node;
 730
 731     struct rb_parser_string *string;
 732 } rb_node_str_t;
 733
 734 /* RNode_DSTR, RNode_DXSTR and RNode_DSYM should be same structure */
 735 typedef struct RNode_DSTR {
 736     NODE node;
 737
 738     struct rb_parser_string *string;
 739     union {
 740         long nd_alen;
 741         struct RNode *nd_end; /* Second dstr node has this structure. See also RNode_LIST */
 742     } as;
 743     struct RNode_LIST *nd_next;
 744 } rb_node_dstr_t;
 745
 746 typedef struct RNode_XSTR {
 747     NODE node;
 748
 749     struct rb_parser_string *string;
 750 } rb_node_xstr_t;
 751
 752 typedef struct RNode_DXSTR {
 753     NODE node;
 754
 755     struct rb_parser_string *string;
 756     long nd_alen;
 757     struct RNode_LIST *nd_next;
 758 } rb_node_dxstr_t;
 759
 760 typedef struct RNode_EVSTR {
 761     NODE node;
 762
 763     struct RNode *nd_body;
 764 } rb_node_evstr_t;
 765
 766 typedef struct RNode_REGX {
 767     NODE node;
 768
 769     struct rb_parser_string *string;
 770     int options;
 771 } rb_node_regx_t;
 772
 773 typedef struct RNode_DREGX {
 774     NODE node;
 775
 776     struct rb_parser_string *string;
 777     ID nd_cflag;
 778     struct RNode_LIST *nd_next;
 779 } rb_node_dregx_t;
 780
 781 typedef struct RNode_ONCE {
 782     NODE node;
 783
 784     struct RNode *nd_body;
 785 } rb_node_once_t;
 786
 787 struct rb_args_info {
 788     NODE *pre_init;
 789     NODE *post_init;
 790
 791     int pre_args_num;  /* count of mandatory pre-arguments */
 792     int post_args_num; /* count of mandatory post-arguments */
 793
 794     ID first_post_arg;
 795
 796     ID rest_arg;
 797     ID block_arg;
 798
 799     struct RNode_KW_ARG *kw_args;
 800     NODE *kw_rest_arg;
 801
 802     struct RNode_OPT_ARG *opt_args;
 803     unsigned int no_kwarg: 1;
 804     unsigned int ruby2_keywords: 1;
 805     unsigned int forwarding: 1;
 806 };
 807
 808 typedef struct RNode_ARGS {
 809     NODE node;
 810
 811     struct rb_args_info nd_ainfo;
 812 } rb_node_args_t;
 813
 814 typedef struct RNode_ARGS_AUX {
 815     NODE node;
 816
 817     ID nd_pid;
 818     int nd_plen;
 819     struct RNode *nd_next;
 820 } rb_node_args_aux_t;
 821
 822 typedef struct RNode_OPT_ARG {
 823     NODE node;
 824
 825     struct RNode *nd_body;
 826     struct RNode_OPT_ARG *nd_next;
 827 } rb_node_opt_arg_t;
 828
 829 typedef struct RNode_KW_ARG {
 830     NODE node;
 831
 832     struct RNode *nd_body;
 833     struct RNode_KW_ARG *nd_next;
 834 } rb_node_kw_arg_t;
 835
 836 typedef struct RNode_POSTARG {
 837     NODE node;
 838
 839     struct RNode *nd_1st;
 840     struct RNode *nd_2nd;
 841 } rb_node_postarg_t;
 842
 843 typedef struct RNode_ARGSCAT {
 844     NODE node;
 845
 846     struct RNode *nd_head;
 847     struct RNode *nd_body;
 848 } rb_node_argscat_t;
 849
 850 typedef struct RNode_ARGSPUSH {
 851     NODE node;
 852
 853     struct RNode *nd_head;
 854     struct RNode *nd_body;
 855 } rb_node_argspush_t;
 856
 857 typedef struct RNode_SPLAT {
 858     NODE node;
 859
 860     struct RNode *nd_head;
 861 } rb_node_splat_t;
 862
 863 typedef struct RNode_BLOCK_PASS {
 864     NODE node;
 865
 866     struct RNode *nd_head;
 867     struct RNode *nd_body;
 868 } rb_node_block_pass_t;
 869
 870 typedef struct RNode_DEFN {
 871     NODE node;
 872
 873     ID nd_mid;
 874     struct RNode *nd_defn;
 875 } rb_node_defn_t;
 876
 877 typedef struct RNode_DEFS {
 878     NODE node;
 879
 880     struct RNode *nd_recv;
 881     ID nd_mid;
 882     struct RNode *nd_defn;
 883 } rb_node_defs_t;
 884
 885 typedef struct RNode_ALIAS {
 886     NODE node;
 887
 888     struct RNode *nd_1st;
 889     struct RNode *nd_2nd;
 890 } rb_node_alias_t;
 891
 892 typedef struct RNode_VALIAS {
 893     NODE node;
 894
 895     ID nd_alias;
 896     ID nd_orig;
 897 } rb_node_valias_t;
 898
 899 typedef struct RNode_UNDEF {
 900     NODE node;
 901
 902     struct RNode *nd_undef;
 903 } rb_node_undef_t;
 904
 905 typedef struct RNode_CLASS {
 906     NODE node;
 907
 908     struct RNode *nd_cpath;
 909     struct RNode *nd_body;
 910     struct RNode *nd_super;
 911 } rb_node_class_t;
 912
 913 typedef struct RNode_MODULE {
 914     NODE node;
 915
 916     struct RNode *nd_cpath;
 917     struct RNode *nd_body;
 918 } rb_node_module_t;
 919
 920 typedef struct RNode_SCLASS {
 921     NODE node;
 922
 923     struct RNode *nd_recv;
 924     struct RNode *nd_body;
 925 } rb_node_sclass_t;
 926
 927 typedef struct RNode_COLON2 {
 928     NODE node;
 929
 930     struct RNode *nd_head;
 931     ID nd_mid;
 932 } rb_node_colon2_t;
 933
 934 typedef struct RNode_COLON3 {
 935     NODE node;
 936
 937     ID nd_mid;
 938 } rb_node_colon3_t;
 939
 940 /* RNode_DOT2, RNode_DOT3, RNode_FLIP2 and RNode_FLIP3 should be same structure */
 941 typedef struct RNode_DOT2 {
 942     NODE node;
 943
 944     struct RNode *nd_beg;
 945     struct RNode *nd_end;
 946 } rb_node_dot2_t;
 947
 948 typedef struct RNode_DOT3 {
 949     NODE node;
 950
 951     struct RNode *nd_beg;
 952     struct RNode *nd_end;
 953 } rb_node_dot3_t;
 954
 955 typedef struct RNode_FLIP2 {
 956     NODE node;
 957
 958     struct RNode *nd_beg;
 959     struct RNode *nd_end;
 960 } rb_node_flip2_t;
 961
 962 typedef struct RNode_FLIP3 {
 963     NODE node;
 964
 965     struct RNode *nd_beg;
 966     struct RNode *nd_end;
 967 } rb_node_flip3_t;
 968
 969 typedef struct RNode_SELF {
 970     NODE node;
 971
 972     long nd_state; /* Default 1. See NEW_SELF. */
 973 } rb_node_self_t;
 974
 975 typedef struct RNode_NIL {
 976     NODE node;
 977 } rb_node_nil_t;
 978
 979 typedef struct RNode_TRUE {
 980     NODE node;
 981 } rb_node_true_t;
 982
 983 typedef struct RNode_FALSE {
 984     NODE node;
 985 } rb_node_false_t;
 986
 987 typedef struct RNode_ERRINFO {
 988     NODE node;
 989 } rb_node_errinfo_t;
 990
 991 typedef struct RNode_DEFINED {
 992     NODE node;
 993
 994     struct RNode *nd_head;
 995 } rb_node_defined_t;
 996
 997 typedef struct RNode_POSTEXE {
 998     NODE node;
 999
1000     struct RNode *nd_body;
1001 } rb_node_postexe_t;
1002
1003 typedef struct RNode_SYM {
1004     NODE node;
1005
1006     struct rb_parser_string *string;
1007 } rb_node_sym_t;
1008
1009 typedef struct RNode_DSYM {
1010     NODE node;
1011
1012     struct rb_parser_string *string;
1013     long nd_alen;
1014     struct RNode_LIST *nd_next;
1015 } rb_node_dsym_t;
1016
1017 typedef struct RNode_ATTRASGN {
1018     NODE node;
1019
1020     struct RNode *nd_recv;
1021     ID nd_mid;
1022     struct RNode *nd_args;
1023 } rb_node_attrasgn_t;
1024
1025 typedef struct RNode_LAMBDA {
1026     NODE node;
1027
1028     struct RNode *nd_body;
1029 } rb_node_lambda_t;
1030
1031 typedef struct RNode_ARYPTN {
1032     NODE node;
1033
1034     struct RNode *nd_pconst;
1035     NODE *pre_args;
1036     NODE *rest_arg;
1037     NODE *post_args;
1038 } rb_node_aryptn_t;
1039
1040 typedef struct RNode_HSHPTN {
1041     NODE node;
1042
1043     struct RNode *nd_pconst;
1044     struct RNode *nd_pkwargs;
1045     struct RNode *nd_pkwrestarg;
1046 } rb_node_hshptn_t;
1047
1048 typedef struct RNode_FNDPTN {
1049     NODE node;
1050
1051     struct RNode *nd_pconst;
1052     NODE *pre_rest_arg;
1053     NODE *args;
1054     NODE *post_rest_arg;
1055 } rb_node_fndptn_t;
1056
1057 typedef struct RNode_LINE {
1058     NODE node;
1059 } rb_node_line_t;
1060
1061 typedef struct RNode_FILE {
1062     NODE node;
1063
1064     struct rb_parser_string *path;
1065 } rb_node_file_t;
1066
1067 typedef struct RNode_ENCODING {
1068     NODE node;
1069     rb_encoding *enc;
1070 } rb_node_encoding_t;
1071
1072 typedef struct RNode_ERROR {
1073     NODE node;
1074 } rb_node_error_t;
1075
1076 #define RNODE(obj)  ((struct RNode *)(obj))
1077
1078 #define RNODE_SCOPE(node) ((struct RNode_SCOPE *)(node))
1079 #define RNODE_BLOCK(node) ((struct RNode_BLOCK *)(node))
1080 #define RNODE_IF(node) ((struct RNode_IF *)(node))
1081 #define RNODE_UNLESS(node) ((struct RNode_UNLESS *)(node))
1082 #define RNODE_CASE(node) ((struct RNode_CASE *)(node))
1083 #define RNODE_CASE2(node) ((struct RNode_CASE2 *)(node))
1084 #define RNODE_CASE3(node) ((struct RNode_CASE3 *)(node))
1085 #define RNODE_WHEN(node) ((struct RNode_WHEN *)(node))
1086 #define RNODE_IN(node) ((struct RNode_IN *)(node))
1087 #define RNODE_WHILE(node) ((struct RNode_WHILE *)(node))
1088 #define RNODE_UNTIL(node) ((struct RNode_UNTIL *)(node))
1089 #define RNODE_ITER(node) ((struct RNode_ITER *)(node))
1090 #define RNODE_FOR(node) ((struct RNode_FOR *)(node))
1091 #define RNODE_FOR_MASGN(node) ((struct RNode_FOR_MASGN *)(node))
1092 #define RNODE_BREAK(node) ((struct RNode_BREAK *)(node))
1093 #define RNODE_NEXT(node) ((struct RNode_NEXT *)(node))
1094 #define RNODE_REDO(node) ((struct RNode_REDO *)(node))
1095 #define RNODE_RETRY(node) ((struct RNode_RETRY *)(node))
1096 #define RNODE_BEGIN(node) ((struct RNode_BEGIN *)(node))
1097 #define RNODE_RESCUE(node) ((struct RNode_RESCUE *)(node))
1098 #define RNODE_RESBODY(node) ((struct RNode_RESBODY *)(node))
1099 #define RNODE_ENSURE(node) ((struct RNode_ENSURE *)(node))
1100 #define RNODE_AND(node) ((struct RNode_AND *)(node))
1101 #define RNODE_OR(node) ((struct RNode_OR *)(node))
1102 #define RNODE_MASGN(node) ((struct RNode_MASGN *)(node))
1103 #define RNODE_LASGN(node) ((struct RNode_LASGN *)(node))
1104 #define RNODE_DASGN(node) ((struct RNode_DASGN *)(node))
1105 #define RNODE_GASGN(node) ((struct RNode_GASGN *)(node))
1106 #define RNODE_IASGN(node) ((struct RNode_IASGN *)(node))
1107 #define RNODE_CDECL(node) ((struct RNode_CDECL *)(node))
1108 #define RNODE_CVASGN(node) ((struct RNode_CVASGN *)(node))
1109 #define RNODE_OP_ASGN1(node) ((struct RNode_OP_ASGN1 *)(node))
1110 #define RNODE_OP_ASGN2(node) ((struct RNode_OP_ASGN2 *)(node))
1111 #define RNODE_OP_ASGN_AND(node) ((struct RNode_OP_ASGN_AND *)(node))
1112 #define RNODE_OP_ASGN_OR(node) ((struct RNode_OP_ASGN_OR *)(node))
1113 #define RNODE_OP_CDECL(node) ((struct RNode_OP_CDECL *)(node))
1114 #define RNODE_CALL(node) ((struct RNode_CALL *)(node))
1115 #define RNODE_OPCALL(node) ((struct RNode_OPCALL *)(node))
1116 #define RNODE_FCALL(node) ((struct RNode_FCALL *)(node))
1117 #define RNODE_VCALL(node) ((struct RNode_VCALL *)(node))
1118 #define RNODE_QCALL(node) ((struct RNode_QCALL *)(node))
1119 #define RNODE_SUPER(node) ((struct RNode_SUPER *)(node))
1120 #define RNODE_ZSUPER(node) ((struct RNode_ZSUPER *)(node))
1121 #define RNODE_LIST(node) ((struct RNode_LIST *)(node))
1122 #define RNODE_ZLIST(node) ((struct RNode_ZLIST *)(node))
1123 #define RNODE_HASH(node) ((struct RNode_HASH *)(node))
1124 #define RNODE_RETURN(node) ((struct RNode_RETURN *)(node))
1125 #define RNODE_YIELD(node) ((struct RNode_YIELD *)(node))
1126 #define RNODE_LVAR(node) ((struct RNode_LVAR *)(node))
1127 #define RNODE_DVAR(node) ((struct RNode_DVAR *)(node))
1128 #define RNODE_GVAR(node) ((struct RNode_GVAR *)(node))
1129 #define RNODE_IVAR(node) ((struct RNode_IVAR *)(node))
1130 #define RNODE_CONST(node) ((struct RNode_CONST *)(node))
1131 #define RNODE_CVAR(node) ((struct RNode_CVAR *)(node))
1132 #define RNODE_NTH_REF(node) ((struct RNode_NTH_REF *)(node))
1133 #define RNODE_BACK_REF(node) ((struct RNode_BACK_REF *)(node))
1134 #define RNODE_MATCH(node) ((struct RNode_MATCH *)(node))
1135 #define RNODE_MATCH2(node) ((struct RNode_MATCH2 *)(node))
1136 #define RNODE_MATCH3(node) ((struct RNode_MATCH3 *)(node))
1137 #define RNODE_INTEGER(node) ((struct RNode_INTEGER *)(node))
1138 #define RNODE_FLOAT(node) ((struct RNode_FLOAT *)(node))
1139 #define RNODE_RATIONAL(node) ((struct RNode_RATIONAL *)(node))
1140 #define RNODE_IMAGINARY(node) ((struct RNode_IMAGINARY *)(node))
1141 #define RNODE_STR(node) ((struct RNode_STR *)(node))
1142 #define RNODE_DSTR(node) ((struct RNode_DSTR *)(node))
1143 #define RNODE_XSTR(node) ((struct RNode_XSTR *)(node))
1144 #define RNODE_DXSTR(node) ((struct RNode_DXSTR *)(node))
1145 #define RNODE_EVSTR(node) ((struct RNode_EVSTR *)(node))
1146 #define RNODE_REGX(node) ((struct RNode_REGX *)(node))
1147 #define RNODE_DREGX(node) ((struct RNode_DREGX *)(node))
1148 #define RNODE_ONCE(node) ((struct RNode_ONCE *)(node))
1149 #define RNODE_ARGS(node) ((struct RNode_ARGS *)(node))
1150 #define RNODE_ARGS_AUX(node) ((struct RNode_ARGS_AUX *)(node))
1151 #define RNODE_OPT_ARG(node) ((struct RNode_OPT_ARG *)(node))
1152 #define RNODE_KW_ARG(node) ((struct RNode_KW_ARG *)(node))
1153 #define RNODE_POSTARG(node) ((struct RNode_POSTARG *)(node))
1154 #define RNODE_ARGSCAT(node) ((struct RNode_ARGSCAT *)(node))
1155 #define RNODE_ARGSPUSH(node) ((struct RNode_ARGSPUSH *)(node))
1156 #define RNODE_SPLAT(node) ((struct RNode_SPLAT *)(node))
1157 #define RNODE_BLOCK_PASS(node) ((struct RNode_BLOCK_PASS *)(node))
1158 #define RNODE_DEFN(node) ((struct RNode_DEFN *)(node))
1159 #define RNODE_DEFS(node) ((struct RNode_DEFS *)(node))
1160 #define RNODE_ALIAS(node) ((struct RNode_ALIAS *)(node))
1161 #define RNODE_VALIAS(node) ((struct RNode_VALIAS *)(node))
1162 #define RNODE_UNDEF(node) ((struct RNode_UNDEF *)(node))
1163 #define RNODE_CLASS(node) ((struct RNode_CLASS *)(node))
1164 #define RNODE_MODULE(node) ((struct RNode_MODULE *)(node))
1165 #define RNODE_SCLASS(node) ((struct RNode_SCLASS *)(node))
1166 #define RNODE_COLON2(node) ((struct RNode_COLON2 *)(node))
1167 #define RNODE_COLON3(node) ((struct RNode_COLON3 *)(node))
1168 #define RNODE_DOT2(node) ((struct RNode_DOT2 *)(node))
1169 #define RNODE_DOT3(node) ((struct RNode_DOT3 *)(node))
1170 #define RNODE_FLIP2(node) ((struct RNode_FLIP2 *)(node))
1171 #define RNODE_FLIP3(node) ((struct RNode_FLIP3 *)(node))
1172 #define RNODE_SELF(node) ((struct RNode_SELF *)(node))
1173 #define RNODE_NIL(node) ((struct RNode_NIL *)(node))
1174 #define RNODE_TRUE(node) ((struct RNode_TRUE *)(node))
1175 #define RNODE_FALSE(node) ((struct RNode_FALSE *)(node))
1176 #define RNODE_ERRINFO(node) ((struct RNode_ERRINFO *)(node))
1177 #define RNODE_DEFINED(node) ((struct RNode_DEFINED *)(node))
1178 #define RNODE_POSTEXE(node) ((struct RNode_POSTEXE *)(node))
1179 #define RNODE_SYM(node) ((struct RNode_SYM *)(node))
1180 #define RNODE_DSYM(node) ((struct RNode_DSYM *)(node))
1181 #define RNODE_ATTRASGN(node) ((struct RNode_ATTRASGN *)(node))
1182 #define RNODE_LAMBDA(node) ((struct RNode_LAMBDA *)(node))
1183 #define RNODE_ARYPTN(node) ((struct RNode_ARYPTN *)(node))
1184 #define RNODE_HSHPTN(node) ((struct RNode_HSHPTN *)(node))
1185 #define RNODE_FNDPTN(node) ((struct RNode_FNDPTN *)(node))
1186 #define RNODE_LINE(node) ((struct RNode_LINE *)(node))
1187 #define RNODE_FILE(node) ((struct RNode_FILE *)(node))
1188 #define RNODE_ENCODING(node) ((struct RNode_ENCODING *)(node))
1189
1190 /* FL     : 0..4: T_TYPES, 5: KEEP_WB, 6: PROMOTED, 7: FINALIZE, 8: UNUSED, 9: UNUSED, 10: EXIVAR, 11: FREEZE */
1191 /* NODE_FL: 0..4: UNUSED,  5: UNUSED,  6: UNUSED,   7: NODE_FL_NEWLINE,
1192  *          8..14: nd_type,
1193  *          15..: nd_line
1194  */
1195 #define NODE_FL_NEWLINE              (((VALUE)1)<<7)
1196
1197 #define NODE_TYPESHIFT 8
1198 #define NODE_TYPEMASK  (((VALUE)0x7f)<<NODE_TYPESHIFT)
1199
1200 #define nd_fl_newline(n) (n)->flags & NODE_FL_NEWLINE
1201 #define nd_set_fl_newline(n) (n)->flags |= NODE_FL_NEWLINE
1202 #define nd_unset_fl_newline(n) (n)->flags &= ~NODE_FL_NEWLINE
1203
1204 #define nd_type(n) ((int) ((RNODE(n)->flags & NODE_TYPEMASK)>>NODE_TYPESHIFT))
1205 #define nd_set_type(n,t) \
1206     rb_node_set_type(n, t)
1207 #define nd_init_type(n,t) \
1208     (n)->flags=(((n)->flags&~NODE_TYPEMASK)|((((unsigned long)(t))<<NODE_TYPESHIFT)&NODE_TYPEMASK))
1209
1210 typedef struct node_buffer_struct node_buffer_t;
1211
1212 #ifdef UNIVERSAL_PARSER
1213 typedef struct rb_parser_config_struct rb_parser_config_t;
1214 #endif
1215
1216 typedef struct rb_ast_body_struct {
1217     const NODE *root;
1218     rb_parser_ary_t *script_lines;
1219     int line_count;
1220     signed int frozen_string_literal:2; /* -1: not specified, 0: false, 1: true */
1221     signed int coverage_enabled:2; /* -1: not specified, 0: false, 1: true */
1222 } rb_ast_body_t;
1223 typedef struct rb_ast_struct {
1224     node_buffer_t *node_buffer;
1225     rb_ast_body_t body;
1226 #ifdef UNIVERSAL_PARSER
1227     const rb_parser_config_t *config;
1228 #endif
1229 } rb_ast_t;
1230
1231
1232
1233 /*
1234  * Parser Interface
1235  */
1236
1237
1238 typedef struct parser_params rb_parser_t;
1239 #ifndef INTERNAL_IMEMO_H
1240 typedef struct rb_imemo_tmpbuf_struct rb_imemo_tmpbuf_t;
1241 #endif
1242
1243 #ifdef UNIVERSAL_PARSER
1244 typedef struct rb_parser_config_struct {
1245     /* Memory */
1246     void *(*malloc)(size_t size);
1247     void *(*calloc)(size_t number, size_t size);
1248     void *(*realloc)(void *ptr, size_t newsiz);
1249     void (*free)(void *ptr);
1250     void *(*alloc_n)(size_t nelems, size_t elemsiz);
1251     void *(*alloc)(size_t elemsiz);
1252     void *(*realloc_n)(void *ptr, size_t newelems, size_t newsiz);
1253     void *(*zalloc)(size_t elemsiz);
1254     void *(*rb_memmove)(void *dest, const void *src, size_t t, size_t n);
1255     void *(*nonempty_memcpy)(void *dest, const void *src, size_t t, size_t n);
1256     void *(*xmalloc_mul_add)(size_t x, size_t y, size_t z);
1257
1258     // VALUE rb_suppress_tracing(VALUE (*func)(VALUE), VALUE arg);
1259     VALUE (*compile_callback)(VALUE (*func)(VALUE), VALUE arg);
1260     NODE *(*reg_named_capture_assign)(struct parser_params* p, VALUE regexp, const rb_code_location_t *loc);
1261
1262     /* Variable */
1263     VALUE (*attr_get)(VALUE obj, ID id);
1264
1265     /* Array */
1266     VALUE (*ary_new)(void);
1267     VALUE (*ary_push)(VALUE ary, VALUE elem);
1268     VALUE (*ary_new_from_args)(long n, ...);
1269     VALUE (*ary_unshift)(VALUE ary, VALUE item);
1270
1271     /* Symbol */
1272     ID (*make_temporary_id)(size_t n);
1273     int (*is_local_id)(ID);
1274     int (*is_attrset_id)(ID);
1275     int (*is_global_name_punct)(const int c);
1276     int (*id_type)(ID id);
1277     ID (*id_attrset)(ID);
1278     ID (*intern)(const char *name);
1279     ID (*intern2)(const char *name, long len);
1280     ID (*intern3)(const char *name, long len, rb_encoding *enc);
1281     ID (*intern_str)(VALUE str);
1282     int (*is_notop_id)(ID);
1283     int (*enc_symname_type)(const char *name, long len, rb_encoding *enc, unsigned int allowed_attrset);
1284     const char *(*id2name)(ID id);
1285     VALUE (*id2str)(ID id);
1286     VALUE (*id2sym)(ID x);
1287     ID (*sym2id)(VALUE sym);
1288
1289     /* String */
1290     RBIMPL_ATTR_FORMAT(RBIMPL_PRINTF_FORMAT, 2, 3)
1291     VALUE (*str_catf)(VALUE str, const char *format, ...);
1292     VALUE (*str_cat_cstr)(VALUE str, const char *ptr);
1293     void (*str_modify)(VALUE str);
1294     void (*str_set_len)(VALUE str, long len);
1295     VALUE (*str_cat)(VALUE str, const char *ptr, long len);
1296     VALUE (*str_resize)(VALUE str, long len);
1297     VALUE (*str_new)(const char *ptr, long len);
1298     VALUE (*str_new_cstr)(const char *ptr);
1299     VALUE (*str_to_interned_str)(VALUE);
1300     int (*is_ascii_string)(VALUE str);
1301     VALUE (*enc_str_new)(const char *ptr, long len, rb_encoding *enc);
1302     RBIMPL_ATTR_FORMAT(RBIMPL_PRINTF_FORMAT, 2, 0)
1303     VALUE (*str_vcatf)(VALUE str, const char *fmt, va_list ap);
1304     char *(*string_value_cstr)(volatile VALUE *ptr);
1305     RBIMPL_ATTR_FORMAT(RBIMPL_PRINTF_FORMAT, 1, 2)
1306     VALUE (*rb_sprintf)(const char *format, ...);
1307     char *(*rstring_ptr)(VALUE str);
1308     char *(*rstring_end)(VALUE str);
1309     long (*rstring_len)(VALUE str);
1310     VALUE (*obj_as_string)(VALUE);
1311
1312     /* Numeric */
1313     VALUE (*int2num)(int v);
1314
1315     /* IO */
1316     int (*stderr_tty_p)(void);
1317     void (*write_error_str)(VALUE mesg);
1318     VALUE (*io_write)(VALUE io, VALUE str);
1319     VALUE (*io_flush)(VALUE io);
1320     VALUE (*io_puts)(int argc, const VALUE *argv, VALUE out);
1321
1322     /* IO (Ractor) */
1323     VALUE (*debug_output_stdout)(void);
1324     VALUE (*debug_output_stderr)(void);
1325
1326     /* Encoding */
1327     int (*is_usascii_enc)(rb_encoding *enc);
1328     int (*enc_isalnum)(OnigCodePoint c, rb_encoding *enc);
1329     int (*enc_precise_mbclen)(const char *p, const char *e, rb_encoding *enc);
1330     int (*mbclen_charfound_p)(int len);
1331     int (*mbclen_charfound_len)(int len);
1332     const char *(*enc_name)(rb_encoding *enc);
1333     char *(*enc_prev_char)(const char *s, const char *p, const char *e, rb_encoding *enc);
1334     rb_encoding* (*enc_get)(VALUE obj);
1335     int (*enc_asciicompat)(rb_encoding *enc);
1336     rb_encoding *(*utf8_encoding)(void);
1337     VALUE (*enc_associate)(VALUE obj, rb_encoding *enc);
1338     rb_encoding *(*ascii8bit_encoding)(void);
1339     int (*enc_codelen)(int c, rb_encoding *enc);
1340     int (*enc_mbcput)(unsigned int c, void *buf, rb_encoding *enc);
1341     int (*enc_mbclen)(const char *p, const char *e, rb_encoding *enc);
1342     int (*enc_find_index)(const char *name);
1343     rb_encoding *(*enc_from_index)(int idx);
1344     int (*enc_isspace)(OnigCodePoint c, rb_encoding *enc);
1345     rb_encoding *(*usascii_encoding)(void);
1346     int enc_coderange_broken;
1347     int (*enc_mbminlen)(rb_encoding *enc);
1348     bool (*enc_isascii)(OnigCodePoint c, rb_encoding *enc);
1349     OnigCodePoint (*enc_mbc_to_codepoint)(const char *p, const char *e, rb_encoding *enc);
1350
1351     /* Compile */
1352     // int rb_local_defined(ID id, const rb_iseq_t *iseq);
1353     int (*local_defined)(ID, const void*);
1354     // int rb_dvar_defined(ID id, const rb_iseq_t *iseq);
1355     int (*dvar_defined)(ID, const void*);
1356
1357     /* Error (Exception) */
1358     RBIMPL_ATTR_FORMAT(RBIMPL_PRINTF_FORMAT, 6, 0)
1359     VALUE (*syntax_error_append)(VALUE, VALUE, int, int, rb_encoding*, const char*, va_list);
1360     RBIMPL_ATTR_FORMAT(RBIMPL_PRINTF_FORMAT, 2, 3)
1361     void (*raise)(VALUE exc, const char *fmt, ...);
1362     VALUE (*syntax_error_new)(void);
1363
1364     /* Eval */
1365     VALUE (*errinfo)(void);
1366     void (*set_errinfo)(VALUE err);
1367     void (*exc_raise)(VALUE mesg);
1368     VALUE (*make_exception)(int argc, const VALUE *argv);
1369
1370     /* GC */
1371     void (*sized_xfree)(void *x, size_t size);
1372     void *(*sized_realloc_n)(void *ptr, size_t new_count, size_t element_size, size_t old_count);
1373     void (*gc_guard)(VALUE);
1374     void (*gc_mark)(VALUE);
1375
1376     /* Re */
1377     VALUE (*reg_compile)(VALUE str, int options, const char *sourcefile, int sourceline);
1378     VALUE (*reg_check_preprocess)(VALUE str);
1379     int (*memcicmp)(const void *x, const void *y, long len);
1380
1381     /* Error */
1382     void (*compile_warn)(const char *file, int line, const char *fmt, ...) RUBYPARSER_ATTRIBUTE_FORMAT(3, 4);
1383     void (*compile_warning)(const char *file, int line, const char *fmt, ...) RUBYPARSER_ATTRIBUTE_FORMAT(3, 4);
1384     void (*bug)(const char *fmt, ...) RUBYPARSER_ATTRIBUTE_FORMAT(1, 2);
1385     void (*fatal)(const char *fmt, ...) RUBYPARSER_ATTRIBUTE_FORMAT(1, 2);
1386     VALUE (*verbose)(void);
1387     int *(*errno_ptr)(void);
1388
1389     /* VM */
1390     VALUE (*make_backtrace)(void);
1391
1392     /* Util */
1393     unsigned long (*scan_hex)(const char *start, size_t len, size_t *retlen);
1394     unsigned long (*scan_oct)(const char *start, size_t len, size_t *retlen);
1395     unsigned long (*scan_digits)(const char *str, ssize_t len, int base, size_t *retlen, int *overflow);
1396     double (*strtod)(const char *s00, char **se);
1397
1398     /* Misc */
1399     int (*rtest)(VALUE obj);
1400     int (*nil_p)(VALUE obj);
1401     VALUE qnil;
1402     VALUE qfalse;
1403     VALUE (*eArgError)(void);
1404     int (*long2int)(long);
1405
1406     /* For Ripper */
1407     int enc_coderange_7bit;
1408     int enc_coderange_unknown;
1409     VALUE (*static_id2sym)(ID id);
1410     long (*str_coderange_scan_restartable)(const char *s, const char *e, rb_encoding *enc, int *cr);
1411 } rb_parser_config_t;
1412
1413 #undef rb_encoding
1414 #undef OnigCodePoint
1415 #endif /* UNIVERSAL_PARSER */
1416
1417 RUBY_SYMBOL_EXPORT_BEGIN
1418 void rb_ruby_parser_free(void *ptr);
1419
1420 #ifdef UNIVERSAL_PARSER
1421 rb_parser_t *rb_ruby_parser_allocate(const rb_parser_config_t *config);
1422 rb_parser_t *rb_ruby_parser_new(const rb_parser_config_t *config);
1423 #endif
1424
1425 long rb_parser_string_length(rb_parser_string_t *str);
1426 char *rb_parser_string_pointer(rb_parser_string_t *str);
1427
1428 RUBY_SYMBOL_EXPORT_END
1429
1430 #endif /* RUBY_RUBYPARSER_H */