type tok = Parse_info.ttype 'a wrap = 'a * toktype ident = string wraptype qualified_ident = ident listand struct_field = struct_field_kind * tag optionand tag = string wrapand expr_or_type = (expr, type_) Common.eitherand expr = | BasicLit of literal| CompositeLit of type_ * init list bracket| Id of ident * Ast_generic.resolved_name option ref| Selector of expr * tok * ident| Index of expr * index| Slice of expr * expr option * expr option * expr option| Call of call_expr| Cast of type_ * expr| Deref of tok * expr| Ref of tok * expr| Receive of tok * expr| Unary of Ast_generic.arithmetic_operator wrap * expr| Binary of expr * Ast_generic.arithmetic_operator wrap * expr| TypeAssert of expr * type_| TypeSwitchExpr of expr * tok| Ellipsis of tok| FuncLit of function_| ParenType of type_| Send of expr * tok * exprand index = exprand arguments = argument listand constant_expr = exprand stmt = | DeclStmts of decl list| Block of stmt list| Empty| SimpleStmt of simple| If of tok * simple option * expr * stmt * stmt option| Switch of tok * simple option * simple option * case_clause list| Select of tok * comm_clause list| For of tok * simple option * expr option * simple option * stmt| Range of tok * (expr list * tok) option * tok * expr * stmt| Return of tok * expr list option| Break of tok * ident option| Continue of tok * ident option| Goto of tok * ident| Fallthrough of tok| Label of ident * stmt| Go of tok * call_expr| Defer of tok * call_exprand case_kind = | CaseExprs of tok * expr_or_type list| CaseAssign of tok * expr_or_type list * tok * expr| CaseDefault of tokand comm_clause = case_clauseand simple = | ExprStmt of expr| Assign of expr list * tok * expr list| AssignOp of expr * Ast_generic.arithmetic_operator wrap * expr| IncDec of expr * Ast_generic.incr_decr wrap * Ast_generic.prefix_postfix| DShortVars of expr list * tok * expr list