// Copyright 2023 xensik. All rights reserved. // // Use of this source code is governed by a GNU GPLv3 license // that can be found in the LICENSE file. #pragma once namespace xsk::gsc { struct node { using ptr = std::unique_ptr; enum type { null, expr_true, expr_false, expr_integer, expr_float, expr_vector, expr_string, expr_istring, expr_path, expr_identifier, expr_animtree, expr_animation, expr_level, expr_anim, expr_self, expr_game, expr_undefined, expr_empty_array, expr_thisthread, expr_paren, expr_size, expr_field, expr_array, expr_tuple, expr_reference, expr_istrue, expr_isdefined, expr_arguments, expr_parameters, expr_add_array, expr_pointer, expr_function, expr_method, expr_call, expr_complement, expr_negate, expr_not, expr_add, expr_sub, expr_mul, expr_div, expr_mod, expr_shift_left, expr_shift_right, expr_bitwise_or, expr_bitwise_and, expr_bitwise_exor, expr_equality, expr_inequality, expr_less_equal, expr_greater_equal, expr_less, expr_greater, expr_or, expr_and, expr_ternary, expr_increment, expr_decrement, expr_assign_equal, expr_assign_add, expr_assign_sub, expr_assign_mul, expr_assign_div, expr_assign_mod, expr_assign_shift_left, expr_assign_shift_right, expr_assign_bitwise_or, expr_assign_bitwise_and, expr_assign_bitwise_exor, stmt_list, stmt_comp, stmt_dev, stmt_expr, stmt_call, stmt_assign, stmt_endon, stmt_notify, stmt_wait, stmt_waittill, stmt_waittillmatch, stmt_waittillframeend, stmt_waitframe, stmt_if, stmt_ifelse, stmt_while, stmt_dowhile, stmt_for, stmt_foreach, stmt_switch, stmt_case, stmt_default, stmt_break, stmt_continue, stmt_return, stmt_breakpoint, stmt_prof_begin, stmt_prof_end, stmt_assert, stmt_assertex, stmt_assertmsg, decl_function, decl_constant, decl_usingtree, decl_dev_begin, decl_dev_end, include, program, asm_jmp, asm_jmp_back, asm_jmp_cond, asm_jmp_true, asm_jmp_false, asm_switch, asm_endswitch, asm_prescriptcall, asm_voidcodepos, asm_create, asm_access, asm_remove, asm_clear, }; public: node() : kind_(type::null) {} node(location const& loc) : kind_(type::null), loc_(loc) {} node(type t) : kind_(t) {} node(type t, location const& loc) : kind_(t), loc_(loc) {} virtual ~node() = default; friend bool operator==(node const& n, type t); friend bool operator==(node const& lhs, node const& rhs); auto kind() const -> type { return kind_; } auto loc() const -> location const& { return loc_; } auto label() const -> std::string { return loc_.label(); } auto is_special_stmt() -> bool; auto is_special_stmt_dev() -> bool; auto is_special_stmt_noif() -> bool; auto is_special_stmt_dev_noif() -> bool; auto is_binary() -> bool; auto precedence() -> u8; private: type kind_; location loc_; }; struct expr_true; struct expr_false; struct expr_integer; struct expr_float; struct expr_vector; struct expr_string; struct expr_istring; struct expr_path; struct expr_identifier; struct expr_animtree; struct expr_animation; struct expr_level; struct expr_anim; struct expr_self; struct expr_game; struct expr_undefined; struct expr_empty_array; struct expr_thisthread; struct expr_paren; struct expr_size; struct expr_field; struct expr_array; struct expr_tuple; struct expr_reference; struct expr_istrue; struct expr_isdefined; struct expr_arguments; struct expr_parameters; struct expr_add_array; struct expr_pointer; struct expr_function; struct expr_method; struct expr_call; struct expr_complement; struct expr_negate; struct expr_not; struct expr_binary; struct expr_add; struct expr_sub; struct expr_mul; struct expr_div; struct expr_mod; struct expr_shift_left; struct expr_shift_right; struct expr_bitwise_or; struct expr_bitwise_and; struct expr_bitwise_exor; struct expr_equality; struct expr_inequality; struct expr_less_equal; struct expr_greater_equal; struct expr_less; struct expr_greater; struct expr_or; struct expr_and; struct expr_ternary; struct expr_increment; struct expr_decrement; struct expr_assign; struct expr_assign_equal; struct expr_assign_add; struct expr_assign_sub; struct expr_assign_mul; struct expr_assign_div; struct expr_assign_mod; struct expr_assign_shift_left; struct expr_assign_shift_right; struct expr_assign_bitwise_or; struct expr_assign_bitwise_and; struct expr_assign_bitwise_exor; struct stmt_list; struct stmt_comp; struct stmt_dev; struct stmt_expr; struct stmt_call; struct stmt_assign; struct stmt_endon; struct stmt_notify; struct stmt_wait; struct stmt_waittill; struct stmt_waittillmatch; struct stmt_waittillframeend; struct stmt_waitframe; struct stmt_if; struct stmt_ifelse; struct stmt_while; struct stmt_dowhile; struct stmt_for; struct stmt_foreach; struct stmt_switch; struct stmt_case; struct stmt_default; struct stmt_break; struct stmt_continue; struct stmt_return; struct stmt_breakpoint; struct stmt_prof_begin; struct stmt_prof_end; struct stmt_assert; struct stmt_assertex; struct stmt_assertmsg; struct decl_function; struct decl_constant; struct decl_usingtree; struct decl_dev_begin; struct decl_dev_end; struct include; struct program; struct asm_jmp; struct asm_jmp_back; struct asm_jmp_cond; struct asm_jmp_false; struct asm_jmp_true; struct asm_switch; struct asm_endswitch; struct asm_prescriptcall; struct asm_voidcodepos; struct asm_create; struct asm_access; struct asm_remove; struct asm_clear; union call { enum class type { local, far, builtin }; enum class mode { normal, thread, childthread, builtin }; std::unique_ptr as_node; std::unique_ptr as_pointer; std::unique_ptr as_function; call(); call(std::unique_ptr value); call(call&& value); call(call const&) = delete; call& operator=(call const&) = delete; ~call(); friend auto operator==(call const& lhs, node::type rhs) -> bool; auto loc() const -> location; auto kind() const -> node::type; auto label() const -> std::string; }; union expr { std::unique_ptr as_node; std::unique_ptr as_true; std::unique_ptr as_false; std::unique_ptr as_integer; std::unique_ptr as_float; std::unique_ptr as_vector; std::unique_ptr as_string; std::unique_ptr as_istring; std::unique_ptr as_path; std::unique_ptr as_identifier; std::unique_ptr as_animtree; std::unique_ptr as_animation; std::unique_ptr as_level; std::unique_ptr as_anim; std::unique_ptr as_self; std::unique_ptr as_game; std::unique_ptr as_undefined; std::unique_ptr as_empty_array; std::unique_ptr as_thisthread; std::unique_ptr as_paren; std::unique_ptr as_size; std::unique_ptr as_field; std::unique_ptr as_array; std::unique_ptr as_tuple; std::unique_ptr as_reference; std::unique_ptr as_istrue; std::unique_ptr as_isdefined; std::unique_ptr as_arguments; std::unique_ptr as_parameters; std::unique_ptr as_add_array; std::unique_ptr as_pointer; std::unique_ptr as_function; std::unique_ptr as_method; std::unique_ptr as_call; std::unique_ptr as_complement; std::unique_ptr as_negate; std::unique_ptr as_not; std::unique_ptr as_binary; std::unique_ptr as_add; std::unique_ptr as_sub; std::unique_ptr as_mul; std::unique_ptr as_div; std::unique_ptr as_mod; std::unique_ptr as_shift_left; std::unique_ptr as_shift_right; std::unique_ptr as_bitwise_or; std::unique_ptr as_bitwise_and; std::unique_ptr as_bitwise_exor; std::unique_ptr as_equality; std::unique_ptr as_inequality; std::unique_ptr as_less_equal; std::unique_ptr as_greater_equal; std::unique_ptr as_less; std::unique_ptr as_greater; std::unique_ptr as_or; std::unique_ptr as_and; std::unique_ptr as_ternary; std::unique_ptr as_increment; std::unique_ptr as_decrement; std::unique_ptr as_assign; std::unique_ptr as_assign_equal; std::unique_ptr as_assign_add; std::unique_ptr as_assign_sub; std::unique_ptr as_assign_mul; std::unique_ptr as_assign_div; std::unique_ptr as_assign_mod; std::unique_ptr as_assign_shift_left; std::unique_ptr as_assign_shift_right; std::unique_ptr as_assign_bw_or; std::unique_ptr as_assign_bw_and; std::unique_ptr as_assign_bw_exor; std::unique_ptr as_asm_create; std::unique_ptr as_asm_access; expr(); expr(std::unique_ptr value); expr(expr&& value); expr& operator=(expr&& value); expr(expr const&) = delete; expr& operator=(expr const&) = delete; ~expr(); friend auto operator!=(expr const& lhs, node::type rhs) -> bool; friend auto operator==(expr const& lhs, node::type rhs) -> bool; friend auto operator==(expr const& lhs, expr const& rhs) -> bool; auto loc() const -> location; auto kind() const -> node::type; auto label() const -> std::string; }; union stmt { std::unique_ptr as_node; std::unique_ptr as_list; std::unique_ptr as_comp; std::unique_ptr as_dev; std::unique_ptr as_expr; std::unique_ptr as_call; std::unique_ptr as_assign; std::unique_ptr as_endon; std::unique_ptr as_notify; std::unique_ptr as_wait; std::unique_ptr as_waittill; std::unique_ptr as_waittillmatch; std::unique_ptr as_waittillframeend; std::unique_ptr as_waitframe; std::unique_ptr as_if; std::unique_ptr as_ifelse; std::unique_ptr as_while; std::unique_ptr as_dowhile; std::unique_ptr as_for; std::unique_ptr as_foreach; std::unique_ptr as_switch; std::unique_ptr as_case; std::unique_ptr as_default; std::unique_ptr as_break; std::unique_ptr as_continue; std::unique_ptr as_return; std::unique_ptr as_breakpoint; std::unique_ptr as_prof_begin; std::unique_ptr as_prof_end; std::unique_ptr as_assert; std::unique_ptr as_assertex; std::unique_ptr as_assertmsg; std::unique_ptr as_cond; std::unique_ptr as_jump; std::unique_ptr as_jump_back; std::unique_ptr as_asm_switch; std::unique_ptr as_asm_endswitch; std::unique_ptr as_asm_create; std::unique_ptr as_asm_access; std::unique_ptr as_asm_remove; std::unique_ptr as_asm_clear; stmt(); stmt(std::unique_ptr value); stmt(stmt&& value); stmt& operator=(stmt&& value); stmt(stmt const&) = delete; stmt& operator=(stmt const&) = delete; ~stmt(); friend auto operator==(stmt const& lhs, node::type rhs) -> bool; auto loc() const -> location; auto kind() const -> node::type; auto label() const -> std::string; }; union decl { std::unique_ptr as_node; std::unique_ptr as_dev_begin; std::unique_ptr as_dev_end; std::unique_ptr as_usingtree; std::unique_ptr as_constant; std::unique_ptr as_function; decl(); decl(std::unique_ptr value); decl(decl&& value); decl& operator=(decl&& value); decl(decl const&) = delete; decl& operator=(decl const&) = delete; ~decl(); friend auto operator==(decl const& lhs, node::type rhs) -> bool; auto loc() const -> location; auto kind() const -> node::type; auto label() const -> std::string; }; struct expr_true : public node { using ptr = std::unique_ptr; expr_true(location const& loc); friend auto operator==(expr_true const& lhs, expr_true const& rhs) -> bool; }; struct expr_false : public node { using ptr = std::unique_ptr; expr_false(location const& loc); friend auto operator==(expr_false const& lhs, expr_false const& rhs) -> bool; }; struct expr_integer : public node { using ptr = std::unique_ptr; std::string value; expr_integer(location const& loc, std::string const& value); friend auto operator==(expr_integer const& lhs, expr_integer const& rhs) -> bool; }; struct expr_float : public node { using ptr = std::unique_ptr; std::string value; expr_float(location const& loc, std::string const& value); friend auto operator==(expr_float const& lhs, expr_float const& rhs) -> bool; }; struct expr_vector : public node { using ptr = std::unique_ptr; expr x; expr y; expr z; expr_vector(location const& loc, expr x, expr y, expr z); friend auto operator==(expr_vector const& lhs, expr_vector const& rhs) -> bool; }; struct expr_string : public node { using ptr = std::unique_ptr; std::string value; expr_string(location const& loc, std::string const& value); friend auto operator==(expr_string const& lhs, expr_string const& rhs) -> bool; }; struct expr_istring : public node { using ptr = std::unique_ptr; std::string value; expr_istring(location const& loc, std::string const& value); friend auto operator==(expr_istring const& lhs, expr_istring const& rhs) -> bool; }; struct expr_path : public node { using ptr = std::unique_ptr; std::string value; expr_path(location const& loc); expr_path(location const& loc, std::string const& value); friend auto operator==(expr_path const& lhs, expr_path const& rhs) -> bool; }; struct expr_identifier : public node { using ptr = std::unique_ptr; std::string value; expr_identifier(location const& loc, std::string const& value); friend auto operator==(expr_identifier const& lhs, expr_identifier const& rhs) -> bool; }; struct expr_animtree : public node { using ptr = std::unique_ptr; expr_animtree(location const& loc); friend auto operator==(expr_animtree const& lhs, expr_animtree const& rhs) -> bool; }; struct expr_animation : public node { using ptr = std::unique_ptr; std::string value; expr_animation(location const& loc, std::string const& value); friend auto operator==(expr_animation const& lhs, expr_animation const& rhs) -> bool; }; struct expr_level : public node { using ptr = std::unique_ptr; expr_level(location const& loc); friend auto operator==(expr_level const& lhs, expr_level const& rhs) -> bool; }; struct expr_anim : public node { using ptr = std::unique_ptr; expr_anim(location const& loc); friend auto operator==(expr_anim const& lhs, expr_anim const& rhs) -> bool; }; struct expr_self : public node { using ptr = std::unique_ptr; expr_self(location const& loc); friend auto operator==(expr_self const& lhs, expr_self const& rhs) -> bool; }; struct expr_game : public node { using ptr = std::unique_ptr; expr_game(location const& loc); friend auto operator==(expr_game const& lhs, expr_game const& rhs) -> bool; }; struct expr_undefined : public node { using ptr = std::unique_ptr; expr_undefined(location const& loc); friend auto operator==(expr_undefined const& lhs, expr_undefined const& rhs) -> bool; }; struct expr_empty_array : public node { using ptr = std::unique_ptr; expr_empty_array(location const& loc); friend auto operator==(expr_empty_array const& lhs, expr_empty_array const& rhs) -> bool; }; struct expr_thisthread : public node { using ptr = std::unique_ptr; expr_thisthread(location const& loc); friend auto operator==(expr_thisthread const& lhs, expr_thisthread const& rhs) -> bool; }; struct expr_paren : public node { using ptr = std::unique_ptr; expr value; expr_paren(location const& loc, expr value); friend auto operator==(expr_paren const& lhs, expr_paren const& rhs) -> bool; }; struct expr_size : public node { using ptr = std::unique_ptr; expr obj; expr_size(location const& loc, expr obj); friend auto operator==(expr_size const& lhs, expr_size const& rhs) -> bool; }; struct expr_field : public node { using ptr = std::unique_ptr; expr obj; expr_identifier::ptr field; expr_field(location const& loc, expr obj, expr_identifier::ptr field); friend auto operator==(expr_field const& lhs, expr_field const& rhs) -> bool; }; struct expr_array : public node { using ptr = std::unique_ptr; expr obj; expr key; expr_array(location const& loc, expr obj, expr key); friend auto operator==(expr_array const& lhs, expr_array const& rhs) -> bool; }; struct expr_tuple : public node { using ptr = std::unique_ptr; std::vector list; expr temp; expr_tuple(location const& loc); }; struct expr_reference : public node { using ptr = std::unique_ptr; expr_path::ptr path; expr_identifier::ptr name; expr_reference(location const& loc, expr_path::ptr path, expr_identifier::ptr name); }; struct expr_istrue : public node { using ptr = std::unique_ptr; expr value; expr_istrue(location const& loc, expr value); }; struct expr_isdefined : public node { using ptr = std::unique_ptr; expr value; expr_isdefined(location const& loc, expr value); }; struct expr_arguments : public node { using ptr = std::unique_ptr; std::vector list; expr_arguments(location const& loc); }; struct expr_parameters : public node { using ptr = std::unique_ptr; std::vector list; expr_parameters(location const& loc); }; struct expr_add_array : public node { using ptr = std::unique_ptr; expr_arguments::ptr args; expr_add_array(location const& loc, expr_arguments::ptr args); }; struct expr_pointer : public node { using ptr = std::unique_ptr; expr func; expr_arguments::ptr args; call::mode mode; expr_pointer(location const& loc, expr func, expr_arguments::ptr args, call::mode mode); }; struct expr_function : public node { using ptr = std::unique_ptr; expr_path::ptr path; expr_identifier::ptr name; expr_arguments::ptr args; call::mode mode; expr_function(location const& loc, expr_path::ptr path, expr_identifier::ptr name, expr_arguments::ptr args, call::mode mode); }; struct expr_method : public node { using ptr = std::unique_ptr; expr obj; call value; expr_method(location const& loc, expr obj, call value); }; struct expr_call : public node { using ptr = std::unique_ptr; call value; expr_call(location const& loc, call value); }; struct expr_complement : public node { using ptr = std::unique_ptr; expr rvalue; expr_complement(location const& loc, expr rvalue); }; struct expr_negate : public node { using ptr = std::unique_ptr; expr rvalue; expr_negate(location const& loc, expr rvalue); }; struct expr_not : public node { using ptr = std::unique_ptr; expr rvalue; expr_not(location const& loc, expr rvalue); }; struct expr_binary : public node { using ptr = std::unique_ptr; expr lvalue; expr rvalue; expr_binary(type t, location const& loc, expr lvalue, expr rvalue); }; struct expr_add : public expr_binary { using ptr = std::unique_ptr; expr_add(location const& loc, expr lvalue, expr rvalue); }; struct expr_sub : public expr_binary { using ptr = std::unique_ptr; expr_sub(location const& loc, expr lvalue, expr rvalue); }; struct expr_mul : public expr_binary { using ptr = std::unique_ptr; expr_mul(location const& loc, expr lvalue, expr rvalue); }; struct expr_div : public expr_binary { using ptr = std::unique_ptr; expr_div(location const& loc, expr lvalue, expr rvalue); }; struct expr_mod : public expr_binary { using ptr = std::unique_ptr; expr_mod(location const& loc, expr lvalue, expr rvalue); }; struct expr_shift_left : public expr_binary { using ptr = std::unique_ptr; expr_shift_left(location const& loc, expr lvalue, expr rvalue); }; struct expr_shift_right : public expr_binary { using ptr = std::unique_ptr; expr_shift_right(location const& loc, expr lvalue, expr rvalue); }; struct expr_bitwise_or : public expr_binary { using ptr = std::unique_ptr; expr_bitwise_or(location const& loc, expr lvalue, expr rvalue); }; struct expr_bitwise_and : public expr_binary { using ptr = std::unique_ptr; expr_bitwise_and(location const& loc, expr lvalue, expr rvalue); }; struct expr_bitwise_exor : public expr_binary { using ptr = std::unique_ptr; expr_bitwise_exor(location const& loc, expr lvalue, expr rvalue); }; struct expr_equality : public expr_binary { using ptr = std::unique_ptr; expr_equality(location const& loc, expr lvalue, expr rvalue); }; struct expr_inequality : public expr_binary { using ptr = std::unique_ptr; expr_inequality(location const& loc, expr lvalue, expr rvalue); }; struct expr_less_equal : public expr_binary { using ptr = std::unique_ptr; expr_less_equal(location const& loc, expr lvalue, expr rvalue); }; struct expr_greater_equal : public expr_binary { using ptr = std::unique_ptr; expr_greater_equal(location const& loc, expr lvalue, expr rvalue); }; struct expr_less : public expr_binary { using ptr = std::unique_ptr; expr_less(location const& loc, expr lvalue, expr rvalue); }; struct expr_greater : public expr_binary { using ptr = std::unique_ptr; expr_greater(location const& loc, expr lvalue, expr rvalue); }; struct expr_or : public expr_binary { using ptr = std::unique_ptr; expr_or(location const& loc, expr lvalue, expr rvalue); }; struct expr_and : public expr_binary { using ptr = std::unique_ptr; expr_and(location const& loc, expr lvalue, expr rvalue); }; struct expr_ternary : public node { using ptr = std::unique_ptr; expr test; expr true_expr; expr false_expr; expr_ternary(location const& loc, expr test, expr true_expr, expr false_expr); }; struct expr_increment : node { using ptr = std::unique_ptr; expr lvalue; bool prefix; expr_increment(location const& loc, expr lvalue, bool prefix); }; struct expr_decrement : node { using ptr = std::unique_ptr; expr lvalue; bool prefix; expr_decrement(location const& loc, expr lvalue, bool prefix); }; struct expr_assign : public node { using ptr = std::unique_ptr; expr lvalue; expr rvalue; expr_assign(type t, location const& loc, expr lvalue, expr rvalue); }; struct expr_assign_equal : public expr_assign { using ptr = std::unique_ptr; expr_assign_equal(location const& loc, expr lvalue, expr rvalue); }; struct expr_assign_add : public expr_assign { using ptr = std::unique_ptr; expr_assign_add(location const& loc, expr lvalue, expr rvalue); }; struct expr_assign_sub : public expr_assign { using ptr = std::unique_ptr; expr_assign_sub(location const& loc, expr lvalue, expr rvalue); }; struct expr_assign_mul : public expr_assign { using ptr = std::unique_ptr; expr_assign_mul(location const& loc, expr lvalue, expr rvalue); }; struct expr_assign_div : public expr_assign { using ptr = std::unique_ptr; expr_assign_div(location const& loc, expr lvalue, expr rvalue); }; struct expr_assign_mod : public expr_assign { using ptr = std::unique_ptr; expr_assign_mod(location const& loc, expr lvalue, expr rvalue); }; struct expr_assign_shift_left : public expr_assign { using ptr = std::unique_ptr; expr_assign_shift_left(location const& loc, expr lvalue, expr rvalue); }; struct expr_assign_shift_right : public expr_assign { using ptr = std::unique_ptr; expr_assign_shift_right(location const& loc, expr lvalue, expr rvalue); }; struct expr_assign_bitwise_or : public expr_assign { using ptr = std::unique_ptr; expr_assign_bitwise_or(location const& loc, expr lvalue, expr rvalue); }; struct expr_assign_bitwise_and : public expr_assign { using ptr = std::unique_ptr; expr_assign_bitwise_and(location const& loc, expr lvalue, expr rvalue); }; struct expr_assign_bitwise_exor : public expr_assign { using ptr = std::unique_ptr; expr_assign_bitwise_exor(location const& loc, expr lvalue, expr rvalue); }; struct stmt_list : public node { using ptr = std::unique_ptr; std::vector list; stmt_list(location const& loc); }; struct stmt_comp : public node { using ptr = std::unique_ptr; stmt_list::ptr block; stmt_comp(location const& loc, stmt_list::ptr block); }; struct stmt_dev : public node { using ptr = std::unique_ptr; stmt_list::ptr block; stmt_dev(location const& loc, stmt_list::ptr block); }; struct stmt_expr : public node { using ptr = std::unique_ptr; expr value; stmt_expr(location const& loc, expr value); }; struct stmt_call : public node { using ptr = std::unique_ptr; expr value; stmt_call(location const& loc, expr value); }; struct stmt_assign : public node { using ptr = std::unique_ptr; expr value; stmt_assign(location const& loc, expr value); }; struct stmt_endon : public node { using ptr = std::unique_ptr; expr obj; expr event; stmt_endon(location const& loc, expr obj, expr event); }; struct stmt_notify : public node { using ptr = std::unique_ptr; expr obj; expr event; expr_arguments::ptr args; stmt_notify(location const& loc, expr obj, expr event, expr_arguments::ptr args); }; struct stmt_wait : public node { using ptr = std::unique_ptr; expr time; stmt_wait(location const& loc, expr time); }; struct stmt_waittill : public node { using ptr = std::unique_ptr; expr obj; expr event; expr_arguments::ptr args; stmt_waittill(location const& loc, expr obj, expr event, expr_arguments::ptr args); }; struct stmt_waittillmatch : public node { using ptr = std::unique_ptr; expr obj; expr event; expr_arguments::ptr args; stmt_waittillmatch(location const& loc, expr obj, expr expr, expr_arguments::ptr args); }; struct stmt_waittillframeend : public node { using ptr = std::unique_ptr; stmt_waittillframeend(location const& loc); }; struct stmt_waitframe : public node { using ptr = std::unique_ptr; stmt_waitframe(location const& loc); }; struct stmt_if : public node { using ptr = std::unique_ptr; expr test; stmt body; stmt_if(location const& loc, expr test, stmt body); }; struct stmt_ifelse : public node { using ptr = std::unique_ptr; expr test; stmt stmt_if; stmt stmt_else; stmt_ifelse(location const& loc, expr test, stmt stmt_if, stmt stmt_else); }; struct stmt_while : public node { using ptr = std::unique_ptr; expr test; stmt body; stmt_while(location const& loc, expr test, stmt body); }; struct stmt_dowhile : public node { using ptr = std::unique_ptr; expr test; stmt body; stmt_dowhile(location const& loc, expr test, stmt body); }; struct stmt_for : public node { using ptr = std::unique_ptr; stmt init; expr test; stmt iter; stmt body; stmt_for(location const& loc, stmt init, expr test, stmt iter, stmt body); }; struct stmt_foreach : public node { using ptr = std::unique_ptr; expr container; expr value; expr index; expr array; expr key; stmt body; bool use_key; stmt_foreach(location const& loc, expr container, expr value, expr index, expr array, expr key, stmt body, bool use_key); }; struct stmt_switch : public node { using ptr = std::unique_ptr; expr test; stmt_comp::ptr body; stmt_switch(location const& loc, expr test, stmt_comp::ptr body); }; struct stmt_case : public node { using ptr = std::unique_ptr; expr value; stmt_list::ptr body; stmt_case(location const& loc, expr value); stmt_case(location const& loc, expr value, stmt_list::ptr body); }; struct stmt_default : public node { using ptr = std::unique_ptr; stmt_list::ptr body; stmt_default(location const& loc); stmt_default(location const& loc, stmt_list::ptr body); }; struct stmt_break : public node { using ptr = std::unique_ptr; stmt_break(location const& loc); }; struct stmt_continue : public node { using ptr = std::unique_ptr; stmt_continue(location const& loc); }; struct stmt_return : public node { using ptr = std::unique_ptr; expr value; stmt_return(location const& loc, expr value); }; struct stmt_breakpoint : public node { using ptr = std::unique_ptr; stmt_breakpoint(location const& loc); }; struct stmt_prof_begin : public node { using ptr = std::unique_ptr; expr_arguments::ptr args; stmt_prof_begin(location const& loc, expr_arguments::ptr args); }; struct stmt_prof_end : public node { using ptr = std::unique_ptr; expr_arguments::ptr args; stmt_prof_end(location const& loc, expr_arguments::ptr args); }; struct stmt_assert : public node { using ptr = std::unique_ptr; expr_arguments::ptr args; stmt_assert(location const& loc, expr_arguments::ptr args); }; struct stmt_assertex : public node { using ptr = std::unique_ptr; expr_arguments::ptr args; stmt_assertex(location const& loc, expr_arguments::ptr args); }; struct stmt_assertmsg : public node { using ptr = std::unique_ptr; expr_arguments::ptr args; stmt_assertmsg(location const& loc, expr_arguments::ptr args); }; struct decl_function : public node { using ptr = std::unique_ptr; expr_identifier::ptr name; expr_parameters::ptr params; stmt_comp::ptr body; decl_function(location const& loc, expr_identifier::ptr name, expr_parameters::ptr params, stmt_comp::ptr body); }; struct decl_constant : public node { using ptr = std::unique_ptr; expr_identifier::ptr name; expr value; decl_constant(location const& loc, expr_identifier::ptr name, expr value); }; struct decl_usingtree : public node { using ptr = std::unique_ptr; expr_string::ptr name; decl_usingtree(location const& loc, expr_string::ptr name); }; struct decl_dev_begin : public node { using ptr = std::unique_ptr; decl_dev_begin(location const& loc); }; struct decl_dev_end : public node { using ptr = std::unique_ptr; decl_dev_end(location const& loc); }; struct include : public node { using ptr = std::unique_ptr; expr_path::ptr path; include(location const& loc, expr_path::ptr path); }; struct program : public node { using ptr = std::unique_ptr; std::vector includes; std::vector declarations; program(); program(location const& loc); }; struct asm_jmp : public node { using ptr = std::unique_ptr; std::string value; asm_jmp(location const& loc, std::string const& value); }; struct asm_jmp_back : public node { using ptr = std::unique_ptr; std::string value; asm_jmp_back(location const& loc, std::string const& value); }; struct asm_jmp_cond : public node { using ptr = std::unique_ptr; expr test; std::string value; asm_jmp_cond(location const& loc, expr test, std::string const& value); }; struct asm_jmp_true : public node { using ptr = std::unique_ptr; expr test; std::string value; asm_jmp_true(location const& loc, expr test, std::string const& value); }; struct asm_jmp_false : public node { using ptr = std::unique_ptr; expr test; std::string value; asm_jmp_false(location const& loc, expr test, std::string const& value); }; struct asm_switch : public node { using ptr = std::unique_ptr; expr test; std::string value; asm_switch(location const& loc, expr test, std::string const& value); }; struct asm_endswitch : public node { using ptr = std::unique_ptr; std::vector data; asm_endswitch(location const& loc, std::vector data); }; struct asm_prescriptcall : public node { using ptr = std::unique_ptr; asm_prescriptcall(location const& loc); }; struct asm_voidcodepos : public node { using ptr = std::unique_ptr; asm_voidcodepos(location const& loc); }; struct asm_create : public node { using ptr = std::unique_ptr; std::string index; std::vector vars; asm_create(location const& loc, std::string const& index); }; struct asm_access : public node { using ptr = std::unique_ptr; std::string index; asm_access(location const& loc, std::string const& index); }; struct asm_remove : public node { using ptr = std::unique_ptr; std::string index; asm_remove(location const& loc, std::string const& index); }; struct asm_clear : public node { using ptr = std::unique_ptr; std::string index; asm_clear(location const& loc, std::string const& index); }; #define XSK_GSC_MAKE_GENERIC(node_type) \ template \ inline auto make_ ## node_type(Args&&... args) -> std::unique_ptr \ { \ return std::unique_ptr(new node_type(std::forward(args)...)); \ } XSK_GSC_MAKE_GENERIC(node) XSK_GSC_MAKE_GENERIC(expr_true) XSK_GSC_MAKE_GENERIC(expr_false) XSK_GSC_MAKE_GENERIC(expr_integer) XSK_GSC_MAKE_GENERIC(expr_float) XSK_GSC_MAKE_GENERIC(expr_vector) XSK_GSC_MAKE_GENERIC(expr_string) XSK_GSC_MAKE_GENERIC(expr_istring) XSK_GSC_MAKE_GENERIC(expr_path) XSK_GSC_MAKE_GENERIC(expr_identifier) XSK_GSC_MAKE_GENERIC(expr_animtree) XSK_GSC_MAKE_GENERIC(expr_animation) XSK_GSC_MAKE_GENERIC(expr_level) XSK_GSC_MAKE_GENERIC(expr_anim) XSK_GSC_MAKE_GENERIC(expr_self) XSK_GSC_MAKE_GENERIC(expr_game) XSK_GSC_MAKE_GENERIC(expr_undefined) XSK_GSC_MAKE_GENERIC(expr_empty_array) XSK_GSC_MAKE_GENERIC(expr_thisthread) XSK_GSC_MAKE_GENERIC(expr_paren) XSK_GSC_MAKE_GENERIC(expr_size) XSK_GSC_MAKE_GENERIC(expr_field) XSK_GSC_MAKE_GENERIC(expr_array) XSK_GSC_MAKE_GENERIC(expr_tuple) XSK_GSC_MAKE_GENERIC(expr_reference) XSK_GSC_MAKE_GENERIC(expr_istrue) XSK_GSC_MAKE_GENERIC(expr_isdefined) XSK_GSC_MAKE_GENERIC(expr_arguments) XSK_GSC_MAKE_GENERIC(expr_parameters) XSK_GSC_MAKE_GENERIC(expr_add_array) XSK_GSC_MAKE_GENERIC(expr_pointer) XSK_GSC_MAKE_GENERIC(expr_function) XSK_GSC_MAKE_GENERIC(expr_method) XSK_GSC_MAKE_GENERIC(expr_call) XSK_GSC_MAKE_GENERIC(expr_complement) XSK_GSC_MAKE_GENERIC(expr_negate) XSK_GSC_MAKE_GENERIC(expr_not) XSK_GSC_MAKE_GENERIC(expr_add) XSK_GSC_MAKE_GENERIC(expr_sub) XSK_GSC_MAKE_GENERIC(expr_mul) XSK_GSC_MAKE_GENERIC(expr_div) XSK_GSC_MAKE_GENERIC(expr_mod) XSK_GSC_MAKE_GENERIC(expr_shift_left) XSK_GSC_MAKE_GENERIC(expr_shift_right) XSK_GSC_MAKE_GENERIC(expr_bitwise_or) XSK_GSC_MAKE_GENERIC(expr_bitwise_and) XSK_GSC_MAKE_GENERIC(expr_bitwise_exor) XSK_GSC_MAKE_GENERIC(expr_equality) XSK_GSC_MAKE_GENERIC(expr_inequality) XSK_GSC_MAKE_GENERIC(expr_less_equal) XSK_GSC_MAKE_GENERIC(expr_greater_equal) XSK_GSC_MAKE_GENERIC(expr_less) XSK_GSC_MAKE_GENERIC(expr_greater) XSK_GSC_MAKE_GENERIC(expr_or) XSK_GSC_MAKE_GENERIC(expr_and) XSK_GSC_MAKE_GENERIC(expr_ternary) XSK_GSC_MAKE_GENERIC(expr_increment) XSK_GSC_MAKE_GENERIC(expr_decrement) XSK_GSC_MAKE_GENERIC(expr_assign_equal) XSK_GSC_MAKE_GENERIC(expr_assign_add) XSK_GSC_MAKE_GENERIC(expr_assign_sub) XSK_GSC_MAKE_GENERIC(expr_assign_mul) XSK_GSC_MAKE_GENERIC(expr_assign_div) XSK_GSC_MAKE_GENERIC(expr_assign_mod) XSK_GSC_MAKE_GENERIC(expr_assign_shift_left) XSK_GSC_MAKE_GENERIC(expr_assign_shift_right) XSK_GSC_MAKE_GENERIC(expr_assign_bitwise_or) XSK_GSC_MAKE_GENERIC(expr_assign_bitwise_and) XSK_GSC_MAKE_GENERIC(expr_assign_bitwise_exor) XSK_GSC_MAKE_GENERIC(stmt_list) XSK_GSC_MAKE_GENERIC(stmt_comp) XSK_GSC_MAKE_GENERIC(stmt_dev) XSK_GSC_MAKE_GENERIC(stmt_expr) XSK_GSC_MAKE_GENERIC(stmt_call) XSK_GSC_MAKE_GENERIC(stmt_assign) XSK_GSC_MAKE_GENERIC(stmt_endon) XSK_GSC_MAKE_GENERIC(stmt_notify) XSK_GSC_MAKE_GENERIC(stmt_wait) XSK_GSC_MAKE_GENERIC(stmt_waittill) XSK_GSC_MAKE_GENERIC(stmt_waittillmatch) XSK_GSC_MAKE_GENERIC(stmt_waittillframeend) XSK_GSC_MAKE_GENERIC(stmt_waitframe) XSK_GSC_MAKE_GENERIC(stmt_if) XSK_GSC_MAKE_GENERIC(stmt_ifelse) XSK_GSC_MAKE_GENERIC(stmt_while) XSK_GSC_MAKE_GENERIC(stmt_dowhile) XSK_GSC_MAKE_GENERIC(stmt_for) XSK_GSC_MAKE_GENERIC(stmt_foreach) XSK_GSC_MAKE_GENERIC(stmt_switch) XSK_GSC_MAKE_GENERIC(stmt_case) XSK_GSC_MAKE_GENERIC(stmt_default) XSK_GSC_MAKE_GENERIC(stmt_break) XSK_GSC_MAKE_GENERIC(stmt_continue) XSK_GSC_MAKE_GENERIC(stmt_return) XSK_GSC_MAKE_GENERIC(stmt_breakpoint) XSK_GSC_MAKE_GENERIC(stmt_prof_begin) XSK_GSC_MAKE_GENERIC(stmt_prof_end) XSK_GSC_MAKE_GENERIC(stmt_assert) XSK_GSC_MAKE_GENERIC(stmt_assertex) XSK_GSC_MAKE_GENERIC(stmt_assertmsg) XSK_GSC_MAKE_GENERIC(decl_function) XSK_GSC_MAKE_GENERIC(decl_constant) XSK_GSC_MAKE_GENERIC(decl_usingtree) XSK_GSC_MAKE_GENERIC(decl_dev_begin) XSK_GSC_MAKE_GENERIC(decl_dev_end) XSK_GSC_MAKE_GENERIC(include) XSK_GSC_MAKE_GENERIC(program) XSK_GSC_MAKE_GENERIC(asm_jmp) XSK_GSC_MAKE_GENERIC(asm_jmp_back) XSK_GSC_MAKE_GENERIC(asm_jmp_cond) XSK_GSC_MAKE_GENERIC(asm_jmp_false) XSK_GSC_MAKE_GENERIC(asm_jmp_true) XSK_GSC_MAKE_GENERIC(asm_switch) XSK_GSC_MAKE_GENERIC(asm_endswitch) XSK_GSC_MAKE_GENERIC(asm_prescriptcall) XSK_GSC_MAKE_GENERIC(asm_voidcodepos) XSK_GSC_MAKE_GENERIC(asm_create) XSK_GSC_MAKE_GENERIC(asm_access) XSK_GSC_MAKE_GENERIC(asm_remove) XSK_GSC_MAKE_GENERIC(asm_clear) #undef XSK_GSC_MAKE_GENERIC } // namespace xsk::gsc::ast