define psi_assert_stmt_dump call psi_assert_stmt_dump(1, $arg0) echo \n end define psi_const_dump call psi_const_dump(1, $arg0) echo \n end define psi_const_type_dump call psi_const_type_dump(1, $arg0) echo \n end define psi_decl_abi_dump call psi_decl_abi_dump(1, $arg0) echo \n end define psi_decl_arg_dump call psi_decl_arg_dump(1, $arg0, 0) echo \n end define psi_decl_enum_dump call psi_decl_enum_dump(1, $arg0, 0) echo \n end define psi_decl_enum_item_dump call psi_decl_enum_item_dump(1, $arg0) echo \n end define psi_decl_dump call psi_decl_dump(1, $arg0) echo \n end define psi_decl_struct_dump call psi_decl_struct_dump(1, $arg0) echo \n end define psi_decl_type_dump call psi_decl_type_dump(1, $arg0, 0) echo \n end define psi_decl_type_dump_args_with_layout call psi_decl_type_dump_args_with_layout(1, $arg0, 0) echo \n end define psi_decl_union_dump call psi_decl_union_dump(1, $arg0) echo \n end define psi_decl_var_dump call psi_decl_var_dump(1, $arg0) echo \n end define psi_free_exp_dump call psi_free_exp_dump(1, $arg0) echo \n end define psi_free_stmt_dump call psi_free_stmt_dump(1, $arg0) echo \n end define psi_impl_arg_dump call psi_impl_arg_dump(1, $arg0) echo \n end define psi_impl_def_val_dump call psi_impl_def_val_dump(1, $arg0) echo \n end define psi_impl_func_dump call psi_impl_func_dump(1, $arg0) echo \n end define psi_impl_dump call psi_impl_dump(1, $arg0) echo \n end define psi_let_callback_dump call psi_let_callback_dump(1, $arg0, 0) echo \n end define psi_let_calloc_dump call psi_let_calloc_dump(1, $arg0) echo \n end define psi_let_exp_dump call psi_let_exp_dump(1, $arg0, 0) echo \n end define psi_let_func_dump call psi_let_func_dump(1, $arg0, 0) echo \n end define psi_let_stmt_dump call psi_let_stmt_dump(1, $arg0) echo \n end define psi_number_dump call psi_number_dump(1, $arg0) echo \n end define psi_num_exp_dump call psi_num_exp_dump(1, $arg0) echo \n end define psi_return_stmt_dump call psi_return_stmt_dump(1, $arg0) echo \n end define psi_set_exp_dump call psi_set_exp_dump(1, $arg0, 0, 0) echo \n end define psi_set_func_dump call psi_set_func_dump(1, $arg0, 0) echo \n end define psi_set_stmt_dump call psi_set_stmt_dump(1, $arg0) echo \n end define psi_token_dump call psi_token_dump(1, $arg0) end define psi_token_list_dump set $i = 0 while $i < $arg0->count call psi_token_dump(1, ((struct psi_token **)$arg0->list)[$i++]) end end define psi_plist_dump set $i = 0 while $i < $arg0->count set $arg = ((void **) $arg0->list)[$i++] $arg1 $arg end end define psi_decl_type_dump_all if $argc > 0 set $context = $arg0 else set $context = psi_globals.context end set $i = 0 set $c = psi_plist_count($context->types) while $i < $c set $type = *(struct psi_decl_type **) ($context->types->list[$i++]) psi_decl_type_dump $type echo end end