LCOV - code coverage report
Current view: top level - gcc/go/gofrontend - expressions.cc (source / functions) Hit Total Coverage
Test: gcc.info Lines: 8273 9900 83.6 %
Date: 2020-03-28 11:57:23 Functions: 538 671 80.2 %
Legend: Lines: hit not hit | Branches: + taken - not taken # not executed Branches: 0 0 -

           Branch data     Line data    Source code
       1                 :            : // expressions.cc -- Go frontend expression handling.
       2                 :            : 
       3                 :            : // Copyright 2009 The Go Authors. All rights reserved.
       4                 :            : // Use of this source code is governed by a BSD-style
       5                 :            : // license that can be found in the LICENSE file.
       6                 :            : 
       7                 :            : #include "go-system.h"
       8                 :            : 
       9                 :            : #include <algorithm>
      10                 :            : 
      11                 :            : #include "go-c.h"
      12                 :            : #include "gogo.h"
      13                 :            : #include "go-diagnostics.h"
      14                 :            : #include "go-encode-id.h"
      15                 :            : #include "types.h"
      16                 :            : #include "export.h"
      17                 :            : #include "import.h"
      18                 :            : #include "statements.h"
      19                 :            : #include "lex.h"
      20                 :            : #include "runtime.h"
      21                 :            : #include "backend.h"
      22                 :            : #include "expressions.h"
      23                 :            : #include "ast-dump.h"
      24                 :            : 
      25                 :            : // Class Expression.
      26                 :            : 
      27                 :   44101900 : Expression::Expression(Expression_classification classification,
      28                 :   44101900 :                        Location location)
      29                 :   44101900 :   : classification_(classification), location_(location)
      30                 :            : {
      31                 :   44101900 : }
      32                 :            : 
      33                 :      87257 : Expression::~Expression()
      34                 :            : {
      35                 :      87257 : }
      36                 :            : 
      37                 :            : // Traverse the expressions.
      38                 :            : 
      39                 :            : int
      40                 :  196187000 : Expression::traverse(Expression** pexpr, Traverse* traverse)
      41                 :            : {
      42                 :  196187000 :   Expression* expr = *pexpr;
      43                 :  196187000 :   if ((traverse->traverse_mask() & Traverse::traverse_expressions) != 0)
      44                 :            :     {
      45                 :  144937000 :       int t = traverse->expression(pexpr);
      46                 :  144937000 :       if (t == TRAVERSE_EXIT)
      47                 :            :         return TRAVERSE_EXIT;
      48                 :  143529000 :       else if (t == TRAVERSE_SKIP_COMPONENTS)
      49                 :            :         return TRAVERSE_CONTINUE;
      50                 :            :     }
      51                 :  135659000 :   return expr->do_traverse(traverse);
      52                 :            : }
      53                 :            : 
      54                 :            : // Traverse subexpressions of this expression.
      55                 :            : 
      56                 :            : int
      57                 :   60744800 : Expression::traverse_subexpressions(Traverse* traverse)
      58                 :            : {
      59                 :   60744800 :   return this->do_traverse(traverse);
      60                 :            : }
      61                 :            : 
      62                 :            : // Default implementation for do_traverse for child classes.
      63                 :            : 
      64                 :            : int
      65                 :   59787900 : Expression::do_traverse(Traverse*)
      66                 :            : {
      67                 :   59787900 :   return TRAVERSE_CONTINUE;
      68                 :            : }
      69                 :            : 
      70                 :            : // This virtual function is called by the parser if the value of this
      71                 :            : // expression is being discarded.  By default, we give an error.
      72                 :            : // Expressions with side effects override.
      73                 :            : 
      74                 :            : bool
      75                 :         53 : Expression::do_discarding_value()
      76                 :            : {
      77                 :         53 :   this->unused_value_error();
      78                 :         53 :   return false;
      79                 :            : }
      80                 :            : 
      81                 :            : // This virtual function is called to export expressions.  This will
      82                 :            : // only be used by expressions which may be constant.
      83                 :            : 
      84                 :            : void
      85                 :          0 : Expression::do_export(Export_function_body*) const
      86                 :            : {
      87                 :          0 :   go_unreachable();
      88                 :            : }
      89                 :            : 
      90                 :            : // Write a name to the export data.
      91                 :            : 
      92                 :            : void
      93                 :      12725 : Expression::export_name(Export_function_body* efb, const Named_object* no)
      94                 :            : {
      95                 :      12725 :   if (no->package() != NULL)
      96                 :            :     {
      97                 :       4512 :       char buf[50];
      98                 :       4512 :       snprintf(buf, sizeof buf, "<p%d>", efb->package_index(no->package()));
      99                 :       4512 :       efb->write_c_string(buf);
     100                 :            :     }
     101                 :            : 
     102                 :      12725 :   if (!Gogo::is_hidden_name(no->name()))
     103                 :       5241 :     efb->write_string(no->name());
     104                 :            :   else
     105                 :            :     {
     106                 :       7484 :       efb->write_c_string(".");
     107                 :       8744 :       efb->write_string(Gogo::unpack_hidden_name(no->name()));
     108                 :            :     }
     109                 :      12725 : }
     110                 :            : 
     111                 :            : // Give an error saying that the value of the expression is not used.
     112                 :            : 
     113                 :            : void
     114                 :         78 : Expression::unused_value_error()
     115                 :            : {
     116                 :         78 :   this->report_error(_("value computed is not used"));
     117                 :         78 : }
     118                 :            : 
     119                 :            : // Note that this expression is an error.  This is called by children
     120                 :            : // when they discover an error.
     121                 :            : 
     122                 :            : void
     123                 :       5397 : Expression::set_is_error()
     124                 :            : {
     125                 :       5397 :   this->classification_ = EXPRESSION_ERROR;
     126                 :       5397 : }
     127                 :            : 
     128                 :            : // For children to call to report an error conveniently.
     129                 :            : 
     130                 :            : void
     131                 :       1232 : Expression::report_error(const char* msg)
     132                 :            : {
     133                 :       1232 :   go_error_at(this->location_, "%s", msg);
     134                 :       1232 :   this->set_is_error();
     135                 :       1232 : }
     136                 :            : 
     137                 :            : // Set types of variables and constants.  This is implemented by the
     138                 :            : // child class.
     139                 :            : 
     140                 :            : void
     141                 :    7869160 : Expression::determine_type(const Type_context* context)
     142                 :            : {
     143                 :    7869160 :   this->do_determine_type(context);
     144                 :    7869160 : }
     145                 :            : 
     146                 :            : // Set types when there is no context.
     147                 :            : 
     148                 :            : void
     149                 :    2870260 : Expression::determine_type_no_context()
     150                 :            : {
     151                 :    2870260 :   Type_context context;
     152                 :    2870260 :   this->do_determine_type(&context);
     153                 :    2870260 : }
     154                 :            : 
     155                 :            : // Return true if two expressions refer to the same variable or struct
     156                 :            : // field.  This can only be true when there are no side effects.
     157                 :            : 
     158                 :            : bool
     159                 :      42487 : Expression::is_same_variable(Expression* a, Expression* b)
     160                 :            : {
     161                 :      42487 :   if (a->classification() != b->classification())
     162                 :            :     return false;
     163                 :            : 
     164                 :      38690 :   Var_expression* av = a->var_expression();
     165                 :      26880 :   if (av != NULL)
     166                 :      26880 :     return av->named_object() == b->var_expression()->named_object();
     167                 :            : 
     168                 :      11810 :   Field_reference_expression* af = a->field_reference_expression();
     169                 :       5735 :   if (af != NULL)
     170                 :            :     {
     171                 :       5735 :       Field_reference_expression* bf = b->field_reference_expression();
     172                 :       5735 :       return (af->field_index() == bf->field_index()
     173                 :       5735 :               && Expression::is_same_variable(af->expr(), bf->expr()));
     174                 :            :     }
     175                 :            : 
     176                 :       6075 :   Unary_expression* au = a->unary_expression();
     177                 :       5472 :   if (au != NULL)
     178                 :            :     {
     179                 :       5472 :       Unary_expression* bu = b->unary_expression();
     180                 :       5472 :       return (au->op() == OPERATOR_MULT
     181                 :       5472 :               && bu->op() == OPERATOR_MULT
     182                 :      10944 :               && Expression::is_same_variable(au->operand(),
     183                 :            :                                               bu->operand()));
     184                 :            :     }
     185                 :            : 
     186                 :        603 :   Array_index_expression* aie = a->array_index_expression();
     187                 :         80 :   if (aie != NULL)
     188                 :            :     {
     189                 :         80 :       Array_index_expression* bie = b->array_index_expression();
     190                 :         80 :       return (aie->end() == NULL
     191                 :         80 :               && bie->end() == NULL
     192                 :         80 :               && Expression::is_same_variable(aie->array(), bie->array())
     193                 :        160 :               && Expression::is_same_variable(aie->start(), bie->start()));
     194                 :            :     }
     195                 :            : 
     196                 :       1046 :   Numeric_constant aval;
     197                 :        523 :   if (a->numeric_constant_value(&aval))
     198                 :            :     {
     199                 :         28 :       Numeric_constant bval;
     200                 :         28 :       if (b->numeric_constant_value(&bval))
     201                 :         28 :         return aval.equals(bval);
     202                 :            :     }
     203                 :            : 
     204                 :            :   return false;
     205                 :            : }
     206                 :            : 
     207                 :            : // Return an expression handling any conversions which must be done during
     208                 :            : // assignment.
     209                 :            : 
     210                 :            : Expression*
     211                 :   10842200 : Expression::convert_for_assignment(Gogo*, Type* lhs_type,
     212                 :            :                                    Expression* rhs, Location location)
     213                 :            : {
     214                 :   10842200 :   Type* rhs_type = rhs->type();
     215                 :   10842200 :   if (lhs_type->is_error()
     216                 :   10842200 :       || rhs_type->is_error()
     217                 :   21684400 :       || rhs->is_error_expression())
     218                 :          6 :     return Expression::make_error(location);
     219                 :            : 
     220                 :   10842200 :   bool are_identical = Type::are_identical(lhs_type, rhs_type,
     221                 :            :                                            (Type::COMPARE_ERRORS
     222                 :            :                                             | Type::COMPARE_TAGS),
     223                 :            :                                            NULL);
     224                 :   10842200 :   if (!are_identical && lhs_type->interface_type() != NULL)
     225                 :            :     {
     226                 :            :       // Type to interface conversions have been made explicit early.
     227                 :      21448 :       go_assert(rhs_type->interface_type() != NULL);
     228                 :      21448 :       return Expression::convert_interface_to_interface(lhs_type, rhs, false,
     229                 :      21448 :                                                         location);
     230                 :            :     }
     231                 :   10820700 :   else if (!are_identical && rhs_type->interface_type() != NULL)
     232                 :      10638 :     return Expression::convert_interface_to_type(lhs_type, rhs, location);
     233                 :   10810100 :   else if (lhs_type->is_slice_type() && rhs_type->is_nil_type())
     234                 :            :     {
     235                 :            :       // Assigning nil to a slice.
     236                 :      16204 :       Expression* nil = Expression::make_nil(location);
     237                 :      16204 :       Expression* zero = Expression::make_integer_ul(0, NULL, location);
     238                 :      16204 :       return Expression::make_slice_value(lhs_type, nil, zero, zero, location);
     239                 :            :     }
     240                 :   10793900 :   else if (rhs_type->is_nil_type())
     241                 :     701282 :     return Expression::make_nil(location);
     242                 :   10092600 :   else if (are_identical)
     243                 :            :     {
     244                 :    9227670 :       if (lhs_type->forwarded() != rhs_type->forwarded())
     245                 :            :         {
     246                 :            :           // Different but identical types require an explicit
     247                 :            :           // conversion.  This happens with type aliases.
     248                 :     416439 :           return Expression::make_cast(lhs_type, rhs, location);
     249                 :            :         }
     250                 :            : 
     251                 :            :       // No conversion is needed.
     252                 :            :       return rhs;
     253                 :            :     }
     254                 :     864932 :   else if (lhs_type->points_to() != NULL)
     255                 :     555799 :     return Expression::make_unsafe_cast(lhs_type, rhs, location);
     256                 :     309133 :   else if (lhs_type->is_numeric_type())
     257                 :     126997 :     return Expression::make_cast(lhs_type, rhs, location);
     258                 :     182170 :   else if ((lhs_type->struct_type() != NULL
     259                 :     182102 :             && rhs_type->struct_type() != NULL)
     260                 :       3035 :            || (lhs_type->array_type() != NULL
     261                 :       3069 :                && rhs_type->array_type() != NULL))
     262                 :            :     {
     263                 :            :       // This conversion must be permitted by Go, or we wouldn't have
     264                 :            :       // gotten here.
     265                 :       3069 :       return Expression::make_unsafe_cast(lhs_type, rhs, location);
     266                 :            :     }
     267                 :            :   else
     268                 :     179067 :     return rhs;
     269                 :            : }
     270                 :            : 
     271                 :            : // Return an expression for a conversion from a non-interface type to an
     272                 :            : // interface type.  If ON_STACK is true, it can allocate the storage on
     273                 :            : // stack.
     274                 :            : 
     275                 :            : Expression*
     276                 :     172890 : Expression::convert_type_to_interface(Type* lhs_type, Expression* rhs,
     277                 :            :                                       bool on_stack, Location location)
     278                 :            : {
     279                 :     172890 :   Interface_type* lhs_interface_type = lhs_type->interface_type();
     280                 :     172890 :   bool lhs_is_empty = lhs_interface_type->is_empty();
     281                 :            : 
     282                 :            :   // Since RHS_TYPE is a static type, we can create the interface
     283                 :            :   // method table at compile time.
     284                 :            : 
     285                 :            :   // When setting an interface to nil, we just set both fields to
     286                 :            :   // NULL.
     287                 :     172890 :   Type* rhs_type = rhs->type();
     288                 :     172890 :   if (rhs_type->is_nil_type())
     289                 :            :     {
     290                 :      24241 :       Expression* nil = Expression::make_nil(location);
     291                 :      24241 :       return Expression::make_interface_value(lhs_type, nil, nil, location);
     292                 :            :     }
     293                 :            : 
     294                 :            :   // This should have been checked already.
     295                 :     148649 :   if (!lhs_interface_type->implements_interface(rhs_type, NULL))
     296                 :            :     {
     297                 :          0 :       go_assert(saw_errors());
     298                 :          0 :       return Expression::make_error(location);
     299                 :            :     }
     300                 :            : 
     301                 :            :   // An interface is a tuple.  If LHS_TYPE is an empty interface type,
     302                 :            :   // then the first field is the type descriptor for RHS_TYPE.
     303                 :            :   // Otherwise it is the interface method table for RHS_TYPE.
     304                 :     148649 :   Expression* first_field;
     305                 :     148649 :   if (lhs_is_empty)
     306                 :     111860 :     first_field = Expression::make_type_descriptor(rhs_type, location);
     307                 :            :   else
     308                 :            :     {
     309                 :            :       // Build the interface method table for this interface and this
     310                 :            :       // object type: a list of function pointers for each interface
     311                 :            :       // method.
     312                 :      36789 :       Named_type* rhs_named_type = rhs_type->named_type();
     313                 :      36789 :       Struct_type* rhs_struct_type = rhs_type->struct_type();
     314                 :      36789 :       bool is_pointer = false;
     315                 :      36789 :       if (rhs_named_type == NULL && rhs_struct_type == NULL)
     316                 :            :         {
     317                 :      49124 :           rhs_named_type = rhs_type->deref()->named_type();
     318                 :      49124 :           rhs_struct_type = rhs_type->deref()->struct_type();
     319                 :            :           is_pointer = true;
     320                 :            :         }
     321                 :      36789 :       if (rhs_named_type != NULL)
     322                 :      36666 :         first_field =
     323                 :      36666 :           rhs_named_type->interface_method_table(lhs_interface_type,
     324                 :            :                                                  is_pointer);
     325                 :        123 :       else if (rhs_struct_type != NULL)
     326                 :        123 :         first_field =
     327                 :        123 :           rhs_struct_type->interface_method_table(lhs_interface_type,
     328                 :            :                                                   is_pointer);
     329                 :            :       else
     330                 :          0 :         first_field = Expression::make_nil(location);
     331                 :            :     }
     332                 :            : 
     333                 :     148649 :   Expression* obj;
     334                 :     148649 :   if (rhs_type->is_direct_iface_type())
     335                 :            :     {
     336                 :            :       // We are assigning a pointer to the interface; the interface
     337                 :            :       // holds the pointer itself.
     338                 :      39723 :       obj = unpack_direct_iface(rhs, location);
     339                 :            :     }
     340                 :            :   else
     341                 :            :     {
     342                 :            :       // We are assigning a non-pointer value to the interface; the
     343                 :            :       // interface gets a copy of the value in the heap if it escapes.
     344                 :     108926 :       if (rhs->is_constant())
     345                 :      28175 :         obj = Expression::make_unary(OPERATOR_AND, rhs, location);
     346                 :            :       else
     347                 :            :         {
     348                 :      80751 :           obj = Expression::make_heap_expression(rhs, location);
     349                 :      80751 :           if (on_stack)
     350                 :        509 :             obj->heap_expression()->set_allocate_on_stack();
     351                 :            :         }
     352                 :            :     }
     353                 :            : 
     354                 :     148649 :   return Expression::make_interface_value(lhs_type, first_field, obj, location);
     355                 :            : }
     356                 :            : 
     357                 :            : // Return an expression for the pointer-typed value of a direct interface
     358                 :            : // type.  Specifically, for single field struct or array, get the single
     359                 :            : // field, and do this recursively.  The reason for this is that we don't
     360                 :            : // want to assign a struct or an array to a pointer-typed field.  The
     361                 :            : // backend may not like that.
     362                 :            : 
     363                 :            : Expression*
     364                 :      52408 : Expression::unpack_direct_iface(Expression* rhs, Location loc)
     365                 :            : {
     366                 :      52408 :   Struct_type* st = rhs->type()->struct_type();
     367                 :       3770 :   if (st != NULL)
     368                 :            :     {
     369                 :       3770 :       go_assert(st->field_count() == 1);
     370                 :       3770 :       Expression* field = Expression::make_field_reference(rhs, 0, loc);
     371                 :       3770 :       return unpack_direct_iface(field, loc);
     372                 :            :     }
     373                 :      48638 :   Array_type* at = rhs->type()->array_type();
     374                 :        646 :   if (at != NULL)
     375                 :            :     {
     376                 :        646 :       int64_t len;
     377                 :        646 :       bool ok = at->int_length(&len);
     378                 :        646 :       go_assert(ok && len == 1);
     379                 :        646 :       Type* int_type = Type::lookup_integer_type("int");
     380                 :        646 :       Expression* index = Expression::make_integer_ul(0, int_type, loc);
     381                 :        646 :       Expression* elem = Expression::make_array_index(rhs, index, NULL, NULL, loc);
     382                 :        646 :       return unpack_direct_iface(elem, loc);
     383                 :            :     }
     384                 :            :   return rhs;
     385                 :            : }
     386                 :            : 
     387                 :            : // The opposite of unpack_direct_iface.
     388                 :            : 
     389                 :            : Expression*
     390                 :      11393 : Expression::pack_direct_iface(Type* t, Expression* rhs, Location loc)
     391                 :            : {
     392                 :      11393 :   if (rhs->type() == t)
     393                 :            :     return rhs;
     394                 :      11393 :   Struct_type* st = t->struct_type();
     395                 :       1464 :   if (st != NULL)
     396                 :            :     {
     397                 :       1464 :       Expression_list* vals = new Expression_list();
     398                 :       1464 :       vals->push_back(pack_direct_iface(st->field(0)->type(), rhs, loc));
     399                 :       1464 :       return Expression::make_struct_composite_literal(t, vals, loc);
     400                 :            :     }
     401                 :       9929 :   Array_type* at = t->array_type();
     402                 :          0 :   if (at != NULL)
     403                 :            :     {
     404                 :          0 :       Expression_list* vals = new Expression_list();
     405                 :          0 :       vals->push_back(pack_direct_iface(at->element_type(), rhs, loc));
     406                 :          0 :       return Expression::make_array_composite_literal(t, vals, loc);
     407                 :            :     }
     408                 :       9929 :   return Expression::make_unsafe_cast(t, rhs, loc);
     409                 :            : }
     410                 :            : 
     411                 :            : // Return an expression for the type descriptor of RHS.
     412                 :            : 
     413                 :            : Expression*
     414                 :      45653 : Expression::get_interface_type_descriptor(Expression* rhs)
     415                 :            : {
     416                 :      45653 :   go_assert(rhs->type()->interface_type() != NULL);
     417                 :      45653 :   Location location = rhs->location();
     418                 :            : 
     419                 :            :   // The type descriptor is the first field of an empty interface.
     420                 :      91306 :   if (rhs->type()->interface_type()->is_empty())
     421                 :       7917 :     return Expression::make_interface_info(rhs, INTERFACE_INFO_TYPE_DESCRIPTOR,
     422                 :       7917 :                                            location);
     423                 :            : 
     424                 :      37736 :   Expression* mtable =
     425                 :      37736 :       Expression::make_interface_info(rhs, INTERFACE_INFO_METHODS, location);
     426                 :            : 
     427                 :      37736 :   Expression* descriptor =
     428                 :      37736 :       Expression::make_dereference(mtable, NIL_CHECK_NOT_NEEDED, location);
     429                 :      37736 :   descriptor = Expression::make_field_reference(descriptor, 0, location);
     430                 :      37736 :   Expression* nil = Expression::make_nil(location);
     431                 :            : 
     432                 :      37736 :   Expression* eq =
     433                 :      37736 :       Expression::make_binary(OPERATOR_EQEQ, mtable, nil, location);
     434                 :      37736 :   return Expression::make_conditional(eq, nil, descriptor, location);
     435                 :            : }
     436                 :            : 
     437                 :            : // Return an expression for the conversion of an interface type to an
     438                 :            : // interface type.
     439                 :            : 
     440                 :            : Expression*
     441                 :      22374 : Expression::convert_interface_to_interface(Type *lhs_type, Expression* rhs,
     442                 :            :                                            bool for_type_guard,
     443                 :            :                                            Location location)
     444                 :            : {
     445                 :      22374 :   if (Type::are_identical(lhs_type, rhs->type(),
     446                 :            :                           Type::COMPARE_ERRORS | Type::COMPARE_TAGS,
     447                 :            :                           NULL))
     448                 :            :     return rhs;
     449                 :            : 
     450                 :      22374 :   Interface_type* lhs_interface_type = lhs_type->interface_type();
     451                 :      22374 :   bool lhs_is_empty = lhs_interface_type->is_empty();
     452                 :            : 
     453                 :            :   // In the general case this requires runtime examination of the type
     454                 :            :   // method table to match it up with the interface methods.
     455                 :            : 
     456                 :            :   // FIXME: If all of the methods in the right hand side interface
     457                 :            :   // also appear in the left hand side interface, then we don't need
     458                 :            :   // to do a runtime check, although we still need to build a new
     459                 :            :   // method table.
     460                 :            : 
     461                 :            :   // We are going to evaluate RHS multiple times.
     462                 :      22374 :   go_assert(rhs->is_variable());
     463                 :            : 
     464                 :            :   // Get the type descriptor for the right hand side.  This will be
     465                 :            :   // NULL for a nil interface.
     466                 :      22374 :   Expression* rhs_type_expr = Expression::get_interface_type_descriptor(rhs);
     467                 :      22374 :   Expression* lhs_type_expr =
     468                 :      22374 :       Expression::make_type_descriptor(lhs_type, location);
     469                 :            : 
     470                 :      22374 :   Expression* first_field;
     471                 :      22374 :   if (for_type_guard)
     472                 :            :     {
     473                 :            :       // A type assertion fails when converting a nil interface.
     474                 :        926 :       first_field = Runtime::make_call(Runtime::ASSERTITAB, location, 2,
     475                 :            :                                        lhs_type_expr, rhs_type_expr);
     476                 :            :     }
     477                 :      21448 :   else if (lhs_is_empty)
     478                 :            :     {
     479                 :            :       // A conversion to an empty interface always succeeds, and the
     480                 :            :       // first field is just the type descriptor of the object.
     481                 :            :       first_field = rhs_type_expr;
     482                 :            :     }
     483                 :            :   else
     484                 :            :     {
     485                 :            :       // A conversion to a non-empty interface may fail, but unlike a
     486                 :            :       // type assertion converting nil will always succeed.
     487                 :       3332 :       first_field = Runtime::make_call(Runtime::REQUIREITAB, location, 2,
     488                 :            :                                        lhs_type_expr, rhs_type_expr);
     489                 :            :     }
     490                 :            : 
     491                 :            :   // The second field is simply the object pointer.
     492                 :      22374 :   Expression* obj =
     493                 :      22374 :       Expression::make_interface_info(rhs, INTERFACE_INFO_OBJECT, location);
     494                 :      22374 :   return Expression::make_interface_value(lhs_type, first_field, obj, location);
     495                 :            : }
     496                 :            : 
     497                 :            : // Return an expression for the conversion of an interface type to a
     498                 :            : // non-interface type.
     499                 :            : 
     500                 :            : Expression*
     501                 :      10638 : Expression::convert_interface_to_type(Type *lhs_type, Expression* rhs,
     502                 :            :                                       Location location)
     503                 :            : {
     504                 :            :   // We are going to evaluate RHS multiple times.
     505                 :      10638 :   go_assert(rhs->is_variable());
     506                 :            : 
     507                 :            :   // Build an expression to check that the type is valid.  It will
     508                 :            :   // panic with an appropriate runtime type error if the type is not
     509                 :            :   // valid.
     510                 :            :   // (lhs_type != rhs_type ? panicdottype(lhs_type, rhs_type, inter_type) :
     511                 :            :   //    nil /*dummy*/)
     512                 :      10638 :   Expression* lhs_type_expr = Expression::make_type_descriptor(lhs_type,
     513                 :            :                                                                 location);
     514                 :      10638 :   Expression* rhs_descriptor =
     515                 :      10638 :       Expression::get_interface_type_descriptor(rhs);
     516                 :            : 
     517                 :      10638 :   Type* rhs_type = rhs->type();
     518                 :      10638 :   Expression* rhs_inter_expr = Expression::make_type_descriptor(rhs_type,
     519                 :            :                                                                 location);
     520                 :            : 
     521                 :      10638 :   Expression* cond = Expression::make_binary(OPERATOR_NOTEQ, lhs_type_expr,
     522                 :            :                                              rhs_descriptor, location);
     523                 :      10638 :   rhs_descriptor = Expression::get_interface_type_descriptor(rhs);
     524                 :      10638 :   Expression* panic = Runtime::make_call(Runtime::PANICDOTTYPE, location,
     525                 :            :                                          3, lhs_type_expr->copy(),
     526                 :            :                                          rhs_descriptor,
     527                 :            :                                          rhs_inter_expr);
     528                 :      10638 :   Expression* nil = Expression::make_nil(location);
     529                 :      10638 :   Expression* check = Expression::make_conditional(cond, panic, nil,
     530                 :            :                                                    location);
     531                 :            : 
     532                 :            :   // If the conversion succeeds, pull out the value.
     533                 :      10638 :   Expression* obj = Expression::make_interface_info(rhs, INTERFACE_INFO_OBJECT,
     534                 :            :                                                     location);
     535                 :            : 
     536                 :            :   // If the value is a direct interface, then it is the value we want.
     537                 :            :   // Otherwise it points to the value.
     538                 :      10638 :   if (lhs_type->is_direct_iface_type())
     539                 :       8291 :     obj = Expression::pack_direct_iface(lhs_type, obj, location);
     540                 :            :   else
     541                 :            :     {
     542                 :       2347 :       obj = Expression::make_unsafe_cast(Type::make_pointer_type(lhs_type), obj,
     543                 :            :                                          location);
     544                 :       2347 :       obj = Expression::make_dereference(obj, NIL_CHECK_NOT_NEEDED,
     545                 :            :                                          location);
     546                 :            :     }
     547                 :      10638 :   return Expression::make_compound(check, obj, location);
     548                 :            : }
     549                 :            : 
     550                 :            : // Convert an expression to its backend representation.  This is implemented by
     551                 :            : // the child class.  Not that it is not in general safe to call this multiple
     552                 :            : // times for a single expression, but that we don't catch such errors.
     553                 :            : 
     554                 :            : Bexpression*
     555                 :   35342500 : Expression::get_backend(Translate_context* context)
     556                 :            : {
     557                 :            :   // The child may have marked this expression as having an error.
     558                 :   35342500 :   if (this->classification_ == EXPRESSION_ERROR)
     559                 :       3447 :     return context->backend()->error_expression();
     560                 :            : 
     561                 :   35339100 :   return this->do_get_backend(context);
     562                 :            : }
     563                 :            : 
     564                 :            : // Return a backend expression for VAL.
     565                 :            : Bexpression*
     566                 :    5404700 : Expression::backend_numeric_constant_expression(Translate_context* context,
     567                 :            :                                                 Numeric_constant* val)
     568                 :            : {
     569                 :    5404700 :   Gogo* gogo = context->gogo();
     570                 :    5404700 :   Type* type = val->type();
     571                 :    5404700 :   if (type == NULL)
     572                 :          0 :     return gogo->backend()->error_expression();
     573                 :            : 
     574                 :    5404700 :   Btype* btype = type->get_backend(gogo);
     575                 :    5404700 :   Bexpression* ret;
     576                 :    5404700 :   if (type->integer_type() != NULL)
     577                 :            :     {
     578                 :    5371770 :       mpz_t ival;
     579                 :    5371770 :       if (!val->to_int(&ival))
     580                 :            :         {
     581                 :          0 :           go_assert(saw_errors());
     582                 :          0 :           return gogo->backend()->error_expression();
     583                 :            :         }
     584                 :    5371770 :       ret = gogo->backend()->integer_constant_expression(btype, ival);
     585                 :    5371770 :       mpz_clear(ival);
     586                 :            :     }
     587                 :      32935 :   else if (type->float_type() != NULL)
     588                 :            :     {
     589                 :      29853 :       mpfr_t fval;
     590                 :      29853 :       if (!val->to_float(&fval))
     591                 :            :         {
     592                 :          0 :           go_assert(saw_errors());
     593                 :          0 :           return gogo->backend()->error_expression();
     594                 :            :         }
     595                 :      29853 :       ret = gogo->backend()->float_constant_expression(btype, fval);
     596                 :      29853 :       mpfr_clear(fval);
     597                 :            :     }
     598                 :       3082 :   else if (type->complex_type() != NULL)
     599                 :            :     {
     600                 :       3082 :       mpc_t cval;
     601                 :       3082 :       if (!val->to_complex(&cval))
     602                 :            :         {
     603                 :          0 :           go_assert(saw_errors());
     604                 :          0 :           return gogo->backend()->error_expression();
     605                 :            :         }
     606                 :       3082 :       ret = gogo->backend()->complex_constant_expression(btype, cval);
     607                 :       3082 :       mpc_clear(cval);
     608                 :            :     }
     609                 :            :   else
     610                 :          0 :     go_unreachable();
     611                 :            : 
     612                 :            :   return ret;
     613                 :            : }
     614                 :            : 
     615                 :            : // Insert bounds checks for an index expression.  Check that that VAL
     616                 :            : // >= 0 and that it fits in an int.  Then check that VAL OP BOUND is
     617                 :            : // true.  If any condition is false, call one of the CODE runtime
     618                 :            : // functions, which will panic.
     619                 :            : 
     620                 :            : void
     621                 :     207253 : Expression::check_bounds(Expression* val, Operator op, Expression* bound,
     622                 :            :                          Runtime::Function code,
     623                 :            :                          Runtime::Function code_u,
     624                 :            :                          Runtime::Function code_extend,
     625                 :            :                          Runtime::Function code_extend_u,
     626                 :            :                          Statement_inserter* inserter,
     627                 :            :                          Location loc)
     628                 :            : {
     629                 :     293515 :   go_assert(val->is_variable() || val->is_constant());
     630                 :     292941 :   go_assert(bound->is_variable() || bound->is_constant());
     631                 :            : 
     632                 :     207253 :   Type* int_type = Type::lookup_integer_type("int");
     633                 :     414506 :   int int_type_size = int_type->integer_type()->bits();
     634                 :            : 
     635                 :     207253 :   Type* val_type = val->type();
     636                 :     207253 :   if (val_type->integer_type() == NULL)
     637                 :            :     {
     638                 :          0 :       go_assert(saw_errors());
     639                 :            :       return;
     640                 :            :     }
     641                 :     414506 :   int val_type_size = val_type->integer_type()->bits();
     642                 :     414506 :   bool val_is_unsigned = val_type->integer_type()->is_unsigned();
     643                 :            : 
     644                 :            :   // Check that VAL >= 0.
     645                 :     207253 :   Expression* check = NULL;
     646                 :     207253 :   if (!val_is_unsigned)
     647                 :            :     {
     648                 :     197125 :       Expression* zero = Expression::make_integer_ul(0, val_type, loc);
     649                 :     197125 :       check = Expression::make_binary(OPERATOR_GE, val->copy(), zero, loc);
     650                 :            :     }
     651                 :            : 
     652                 :            :   // If VAL's type is larger than int, check that VAL fits in an int.
     653                 :     207253 :   if (val_type_size > int_type_size
     654                 :     206583 :       || (val_type_size == int_type_size
     655                 :     206583 :           && val_is_unsigned))
     656                 :            :     {
     657                 :       5084 :       mpz_t one;
     658                 :       5084 :       mpz_init_set_ui(one, 1UL);
     659                 :            : 
     660                 :            :       // maxval = 2^(int_type_size - 1) - 1
     661                 :       5084 :       mpz_t maxval;
     662                 :       5084 :       mpz_init(maxval);
     663                 :       5084 :       mpz_mul_2exp(maxval, one, int_type_size - 1);
     664                 :       5084 :       mpz_sub_ui(maxval, maxval, 1);
     665                 :       5084 :       Expression* max = Expression::make_integer_z(&maxval, val_type, loc);
     666                 :       5084 :       mpz_clear(one);
     667                 :       5084 :       mpz_clear(maxval);
     668                 :            : 
     669                 :       5084 :       Expression* cmp = Expression::make_binary(OPERATOR_LE, val->copy(),
     670                 :            :                                                 max, loc);
     671                 :       5084 :       if (check == NULL)
     672                 :            :         check = cmp;
     673                 :            :       else
     674                 :        312 :         check = Expression::make_binary(OPERATOR_ANDAND, check, cmp, loc);
     675                 :            :     }
     676                 :            : 
     677                 :            :   // For the final check we can assume that VAL fits in an int.
     678                 :     207253 :   Expression* ival;
     679                 :     207253 :   if (val_type == int_type)
     680                 :     175106 :     ival = val->copy();
     681                 :            :   else
     682                 :      32147 :     ival = Expression::make_cast(int_type, val->copy(), loc);
     683                 :            : 
     684                 :            :   // BOUND is assumed to fit in an int.  Either it comes from len or
     685                 :            :   // cap, or it was checked by an earlier call.
     686                 :     207253 :   Expression* ibound;
     687                 :     207253 :   if (bound->type() == int_type)
     688                 :     200276 :     ibound = bound->copy();
     689                 :            :   else
     690                 :       6977 :     ibound = Expression::make_cast(int_type, bound->copy(), loc);
     691                 :            : 
     692                 :     207253 :   Expression* cmp = Expression::make_binary(op, ival, ibound, loc);
     693                 :     207253 :   if (check == NULL)
     694                 :            :     check = cmp;
     695                 :            :   else
     696                 :     201897 :     check = Expression::make_binary(OPERATOR_ANDAND, check, cmp, loc);
     697                 :            : 
     698                 :     207253 :   Runtime::Function c;
     699                 :     207253 :   if (val_type_size > int_type_size)
     700                 :            :     {
     701                 :        670 :       if (val_is_unsigned)
     702                 :            :         c = code_extend_u;
     703                 :            :       else
     704                 :        312 :         c = code_extend;
     705                 :            :     }
     706                 :            :   else
     707                 :            :     {
     708                 :     206583 :       if (val_is_unsigned)
     709                 :            :         c = code_u;
     710                 :            :       else
     711                 :     196813 :         c = code;
     712                 :            :     }
     713                 :            : 
     714                 :     207253 :   Expression* ignore = Expression::make_boolean(true, loc);
     715                 :     207253 :   Expression* crash = Runtime::make_call(c, loc, 2,
     716                 :            :                                          val->copy(), bound->copy());
     717                 :     207253 :   Expression* cond = Expression::make_conditional(check, ignore, crash, loc);
     718                 :     207253 :   inserter->insert(Statement::make_statement(cond, true));
     719                 :            : }
     720                 :            : 
     721                 :            : void
     722                 :          0 : Expression::dump_expression(Ast_dump_context* ast_dump_context) const
     723                 :            : {
     724                 :          0 :   this->do_dump_expression(ast_dump_context);
     725                 :          0 : }
     726                 :            : 
     727                 :            : // Error expressions.  This are used to avoid cascading errors.
     728                 :            : 
     729                 :            : class Error_expression : public Expression
     730                 :            : {
     731                 :            :  public:
     732                 :       8838 :   Error_expression(Location location)
     733                 :      17676 :     : Expression(EXPRESSION_ERROR, location)
     734                 :            :   { }
     735                 :            : 
     736                 :            :  protected:
     737                 :            :   bool
     738                 :         60 :   do_is_constant() const
     739                 :         60 :   { return true; }
     740                 :            : 
     741                 :            :   bool
     742                 :        105 :   do_numeric_constant_value(Numeric_constant* nc) const
     743                 :            :   {
     744                 :        105 :     nc->set_unsigned_long(NULL, 0);
     745                 :        105 :     return true;
     746                 :            :   }
     747                 :            : 
     748                 :            :   bool
     749                 :         18 :   do_discarding_value()
     750                 :         18 :   { return true; }
     751                 :            : 
     752                 :            :   Type*
     753                 :       4040 :   do_type()
     754                 :       4040 :   { return Type::make_error_type(); }
     755                 :            : 
     756                 :            :   void
     757                 :        158 :   do_determine_type(const Type_context*)
     758                 :        158 :   { }
     759                 :            : 
     760                 :            :   Expression*
     761                 :          0 :   do_copy()
     762                 :          0 :   { return this; }
     763                 :            : 
     764                 :            :   bool
     765                 :          8 :   do_is_addressable() const
     766                 :          8 :   { return true; }
     767                 :            : 
     768                 :            :   Bexpression*
     769                 :          0 :   do_get_backend(Translate_context* context)
     770                 :          0 :   { return context->backend()->error_expression(); }
     771                 :            : 
     772                 :            :   void
     773                 :            :   do_dump_expression(Ast_dump_context*) const;
     774                 :            : };
     775                 :            : 
     776                 :            : // Dump the ast representation for an error expression to a dump context.
     777                 :            : 
     778                 :            : void
     779                 :          0 : Error_expression::do_dump_expression(Ast_dump_context* ast_dump_context) const
     780                 :            : {
     781                 :          0 :   ast_dump_context->ostream() << "_Error_" ;
     782                 :          0 : }
     783                 :            : 
     784                 :            : Expression*
     785                 :       8838 : Expression::make_error(Location location)
     786                 :            : {
     787                 :       8838 :   return new Error_expression(location);
     788                 :            : }
     789                 :            : 
     790                 :            : // An expression which is really a type.  This is used during parsing.
     791                 :            : // It is an error if these survive after lowering.
     792                 :            : 
     793                 :            : class
     794                 :            : Type_expression : public Expression
     795                 :            : {
     796                 :            :  public:
     797                 :     217134 :   Type_expression(Type* type, Location location)
     798                 :     217134 :     : Expression(EXPRESSION_TYPE, location),
     799                 :     434268 :       type_(type)
     800                 :            :   { }
     801                 :            : 
     802                 :            :  protected:
     803                 :            :   int
     804                 :     156694 :   do_traverse(Traverse* traverse)
     805                 :     156694 :   { return Type::traverse(this->type_, traverse); }
     806                 :            : 
     807                 :            :   Type*
     808                 :     357151 :   do_type()
     809                 :     357151 :   { return this->type_; }
     810                 :            : 
     811                 :            :   void
     812                 :          2 :   do_determine_type(const Type_context*)
     813                 :          2 :   { }
     814                 :            : 
     815                 :            :   void
     816                 :          1 :   do_check_types(Gogo*)
     817                 :          1 :   { this->report_error(_("invalid use of type")); }
     818                 :            : 
     819                 :            :   Expression*
     820                 :          0 :   do_copy()
     821                 :          0 :   { return this; }
     822                 :            : 
     823                 :            :   Bexpression*
     824                 :          0 :   do_get_backend(Translate_context*)
     825                 :          0 :   { go_unreachable(); }
     826                 :            : 
     827                 :            :   void do_dump_expression(Ast_dump_context*) const;
     828                 :            : 
     829                 :            :  private:
     830                 :            :   // The type which we are representing as an expression.
     831                 :            :   Type* type_;
     832                 :            : };
     833                 :            : 
     834                 :            : void
     835                 :          0 : Type_expression::do_dump_expression(Ast_dump_context* ast_dump_context) const
     836                 :            : {
     837                 :          0 :   ast_dump_context->dump_type(this->type_);
     838                 :          0 : }
     839                 :            : 
     840                 :            : Expression*
     841                 :     217134 : Expression::make_type(Type* type, Location location)
     842                 :            : {
     843                 :     217134 :   return new Type_expression(type, location);
     844                 :            : }
     845                 :            : 
     846                 :            : // Class Parser_expression.
     847                 :            : 
     848                 :            : Type*
     849                 :          0 : Parser_expression::do_type()
     850                 :            : {
     851                 :            :   // We should never really ask for the type of a Parser_expression.
     852                 :            :   // However, it can happen, at least when we have an invalid const
     853                 :            :   // whose initializer refers to the const itself.  In that case we
     854                 :            :   // may ask for the type when lowering the const itself.
     855                 :          0 :   go_assert(saw_errors());
     856                 :          0 :   return Type::make_error_type();
     857                 :            : }
     858                 :            : 
     859                 :            : // Class Var_expression.
     860                 :            : 
     861                 :            : // Lower a variable expression.  Here we just make sure that the
     862                 :            : // initialization expression of the variable has been lowered.  This
     863                 :            : // ensures that we will be able to determine the type of the variable
     864                 :            : // if necessary.
     865                 :            : 
     866                 :            : Expression*
     867                 :    5586420 : Var_expression::do_lower(Gogo* gogo, Named_object* function,
     868                 :            :                          Statement_inserter* inserter, int)
     869                 :            : {
     870                 :    5586420 :   if (this->variable_->is_variable())
     871                 :            :     {
     872                 :    4969390 :       Variable* var = this->variable_->var_value();
     873                 :            :       // This is either a local variable or a global variable.  A
     874                 :            :       // reference to a variable which is local to an enclosing
     875                 :            :       // function will be a reference to a field in a closure.
     876                 :    4969390 :       if (var->is_global())
     877                 :            :         {
     878                 :     357628 :           function = NULL;
     879                 :     357628 :           inserter = NULL;
     880                 :            :         }
     881                 :    4969390 :       var->lower_init_expression(gogo, function, inserter);
     882                 :            :     }
     883                 :    5586420 :   return this;
     884                 :            : }
     885                 :            : 
     886                 :            : // Return the type of a reference to a variable.
     887                 :            : 
     888                 :            : Type*
     889                 :   50313500 : Var_expression::do_type()
     890                 :            : {
     891                 :   50313500 :   if (this->variable_->is_variable())
     892                 :   45619300 :     return this->variable_->var_value()->type();
     893                 :    4694190 :   else if (this->variable_->is_result_variable())
     894                 :    4694190 :     return this->variable_->result_var_value()->type();
     895                 :            :   else
     896                 :          0 :     go_unreachable();
     897                 :            : }
     898                 :            : 
     899                 :            : // Determine the type of a reference to a variable.
     900                 :            : 
     901                 :            : void
     902                 :    2356240 : Var_expression::do_determine_type(const Type_context*)
     903                 :            : {
     904                 :    2356240 :   if (this->variable_->is_variable())
     905                 :    2077950 :     this->variable_->var_value()->determine_type();
     906                 :    2356240 : }
     907                 :            : 
     908                 :            : // Something takes the address of this variable.  This means that we
     909                 :            : // may want to move the variable onto the heap.
     910                 :            : 
     911                 :            : void
     912                 :     296022 : Var_expression::do_address_taken(bool escapes)
     913                 :            : {
     914                 :     296022 :   if (!escapes)
     915                 :            :     {
     916                 :     206021 :       if (this->variable_->is_variable())
     917                 :     203638 :         this->variable_->var_value()->set_non_escaping_address_taken();
     918                 :       2383 :       else if (this->variable_->is_result_variable())
     919                 :       2383 :         this->variable_->result_var_value()->set_non_escaping_address_taken();
     920                 :            :       else
     921                 :          0 :         go_unreachable();
     922                 :            :     }
     923                 :            :   else
     924                 :            :     {
     925                 :      90001 :       if (this->variable_->is_variable())
     926                 :      89858 :         this->variable_->var_value()->set_address_taken();
     927                 :        143 :       else if (this->variable_->is_result_variable())
     928                 :        143 :         this->variable_->result_var_value()->set_address_taken();
     929                 :            :       else
     930                 :          0 :         go_unreachable();
     931                 :            :     }
     932                 :            : 
     933                 :     296022 :   if (this->variable_->is_variable()
     934                 :     296022 :       && this->variable_->var_value()->is_in_heap())
     935                 :            :     {
     936                 :     131105 :       Node::make_node(this)->set_encoding(Node::ESCAPE_HEAP);
     937                 :     131105 :       Node::make_node(this->variable_)->set_encoding(Node::ESCAPE_HEAP);
     938                 :            :     }
     939                 :     296022 : }
     940                 :            : 
     941                 :            : // Export a reference to a variable.
     942                 :            : 
     943                 :            : void
     944                 :      49874 : Var_expression::do_export(Export_function_body* efb) const
     945                 :            : {
     946                 :      49874 :   Named_object* no = this->variable_;
     947                 :      49874 :   if (no->is_result_variable() || !no->var_value()->is_global())
     948                 :      47384 :     efb->write_string(Gogo::unpack_hidden_name(no->name()));
     949                 :            :   else
     950                 :       2490 :     Expression::export_name(efb, no);
     951                 :      49874 : }
     952                 :            : 
     953                 :            : // Get the backend representation for a reference to a variable.
     954                 :            : 
     955                 :            : Bexpression*
     956                 :    3443130 : Var_expression::do_get_backend(Translate_context* context)
     957                 :            : {
     958                 :    3443130 :   Bvariable* bvar = this->variable_->get_backend_variable(context->gogo(),
     959                 :            :                                                           context->function());
     960                 :    3443130 :   bool is_in_heap;
     961                 :    3443130 :   Location loc = this->location();
     962                 :    3443130 :   Btype* btype;
     963                 :    3443130 :   Gogo* gogo = context->gogo();
     964                 :    3443130 :   if (this->variable_->is_variable())
     965                 :            :     {
     966                 :    2681910 :       is_in_heap = this->variable_->var_value()->is_in_heap();
     967                 :    2681910 :       btype = this->variable_->var_value()->type()->get_backend(gogo);
     968                 :            :     }
     969                 :     761217 :   else if (this->variable_->is_result_variable())
     970                 :            :     {
     971                 :     761217 :       is_in_heap = this->variable_->result_var_value()->is_in_heap();
     972                 :     761217 :       btype = this->variable_->result_var_value()->type()->get_backend(gogo);
     973                 :            :     }
     974                 :            :   else
     975                 :          0 :     go_unreachable();
     976                 :            : 
     977                 :    3443130 :   Bexpression* ret =
     978                 :    3443130 :       context->backend()->var_expression(bvar, loc);
     979                 :    3443130 :   if (is_in_heap)
     980                 :      57907 :     ret = context->backend()->indirect_expression(btype, ret, true, loc);
     981                 :    3443130 :   return ret;
     982                 :            : }
     983                 :            : 
     984                 :            : // Ast dump for variable expression.
     985                 :            : 
     986                 :            : void
     987                 :          0 : Var_expression::do_dump_expression(Ast_dump_context* ast_dump_context) const
     988                 :            : {
     989                 :          0 :   ast_dump_context->ostream() << this->variable_->message_name() ;
     990                 :          0 : }
     991                 :            : 
     992                 :            : // Make a reference to a variable in an expression.
     993                 :            : 
     994                 :            : Expression*
     995                 :    2949670 : Expression::make_var_reference(Named_object* var, Location location)
     996                 :            : {
     997                 :    2949670 :   if (var->is_sink())
     998                 :      15677 :     return Expression::make_sink(location);
     999                 :            : 
    1000                 :            :   // FIXME: Creating a new object for each reference to a variable is
    1001                 :            :   // wasteful.
    1002                 :    2933990 :   return new Var_expression(var, location);
    1003                 :            : }
    1004                 :            : 
    1005                 :            : // Class Enclosed_var_expression.
    1006                 :            : 
    1007                 :            : int
    1008                 :     575579 : Enclosed_var_expression::do_traverse(Traverse*)
    1009                 :            : {
    1010                 :     575579 :   return TRAVERSE_CONTINUE;
    1011                 :            : }
    1012                 :            : 
    1013                 :            : // Lower the reference to the enclosed variable.
    1014                 :            : 
    1015                 :            : Expression*
    1016                 :      69609 : Enclosed_var_expression::do_lower(Gogo* gogo, Named_object* function,
    1017                 :            :                                   Statement_inserter* inserter, int)
    1018                 :            : {
    1019                 :      69609 :   gogo->lower_expression(function, inserter, &this->reference_);
    1020                 :      69609 :   return this;
    1021                 :            : }
    1022                 :            : 
    1023                 :            : // Flatten the reference to the enclosed variable.
    1024                 :            : 
    1025                 :            : Expression*
    1026                 :      34521 : Enclosed_var_expression::do_flatten(Gogo* gogo, Named_object* function,
    1027                 :            :                                     Statement_inserter* inserter)
    1028                 :            : {
    1029                 :      34521 :   gogo->flatten_expression(function, inserter, &this->reference_);
    1030                 :      34521 :   return this;
    1031                 :            : }
    1032                 :            : 
    1033                 :            : void
    1034                 :       7576 : Enclosed_var_expression::do_address_taken(bool escapes)
    1035                 :            : {
    1036                 :       7576 :   if (!escapes)
    1037                 :            :     {
    1038                 :       3481 :       if (this->variable_->is_variable())
    1039                 :       3412 :         this->variable_->var_value()->set_non_escaping_address_taken();
    1040                 :         69 :       else if (this->variable_->is_result_variable())
    1041                 :         69 :         this->variable_->result_var_value()->set_non_escaping_address_taken();
    1042                 :            :       else
    1043                 :          0 :         go_unreachable();
    1044                 :            :     }
    1045                 :            :   else
    1046                 :            :     {
    1047                 :       4095 :       if (this->variable_->is_variable())
    1048                 :       4089 :         this->variable_->var_value()->set_address_taken();
    1049                 :          6 :       else if (this->variable_->is_result_variable())
    1050                 :          6 :         this->variable_->result_var_value()->set_address_taken();
    1051                 :            :       else
    1052                 :          0 :         go_unreachable();
    1053                 :            :     }
    1054                 :            : 
    1055                 :       7576 :   if (this->variable_->is_variable()
    1056                 :       7576 :       && this->variable_->var_value()->is_in_heap())
    1057                 :       5383 :     Node::make_node(this->variable_)->set_encoding(Node::ESCAPE_HEAP);
    1058                 :       7576 : }
    1059                 :            : 
    1060                 :            : // Ast dump for enclosed variable expression.
    1061                 :            : 
    1062                 :            : void
    1063                 :          0 : Enclosed_var_expression::do_dump_expression(Ast_dump_context* adc) const
    1064                 :            : {
    1065                 :          0 :   adc->ostream() << this->variable_->message_name();
    1066                 :          0 : }
    1067                 :            : 
    1068                 :            : // Make a reference to a variable within an enclosing function.
    1069                 :            : 
    1070                 :            : Expression*
    1071                 :      31626 : Expression::make_enclosing_var_reference(Expression* reference,
    1072                 :            :                                          Named_object* var, Location location)
    1073                 :            : {
    1074                 :      31626 :   return new Enclosed_var_expression(reference, var, location);
    1075                 :            : }
    1076                 :            : 
    1077                 :            : // Class Temporary_reference_expression.
    1078                 :            : 
    1079                 :            : // The type.
    1080                 :            : 
    1081                 :            : Type*
    1082                 :   16013600 : Temporary_reference_expression::do_type()
    1083                 :            : {
    1084                 :   16013600 :   return this->statement_->type();
    1085                 :            : }
    1086                 :            : 
    1087                 :            : // Called if something takes the address of this temporary variable.
    1088                 :            : // We never have to move temporary variables to the heap, but we do
    1089                 :            : // need to know that they must live in the stack rather than in a
    1090                 :            : // register.
    1091                 :            : 
    1092                 :            : void
    1093                 :      29463 : Temporary_reference_expression::do_address_taken(bool)
    1094                 :            : {
    1095                 :      29463 :   this->statement_->set_is_address_taken();
    1096                 :      29463 : }
    1097                 :            : 
    1098                 :            : // Export a reference to a temporary.
    1099                 :            : 
    1100                 :            : void
    1101                 :       5621 : Temporary_reference_expression::do_export(Export_function_body* efb) const
    1102                 :            : {
    1103                 :       5621 :   unsigned int idx = efb->temporary_index(this->statement_);
    1104                 :       5621 :   char buf[50];
    1105                 :       5621 :   snprintf(buf, sizeof buf, "$t%u", idx);
    1106                 :       5621 :   efb->write_c_string(buf);
    1107                 :       5621 : }
    1108                 :            : 
    1109                 :            : // Import a reference to a temporary.
    1110                 :            : 
    1111                 :            : Expression*
    1112                 :       2397 : Temporary_reference_expression::do_import(Import_function_body* ifb,
    1113                 :            :                                           Location loc)
    1114                 :            : {
    1115                 :       2397 :   std::string id = ifb->read_identifier();
    1116                 :       2397 :   go_assert(id[0] == '$' && id[1] == 't');
    1117                 :       2397 :   const char *p = id.c_str();
    1118                 :       2397 :   char *end;
    1119                 :       2397 :   long idx = strtol(p + 2, &end, 10);
    1120                 :       2397 :   if (*end != '\0' || idx > 0x7fffffff)
    1121                 :            :     {
    1122                 :          0 :       if (!ifb->saw_error())
    1123                 :          0 :         go_error_at(loc,
    1124                 :            :                     ("invalid export data for %qs: "
    1125                 :            :                      "invalid temporary reference index at %lu"),
    1126                 :          0 :                     ifb->name().c_str(),
    1127                 :          0 :                     static_cast<unsigned long>(ifb->off()));
    1128                 :          0 :       ifb->set_saw_error();
    1129                 :          0 :       return Expression::make_error(loc);
    1130                 :            :     }
    1131                 :            : 
    1132                 :       2397 :   Temporary_statement* temp =
    1133                 :       2397 :     ifb->temporary_statement(static_cast<unsigned int>(idx));
    1134                 :       2397 :   if (temp == NULL)
    1135                 :            :     {
    1136                 :          0 :       if (!ifb->saw_error())
    1137                 :          0 :         go_error_at(loc,
    1138                 :            :                     ("invalid export data for %qs: "
    1139                 :            :                      "undefined temporary reference index at %lu"),
    1140                 :          0 :                     ifb->name().c_str(),
    1141                 :          0 :                     static_cast<unsigned long>(ifb->off()));
    1142                 :          0 :       ifb->set_saw_error();
    1143                 :          0 :       return Expression::make_error(loc);
    1144                 :            :     }
    1145                 :            : 
    1146                 :       2397 :   return Expression::make_temporary_reference(temp, loc);
    1147                 :            : }
    1148                 :            : 
    1149                 :            : // Get a backend expression referring to the variable.
    1150                 :            : 
    1151                 :            : Bexpression*
    1152                 :    3347040 : Temporary_reference_expression::do_get_backend(Translate_context* context)
    1153                 :            : {
    1154                 :    3347040 :   Gogo* gogo = context->gogo();
    1155                 :    3347040 :   Bvariable* bvar = this->statement_->get_backend_variable(context);
    1156                 :    3347040 :   Bexpression* ret = gogo->backend()->var_expression(bvar, this->location());
    1157                 :            : 
    1158                 :            :   // The backend can't always represent the same set of recursive types
    1159                 :            :   // that the Go frontend can.  In some cases this means that a
    1160                 :            :   // temporary variable won't have the right backend type.  Correct
    1161                 :            :   // that here by adding a type cast.  We need to use base() to push
    1162                 :            :   // the circularity down one level.
    1163                 :    3347040 :   Type* stype = this->statement_->type();
    1164                 :    3347040 :   if (!this->is_lvalue_
    1165                 :    3269570 :       && stype->points_to() != NULL
    1166                 :    3786610 :       && stype->points_to()->is_void_type())
    1167                 :            :     {
    1168                 :      26607 :       Btype* btype = this->type()->base()->get_backend(gogo);
    1169                 :      26607 :       ret = gogo->backend()->convert_expression(btype, ret, this->location());
    1170                 :            :     }
    1171                 :    3347040 :   return ret;
    1172                 :            : }
    1173                 :            : 
    1174                 :            : // Ast dump for temporary reference.
    1175                 :            : 
    1176                 :            : void
    1177                 :          0 : Temporary_reference_expression::do_dump_expression(
    1178                 :            :                                 Ast_dump_context* ast_dump_context) const
    1179                 :            : {
    1180                 :          0 :   ast_dump_context->dump_temp_variable_name(this->statement_);
    1181                 :          0 : }
    1182                 :            : 
    1183                 :            : // Make a reference to a temporary variable.
    1184                 :            : 
    1185                 :            : Temporary_reference_expression*
    1186                 :    3418400 : Expression::make_temporary_reference(Temporary_statement* statement,
    1187                 :            :                                      Location location)
    1188                 :            : {
    1189                 :    3418400 :   statement->add_use();
    1190                 :    3418400 :   return new Temporary_reference_expression(statement, location);
    1191                 :            : }
    1192                 :            : 
    1193                 :            : // Class Set_and_use_temporary_expression.
    1194                 :            : 
    1195                 :            : // Return the type.
    1196                 :            : 
    1197                 :            : Type*
    1198                 :     254681 : Set_and_use_temporary_expression::do_type()
    1199                 :            : {
    1200                 :     254681 :   return this->statement_->type();
    1201                 :            : }
    1202                 :            : 
    1203                 :            : // Determine the type of the expression.
    1204                 :            : 
    1205                 :            : void
    1206                 :       4359 : Set_and_use_temporary_expression::do_determine_type(
    1207                 :            :     const Type_context* context)
    1208                 :            : {
    1209                 :       4359 :   this->expr_->determine_type(context);
    1210                 :       4359 : }
    1211                 :            : 
    1212                 :            : // Take the address.
    1213                 :            : 
    1214                 :            : void
    1215                 :          0 : Set_and_use_temporary_expression::do_address_taken(bool)
    1216                 :            : {
    1217                 :          0 :   this->statement_->set_is_address_taken();
    1218                 :          0 : }
    1219                 :            : 
    1220                 :            : // Return the backend representation.
    1221                 :            : 
    1222                 :            : Bexpression*
    1223                 :      12955 : Set_and_use_temporary_expression::do_get_backend(Translate_context* context)
    1224                 :            : {
    1225                 :      12955 :   Location loc = this->location();
    1226                 :      12955 :   Gogo* gogo = context->gogo();
    1227                 :      12955 :   Bvariable* bvar = this->statement_->get_backend_variable(context);
    1228                 :      12955 :   Bexpression* lvar_ref = gogo->backend()->var_expression(bvar, loc);
    1229                 :            : 
    1230                 :      12955 :   Named_object* fn = context->function();
    1231                 :      12955 :   go_assert(fn != NULL);
    1232                 :      12955 :   Bfunction* bfn = fn->func_value()->get_or_make_decl(gogo, fn);
    1233                 :      12955 :   Bexpression* bexpr = this->expr_->get_backend(context);
    1234                 :      12955 :   Bstatement* set = gogo->backend()->assignment_statement(bfn, lvar_ref,
    1235                 :      12955 :                                                           bexpr, loc);
    1236                 :      12955 :   Bexpression* var_ref = gogo->backend()->var_expression(bvar, loc);
    1237                 :      12955 :   Bexpression* ret = gogo->backend()->compound_expression(set, var_ref, loc);
    1238                 :      12955 :   return ret;
    1239                 :            : }
    1240                 :            : 
    1241                 :            : // Dump.
    1242                 :            : 
    1243                 :            : void
    1244                 :          0 : Set_and_use_temporary_expression::do_dump_expression(
    1245                 :            :     Ast_dump_context* ast_dump_context) const
    1246                 :            : {
    1247                 :          0 :   ast_dump_context->ostream() << '(';
    1248                 :          0 :   ast_dump_context->dump_temp_variable_name(this->statement_);
    1249                 :          0 :   ast_dump_context->ostream() << " = ";
    1250                 :          0 :   this->expr_->dump_expression(ast_dump_context);
    1251                 :          0 :   ast_dump_context->ostream() << ')';
    1252                 :          0 : }
    1253                 :            : 
    1254                 :            : // Make a set-and-use temporary.
    1255                 :            : 
    1256                 :            : Set_and_use_temporary_expression*
    1257                 :      14664 : Expression::make_set_and_use_temporary(Temporary_statement* statement,
    1258                 :            :                                        Expression* expr, Location location)
    1259                 :            : {
    1260                 :      14664 :   return new Set_and_use_temporary_expression(statement, expr, location);
    1261                 :            : }
    1262                 :            : 
    1263                 :            : // A sink expression--a use of the blank identifier _.
    1264                 :            : 
    1265                 :            : class Sink_expression : public Expression
    1266                 :            : {
    1267                 :            :  public:
    1268                 :      21606 :   Sink_expression(Location location)
    1269                 :      21606 :     : Expression(EXPRESSION_SINK, location),
    1270                 :      43212 :       type_(NULL), bvar_(NULL)
    1271                 :            :   { }
    1272                 :            : 
    1273                 :            :  protected:
    1274                 :            :   bool
    1275                 :          0 :   do_discarding_value()
    1276                 :          0 :   { return true; }
    1277                 :            : 
    1278                 :            :   Type*
    1279                 :            :   do_type();
    1280                 :            : 
    1281                 :            :   void
    1282                 :            :   do_determine_type(const Type_context*);
    1283                 :            : 
    1284                 :            :   Expression*
    1285                 :          0 :   do_copy()
    1286                 :          0 :   { return new Sink_expression(this->location()); }
    1287                 :            : 
    1288                 :            :   Bexpression*
    1289                 :            :   do_get_backend(Translate_context*);
    1290                 :            : 
    1291                 :            :   void
    1292                 :            :   do_dump_expression(Ast_dump_context*) const;
    1293                 :            : 
    1294                 :            :  private:
    1295                 :            :   // The type of this sink variable.
    1296                 :            :   Type* type_;
    1297                 :            :   // The temporary variable we generate.
    1298                 :            :   Bvariable* bvar_;
    1299                 :            : };
    1300                 :            : 
    1301                 :            : // Return the type of a sink expression.
    1302                 :            : 
    1303                 :            : Type*
    1304                 :     102000 : Sink_expression::do_type()
    1305                 :            : {
    1306                 :     102000 :   if (this->type_ == NULL)
    1307                 :     102000 :     return Type::make_sink_type();
    1308                 :            :   return this->type_;
    1309                 :            : }
    1310                 :            : 
    1311                 :            : // Determine the type of a sink expression.
    1312                 :            : 
    1313                 :            : void
    1314                 :       4921 : Sink_expression::do_determine_type(const Type_context* context)
    1315                 :            : {
    1316                 :       4921 :   if (context->type != NULL)
    1317                 :          0 :     this->type_ = context->type;
    1318                 :       4921 : }
    1319                 :            : 
    1320                 :            : // Return a temporary variable for a sink expression.  This will
    1321                 :            : // presumably be a write-only variable which the middle-end will drop.
    1322                 :            : 
    1323                 :            : Bexpression*
    1324                 :          0 : Sink_expression::do_get_backend(Translate_context* context)
    1325                 :            : {
    1326                 :          0 :   Location loc = this->location();
    1327                 :          0 :   Gogo* gogo = context->gogo();
    1328                 :          0 :   if (this->bvar_ == NULL)
    1329                 :            :     {
    1330                 :          0 :       go_assert(this->type_ != NULL && !this->type_->is_sink_type());
    1331                 :          0 :       Named_object* fn = context->function();
    1332                 :          0 :       go_assert(fn != NULL);
    1333                 :          0 :       Bfunction* fn_ctx = fn->func_value()->get_or_make_decl(gogo, fn);
    1334                 :          0 :       Btype* bt = this->type_->get_backend(context->gogo());
    1335                 :          0 :       Bstatement* decl;
    1336                 :          0 :       this->bvar_ =
    1337                 :          0 :         gogo->backend()->temporary_variable(fn_ctx, context->bblock(), bt, NULL,
    1338                 :          0 :                                             false, loc, &decl);
    1339                 :          0 :       Bexpression* var_ref =
    1340                 :          0 :           gogo->backend()->var_expression(this->bvar_, loc);
    1341                 :          0 :       var_ref = gogo->backend()->compound_expression(decl, var_ref, loc);
    1342                 :          0 :       return var_ref;
    1343                 :            :     }
    1344                 :          0 :   return gogo->backend()->var_expression(this->bvar_, loc);
    1345                 :            : }
    1346                 :            : 
    1347                 :            : // Ast dump for sink expression.
    1348                 :            : 
    1349                 :            : void
    1350                 :          0 : Sink_expression::do_dump_expression(Ast_dump_context* ast_dump_context) const
    1351                 :            : {
    1352                 :          0 :   ast_dump_context->ostream() << "_" ;
    1353                 :          0 : }
    1354                 :            : 
    1355                 :            : // Make a sink expression.
    1356                 :            : 
    1357                 :            : Expression*
    1358                 :      21606 : Expression::make_sink(Location location)
    1359                 :            : {
    1360                 :      21606 :   return new Sink_expression(location);
    1361                 :            : }
    1362                 :            : 
    1363                 :            : // Class Func_expression.
    1364                 :            : 
    1365                 :            : // FIXME: Can a function expression appear in a constant expression?
    1366                 :            : // The value is unchanging.  Initializing a constant to the address of
    1367                 :            : // a function seems like it could work, though there might be little
    1368                 :            : // point to it.
    1369                 :            : 
    1370                 :            : // Traversal.
    1371                 :            : 
    1372                 :            : int
    1373                 :   11787500 : Func_expression::do_traverse(Traverse* traverse)
    1374                 :            : {
    1375                 :   11787500 :   return (this->closure_ == NULL
    1376                 :   11787500 :           ? TRAVERSE_CONTINUE
    1377                 :     167802 :           : Expression::traverse(&this->closure_, traverse));
    1378                 :            : }
    1379                 :            : 
    1380                 :            : // Return the type of a function expression.
    1381                 :            : 
    1382                 :            : Type*
    1383                 :   22513800 : Func_expression::do_type()
    1384                 :            : {
    1385                 :   22513800 :   if (this->function_->is_function())
    1386                 :   10527500 :     return this->function_->func_value()->type();
    1387                 :   11986300 :   else if (this->function_->is_function_declaration())
    1388                 :   11986300 :     return this->function_->func_declaration_value()->type();
    1389                 :            :   else
    1390                 :          0 :     go_unreachable();
    1391                 :            : }
    1392                 :            : 
    1393                 :            : // Get the backend representation for the code of a function expression.
    1394                 :            : 
    1395                 :            : Bexpression*
    1396                 :    1768700 : Func_expression::get_code_pointer(Gogo* gogo, Named_object* no, Location loc)
    1397                 :            : {
    1398                 :    1768700 :   Function_type* fntype;
    1399                 :    1768700 :   if (no->is_function())
    1400                 :     514940 :     fntype = no->func_value()->type();
    1401                 :    1253760 :   else if (no->is_function_declaration())
    1402                 :    1253760 :     fntype = no->func_declaration_value()->type();
    1403                 :            :   else
    1404                 :          0 :     go_unreachable();
    1405                 :            : 
    1406                 :            :   // Builtin functions are handled specially by Call_expression.  We
    1407                 :            :   // can't take their address.
    1408                 :    1768700 :   if (fntype->is_builtin())
    1409                 :            :     {
    1410                 :          0 :       go_error_at(loc,
    1411                 :            :                   ("invalid use of special built-in function %qs; "
    1412                 :            :                    "must be called"),
    1413                 :          0 :                   no->message_name().c_str());
    1414                 :          0 :       return gogo->backend()->error_expression();
    1415                 :            :     }
    1416                 :            : 
    1417                 :    1768700 :   Bfunction* fndecl;
    1418                 :    1768700 :   if (no->is_function())
    1419                 :     514940 :     fndecl = no->func_value()->get_or_make_decl(gogo, no);
    1420                 :    1253760 :   else if (no->is_function_declaration())
    1421                 :    1253760 :     fndecl = no->func_declaration_value()->get_or_make_decl(gogo, no);
    1422                 :            :   else
    1423                 :          0 :     go_unreachable();
    1424                 :            : 
    1425                 :    1768700 :   return gogo->backend()->function_code_expression(fndecl, loc);
    1426                 :            : }
    1427                 :            : 
    1428                 :            : // Get the backend representation for a function expression.  This is used when
    1429                 :            : // we take the address of a function rather than simply calling it.  A func
    1430                 :            : // value is represented as a pointer to a block of memory.  The first
    1431                 :            : // word of that memory is a pointer to the function code.  The
    1432                 :            : // remaining parts of that memory are the addresses of variables that
    1433                 :            : // the function closes over.
    1434                 :            : 
    1435                 :            : Bexpression*
    1436                 :     135301 : Func_expression::do_get_backend(Translate_context* context)
    1437                 :            : {
    1438                 :            :   // If there is no closure, just use the function descriptor.
    1439                 :     135301 :   if (this->closure_ == NULL)
    1440                 :            :     {
    1441                 :     125223 :       Gogo* gogo = context->gogo();
    1442                 :     125223 :       Named_object* no = this->function_;
    1443                 :     125223 :       Expression* descriptor;
    1444                 :     125223 :       if (no->is_function())
    1445                 :      34692 :         descriptor = no->func_value()->descriptor(gogo, no);
    1446                 :      90531 :       else if (no->is_function_declaration())
    1447                 :            :         {
    1448                 :      90531 :           if (no->func_declaration_value()->type()->is_builtin())
    1449                 :            :             {
    1450                 :          1 :               go_error_at(this->location(),
    1451                 :            :                           ("invalid use of special built-in function %qs; "
    1452                 :            :                            "must be called"),
    1453                 :          1 :                           no->message_name().c_str());
    1454                 :          1 :               return gogo->backend()->error_expression();
    1455                 :            :             }
    1456                 :      90530 :           descriptor = no->func_declaration_value()->descriptor(gogo, no);
    1457                 :            :         }
    1458                 :            :       else
    1459                 :          0 :         go_unreachable();
    1460                 :            : 
    1461                 :     125222 :       Bexpression* bdesc = descriptor->get_backend(context);
    1462                 :     125222 :       return gogo->backend()->address_expression(bdesc, this->location());
    1463                 :            :     }
    1464                 :            : 
    1465                 :      10078 :   go_assert(this->function_->func_value()->enclosing() != NULL);
    1466                 :            : 
    1467                 :            :   // If there is a closure, then the closure is itself the function
    1468                 :            :   // expression.  It is a pointer to a struct whose first field points
    1469                 :            :   // to the function code and whose remaining fields are the addresses
    1470                 :            :   // of the closed-over variables.
    1471                 :      10078 :   Bexpression *bexpr = this->closure_->get_backend(context);
    1472                 :            : 
    1473                 :            :   // Introduce a backend type conversion, to account for any differences
    1474                 :            :   // between the argument type (function descriptor, struct with a
    1475                 :            :   // single field) and the closure (struct with multiple fields).
    1476                 :      10078 :   Gogo* gogo = context->gogo();
    1477                 :      10078 :   Btype *btype = this->type()->get_backend(gogo);
    1478                 :      10078 :   return gogo->backend()->convert_expression(btype, bexpr, this->location());
    1479                 :            : }
    1480                 :            : 
    1481                 :            : // The cost of inlining a function reference.
    1482                 :            : 
    1483                 :            : int
    1484                 :     451965 : Func_expression::do_inlining_cost() const
    1485                 :            : {
    1486                 :            :   // FIXME: We don't inline references to nested functions.
    1487                 :     451965 :   if (this->closure_ != NULL)
    1488                 :            :     return 0x100000;
    1489                 :     446168 :   if (this->function_->is_function()
    1490                 :     446168 :       && this->function_->func_value()->enclosing() != NULL)
    1491                 :       1232 :     return 0x100000;
    1492                 :            : 
    1493                 :            :   return 1;
    1494                 :            : }
    1495                 :            : 
    1496                 :            : // Export a reference to a function.
    1497                 :            : 
    1498                 :            : void
    1499                 :      10235 : Func_expression::do_export(Export_function_body* efb) const
    1500                 :            : {
    1501                 :      10235 :   Expression::export_name(efb, this->function_);
    1502                 :      10235 : }
    1503                 :            : 
    1504                 :            : // Ast dump for function.
    1505                 :            : 
    1506                 :            : void
    1507                 :          0 : Func_expression::do_dump_expression(Ast_dump_context* ast_dump_context) const
    1508                 :            : {
    1509                 :          0 :   ast_dump_context->ostream() << this->function_->name();
    1510                 :          0 :   if (this->closure_ != NULL)
    1511                 :            :     {
    1512                 :          0 :       ast_dump_context->ostream() << " {closure =  ";
    1513                 :          0 :       this->closure_->dump_expression(ast_dump_context);
    1514                 :          0 :       ast_dump_context->ostream() << "}";
    1515                 :            :     }
    1516                 :          0 : }
    1517                 :            : 
    1518                 :            : // Make a reference to a function in an expression.
    1519                 :            : 
    1520                 :            : Expression*
    1521                 :    1818510 : Expression::make_func_reference(Named_object* function, Expression* closure,
    1522                 :            :                                 Location location)
    1523                 :            : {
    1524                 :    1818510 :   Func_expression* fe = new Func_expression(function, closure, location);
    1525                 :            : 
    1526                 :            :   // Detect references to builtin functions and set the runtime code if
    1527                 :            :   // appropriate.
    1528                 :    1818510 :   if (function->is_function_declaration())
    1529                 :    1507580 :     fe->set_runtime_code(Runtime::name_to_code(function->name()));
    1530                 :    1818510 :   return fe;
    1531                 :            : }
    1532                 :            : 
    1533                 :            : // Class Func_descriptor_expression.
    1534                 :            : 
    1535                 :            : // Constructor.
    1536                 :            : 
    1537                 :     220169 : Func_descriptor_expression::Func_descriptor_expression(Named_object* fn)
    1538                 :            :   : Expression(EXPRESSION_FUNC_DESCRIPTOR, fn->location()),
    1539                 :     220169 :     fn_(fn), dvar_(NULL)
    1540                 :            : {
    1541                 :     220169 :   go_assert(!fn->is_function() || !fn->func_value()->needs_closure());
    1542                 :     220169 : }
    1543                 :            : 
    1544                 :            : // Traversal.
    1545                 :            : 
    1546                 :            : int
    1547                 :          0 : Func_descriptor_expression::do_traverse(Traverse*)
    1548                 :            : {
    1549                 :          0 :   return TRAVERSE_CONTINUE;
    1550                 :            : }
    1551                 :            : 
    1552                 :            : // All function descriptors have the same type.
    1553                 :            : 
    1554                 :            : Type* Func_descriptor_expression::descriptor_type;
    1555                 :            : 
    1556                 :            : void
    1557                 :     343683 : Func_descriptor_expression::make_func_descriptor_type()
    1558                 :            : {
    1559                 :     343683 :   if (Func_descriptor_expression::descriptor_type != NULL)
    1560                 :            :     return;
    1561                 :       3372 :   Type* uintptr_type = Type::lookup_integer_type("uintptr");
    1562                 :       3372 :   Type* struct_type = Type::make_builtin_struct_type(1, "fn", uintptr_type);
    1563                 :       3372 :   Func_descriptor_expression::descriptor_type =
    1564                 :       3372 :     Type::make_builtin_named_type("functionDescriptor", struct_type);
    1565                 :            : }
    1566                 :            : 
    1567                 :            : Type*
    1568                 :     340311 : Func_descriptor_expression::do_type()
    1569                 :            : {
    1570                 :     340311 :   Func_descriptor_expression::make_func_descriptor_type();
    1571                 :     340311 :   return Func_descriptor_expression::descriptor_type;
    1572                 :            : }
    1573                 :            : 
    1574                 :            : // The backend representation for a function descriptor.
    1575                 :            : 
    1576                 :            : Bexpression*
    1577                 :     255152 : Func_descriptor_expression::do_get_backend(Translate_context* context)
    1578                 :            : {
    1579                 :     255152 :   Named_object* no = this->fn_;
    1580                 :     255152 :   Location loc = no->location();
    1581                 :     255152 :   if (this->dvar_ != NULL)
    1582                 :      34989 :     return context->backend()->var_expression(this->dvar_, loc);
    1583                 :            : 
    1584                 :     220163 :   Gogo* gogo = context->gogo();
    1585                 :     220163 :   std::string var_name(gogo->function_descriptor_name(no));
    1586                 :     220163 :   bool is_descriptor = false;
    1587                 :     220163 :   if (no->is_function_declaration()
    1588                 :      90768 :       && !no->func_declaration_value()->asm_name().empty()
    1589                 :     296941 :       && Linemap::is_predeclared_location(no->location()))
    1590                 :            :     is_descriptor = true;
    1591                 :            : 
    1592                 :            :   // The runtime package implements some functions defined in the
    1593                 :            :   // syscall package.  Let the syscall package define the descriptor
    1594                 :            :   // in this case.
    1595                 :     220163 :   if (gogo->compiling_runtime()
    1596                 :      18647 :       && gogo->package_name() == "runtime"
    1597                 :      12878 :       && no->is_function()
    1598                 :       4990 :       && !no->func_value()->asm_name().empty()
    1599                 :     220212 :       && no->func_value()->asm_name().compare(0, 8, "syscall.") == 0)
    1600                 :            :     is_descriptor = true;
    1601                 :            : 
    1602                 :     220163 :   Btype* btype = this->type()->get_backend(gogo);
    1603                 :            : 
    1604                 :     220163 :   Bvariable* bvar;
    1605                 :     440326 :   std::string asm_name(go_selectively_encode_id(var_name));
    1606                 :     220163 :   if (no->package() != NULL || is_descriptor)
    1607                 :     100015 :     bvar = context->backend()->immutable_struct_reference(var_name, asm_name,
    1608                 :     100015 :                                                           btype, loc);
    1609                 :            :   else
    1610                 :            :     {
    1611                 :     120148 :       Location bloc = Linemap::predeclared_location();
    1612                 :            : 
    1613                 :            :       // The runtime package has hash/equality functions that are
    1614                 :            :       // referenced by type descriptors outside of the runtime, so the
    1615                 :            :       // function descriptors must be visible even though they are not
    1616                 :            :       // exported.
    1617                 :     120148 :       bool is_exported_runtime = false;
    1618                 :     120148 :       if (gogo->compiling_runtime()
    1619                 :       7901 :           && gogo->package_name() == "runtime"
    1620                 :     125102 :           && (no->name().find("hash") != std::string::npos
    1621                 :       4849 :               || no->name().find("equal") != std::string::npos))
    1622                 :            :         is_exported_runtime = true;
    1623                 :            : 
    1624                 :     120148 :       bool is_referenced_by_inline =
    1625                 :     120148 :         no->is_function() && no->func_value()->is_referenced_by_inline();
    1626                 :            : 
    1627                 :     120148 :       bool is_hidden = ((no->is_function()
    1628                 :     119613 :                          && no->func_value()->enclosing() != NULL)
    1629                 :     110531 :                         || (Gogo::is_hidden_name(no->name())
    1630                 :            :                             && !is_exported_runtime
    1631                 :      65535 :                             && !is_referenced_by_inline)
    1632                 :     165758 :                         || Gogo::is_thunk(no));
    1633                 :            : 
    1634                 :     120148 :       bvar = context->backend()->immutable_struct(var_name, asm_name,
    1635                 :            :                                                   is_hidden, false,
    1636                 :     120148 :                                                   btype, bloc);
    1637                 :     120148 :       Expression_list* vals = new Expression_list();
    1638                 :     120148 :       vals->push_back(Expression::make_func_code_reference(this->fn_, bloc));
    1639                 :     120148 :       Expression* init =
    1640                 :     120148 :         Expression::make_struct_composite_literal(this->type(), vals, bloc);
    1641                 :     120148 :       Translate_context bcontext(gogo, NULL, NULL, NULL);
    1642                 :     120148 :       bcontext.set_is_const();
    1643                 :     120148 :       Bexpression* binit = init->get_backend(&bcontext);
    1644                 :     120148 :       context->backend()->immutable_struct_set_init(bvar, var_name, is_hidden,
    1645                 :     120148 :                                                     false, btype, bloc, binit);
    1646                 :            :     }
    1647                 :            : 
    1648                 :     220163 :   this->dvar_ = bvar;
    1649                 :     220163 :   return gogo->backend()->var_expression(bvar, loc);
    1650                 :            : }
    1651                 :            : 
    1652                 :            : // Print a function descriptor expression.
    1653                 :            : 
    1654                 :            : void
    1655                 :          0 : Func_descriptor_expression::do_dump_expression(Ast_dump_context* context) const
    1656                 :            : {
    1657                 :          0 :   context->ostream() << "[descriptor " << this->fn_->name() << "]";
    1658                 :          0 : }
    1659                 :            : 
    1660                 :            : // Make a function descriptor expression.
    1661                 :            : 
    1662                 :            : Func_descriptor_expression*
    1663                 :     220169 : Expression::make_func_descriptor(Named_object* fn)
    1664                 :            : {
    1665                 :     220169 :   return new Func_descriptor_expression(fn);
    1666                 :            : }
    1667                 :            : 
    1668                 :            : // Make the function descriptor type, so that it can be converted.
    1669                 :            : 
    1670                 :            : void
    1671                 :       3372 : Expression::make_func_descriptor_type()
    1672                 :            : {
    1673                 :       3372 :   Func_descriptor_expression::make_func_descriptor_type();
    1674                 :       3372 : }
    1675                 :            : 
    1676                 :            : // A reference to just the code of a function.
    1677                 :            : 
    1678                 :            : class Func_code_reference_expression : public Expression
    1679                 :            : {
    1680                 :            :  public:
    1681                 :    1922220 :   Func_code_reference_expression(Named_object* function, Location location)
    1682                 :    1922220 :     : Expression(EXPRESSION_FUNC_CODE_REFERENCE, location),
    1683                 :    3844440 :       function_(function)
    1684                 :            :   { }
    1685                 :            : 
    1686                 :            :  protected:
    1687                 :            :   int
    1688                 :     161956 :   do_traverse(Traverse*)
    1689                 :     161956 :   { return TRAVERSE_CONTINUE; }
    1690                 :            : 
    1691                 :            :   bool
    1692                 :     284330 :   do_is_static_initializer() const
    1693                 :     284330 :   { return true; }
    1694                 :            : 
    1695                 :            :   Type*
    1696                 :     426647 :   do_type()
    1697                 :     426647 :   { return Type::make_pointer_type(Type::make_void_type()); }
    1698                 :            : 
    1699                 :            :   void
    1700                 :      10710 :   do_determine_type(const Type_context*)
    1701                 :      10710 :   { }
    1702                 :            : 
    1703                 :            :   Expression*
    1704                 :          0 :   do_copy()
    1705                 :            :   {
    1706                 :          0 :     return Expression::make_func_code_reference(this->function_,
    1707                 :          0 :                                                 this->location());
    1708                 :            :   }
    1709                 :            : 
    1710                 :            :   Bexpression*
    1711                 :            :   do_get_backend(Translate_context*);
    1712                 :            : 
    1713                 :            :   void
    1714                 :          0 :   do_dump_expression(Ast_dump_context* context) const
    1715                 :          0 :   { context->ostream() << "[raw " << this->function_->name() << "]" ; }
    1716                 :            : 
    1717                 :            :  private:
    1718                 :            :   // The function.
    1719                 :            :   Named_object* function_;
    1720                 :            : };
    1721                 :            : 
    1722                 :            : // Get the backend representation for a reference to function code.
    1723                 :            : 
    1724                 :            : Bexpression*
    1725                 :    1768700 : Func_code_reference_expression::do_get_backend(Translate_context* context)
    1726                 :            : {
    1727                 :    1768700 :   return Func_expression::get_code_pointer(context->gogo(), this->function_,
    1728                 :    1768700 :                                            this->location());
    1729                 :            : }
    1730                 :            : 
    1731                 :            : // Make a reference to the code of a function.
    1732                 :            : 
    1733                 :            : Expression*
    1734                 :    1922220 : Expression::make_func_code_reference(Named_object* function, Location location)
    1735                 :            : {
    1736                 :    1922220 :   return new Func_code_reference_expression(function, location);
    1737                 :            : }
    1738                 :            : 
    1739                 :            : // Class Unknown_expression.
    1740                 :            : 
    1741                 :            : // Return the name of an unknown expression.
    1742                 :            : 
    1743                 :            : const std::string&
    1744                 :       4564 : Unknown_expression::name() const
    1745                 :            : {
    1746                 :       4564 :   return this->named_object_->name();
    1747                 :            : }
    1748                 :            : 
    1749                 :            : // Lower a reference to an unknown name.
    1750                 :            : 
    1751                 :            : Expression*
    1752                 :     489091 : Unknown_expression::do_lower(Gogo*, Named_object*, Statement_inserter*, int)
    1753                 :            : {
    1754                 :     489091 :   Location location = this->location();
    1755                 :     489091 :   Named_object* no = this->named_object_;
    1756                 :     489091 :   Named_object* real;
    1757                 :     489091 :   if (!no->is_unknown())
    1758                 :            :     real = no;
    1759                 :            :   else
    1760                 :            :     {
    1761                 :     488577 :       real = no->unknown_value()->real_named_object();
    1762                 :     488577 :       if (real == NULL)
    1763                 :            :         {
    1764                 :         32 :           if (!this->no_error_message_)
    1765                 :         31 :             go_error_at(location, "reference to undefined name %qs",
    1766                 :         62 :                         this->named_object_->message_name().c_str());
    1767                 :         32 :           return Expression::make_error(location);
    1768                 :            :         }
    1769                 :            :     }
    1770                 :     489059 :   switch (real->classification())
    1771                 :            :     {
    1772                 :     220920 :     case Named_object::NAMED_OBJECT_CONST:
    1773                 :     220920 :       return Expression::make_const_reference(real, location);
    1774                 :      73007 :     case Named_object::NAMED_OBJECT_TYPE:
    1775                 :      73007 :       return Expression::make_type(real->type_value(), location);
    1776                 :          0 :     case Named_object::NAMED_OBJECT_TYPE_DECLARATION:
    1777                 :          0 :       if (!this->no_error_message_)
    1778                 :          0 :         go_error_at(location, "reference to undefined type %qs",
    1779                 :          0 :                     real->message_name().c_str());
    1780                 :          0 :       return Expression::make_error(location);
    1781                 :      19113 :     case Named_object::NAMED_OBJECT_VAR:
    1782                 :      19113 :       real->var_value()->set_is_used();
    1783                 :      19113 :       return Expression::make_var_reference(real, location);
    1784                 :     176019 :     case Named_object::NAMED_OBJECT_FUNC:
    1785                 :     176019 :     case Named_object::NAMED_OBJECT_FUNC_DECLARATION:
    1786                 :     176019 :       return Expression::make_func_reference(real, NULL, location);
    1787                 :          0 :     case Named_object::NAMED_OBJECT_PACKAGE:
    1788                 :          0 :       if (!this->no_error_message_)
    1789                 :          0 :         go_error_at(location, "unexpected reference to package");
    1790                 :          0 :       return Expression::make_error(location);
    1791                 :          0 :     default:
    1792                 :          0 :       go_unreachable();
    1793                 :            :     }
    1794                 :            : }
    1795                 :            : 
    1796                 :            : // Dump the ast representation for an unknown expression to a dump context.
    1797                 :            : 
    1798                 :            : void
    1799                 :          0 : Unknown_expression::do_dump_expression(Ast_dump_context* ast_dump_context) const
    1800                 :            : {
    1801                 :          0 :   ast_dump_context->ostream() << "_Unknown_(" << this->named_object_->name()
    1802                 :          0 :                               << ")";
    1803                 :          0 : }
    1804                 :            : 
    1805                 :            : // Make a reference to an unknown name.
    1806                 :            : 
    1807                 :            : Unknown_expression*
    1808                 :     499376 : Expression::make_unknown_reference(Named_object* no, Location location)
    1809                 :            : {
    1810                 :     499376 :   return new Unknown_expression(no, location);
    1811                 :            : }
    1812                 :            : 
    1813                 :            : // A boolean expression.
    1814                 :            : 
    1815                 :            : class Boolean_expression : public Expression
    1816                 :            : {
    1817                 :            :  public:
    1818                 :     515144 :   Boolean_expression(bool val, Location location)
    1819                 :     515144 :     : Expression(EXPRESSION_BOOLEAN, location),
    1820                 :    1030290 :       val_(val), type_(NULL)
    1821                 :            :   { }
    1822                 :            : 
    1823                 :            :   static Expression*
    1824                 :            :   do_import(Import_expression*, Location);
    1825                 :            : 
    1826                 :            :  protected:
    1827                 :            :   int
    1828                 :            :   do_traverse(Traverse*);
    1829                 :            : 
    1830                 :            :   bool
    1831                 :       3261 :   do_is_constant() const
    1832                 :       3261 :   { return true; }
    1833                 :            : 
    1834                 :            :   bool
    1835                 :          0 :   do_is_zero_value() const
    1836                 :          0 :   { return this->val_ == false; }
    1837                 :            : 
    1838                 :            :   bool
    1839                 :       6829 :   do_boolean_constant_value(bool* val) const
    1840                 :            :   {
    1841                 :       6829 :     *val = this->val_;
    1842                 :       6829 :     return true;
    1843                 :            :   }
    1844                 :            : 
    1845                 :            :   bool
    1846                 :         22 :   do_is_static_initializer() const
    1847                 :         22 :   { return true; }
    1848                 :            : 
    1849                 :            :   Type*
    1850                 :            :   do_type();
    1851                 :            : 
    1852                 :            :   void
    1853                 :            :   do_determine_type(const Type_context*);
    1854                 :            : 
    1855                 :            :   Expression*
    1856                 :          0 :   do_copy()
    1857                 :          0 :   { return this; }
    1858                 :            : 
    1859                 :            :   Bexpression*
    1860                 :     567154 :   do_get_backend(Translate_context* context)
    1861                 :     567154 :   { return context->backend()->boolean_constant_expression(this->val_); }
    1862                 :            : 
    1863                 :            :   int
    1864                 :      36474 :   do_inlining_cost() const
    1865                 :      36474 :   { return 1; }
    1866                 :            : 
    1867                 :            :   void
    1868                 :       3346 :   do_export(Export_function_body* efb) const
    1869                 :       5061 :   { efb->write_c_string(this->val_ ? "$true" : "$false"); }
    1870                 :            : 
    1871                 :            :   void
    1872                 :          0 :   do_dump_expression(Ast_dump_context* ast_dump_context) const
    1873                 :          0 :   { ast_dump_context->ostream() << (this->val_ ? "true" : "false"); }
    1874                 :            : 
    1875                 :            :  private:
    1876                 :            :   // The constant.
    1877                 :            :   bool val_;
    1878                 :            :   // The type as determined by context.
    1879                 :            :   Type* type_;
    1880                 :            : };
    1881                 :            : 
    1882                 :            : // Traverse a boolean expression.  We just need to traverse the type
    1883                 :            : // if there is one.
    1884                 :            : 
    1885                 :            : int
    1886                 :    1099870 : Boolean_expression::do_traverse(Traverse* traverse)
    1887                 :            : {
    1888                 :    1099870 :   if (this->type_ != NULL)
    1889                 :     845610 :     return Type::traverse(this->type_, traverse);
    1890                 :            :   return TRAVERSE_CONTINUE;
    1891                 :            : }
    1892                 :            : 
    1893                 :            : // Get the type.
    1894                 :            : 
    1895                 :            : Type*
    1896                 :    1441570 : Boolean_expression::do_type()
    1897                 :            : {
    1898                 :    1441570 :   if (this->type_ == NULL)
    1899                 :     451400 :     this->type_ = Type::make_boolean_type();
    1900                 :    1441570 :   return this->type_;
    1901                 :            : }
    1902                 :            : 
    1903                 :            : // Set the type from the context.
    1904                 :            : 
    1905                 :            : void
    1906                 :      70370 : Boolean_expression::do_determine_type(const Type_context* context)
    1907                 :            : {
    1908                 :      70370 :   if (this->type_ != NULL && !this->type_->is_abstract())
    1909                 :            :     ;
    1910                 :      70179 :   else if (context->type != NULL && context->type->is_boolean_type())
    1911                 :      69914 :     this->type_ = context->type;
    1912                 :        265 :   else if (!context->may_be_abstract)
    1913                 :         30 :     this->type_ = Type::lookup_bool_type();
    1914                 :      70370 : }
    1915                 :            : 
    1916                 :            : // Import a boolean constant.
    1917                 :            : 
    1918                 :            : Expression*
    1919                 :       1765 : Boolean_expression::do_import(Import_expression* imp, Location loc)
    1920                 :            : {
    1921                 :       1765 :   if (imp->version() >= EXPORT_FORMAT_V3)
    1922                 :       1765 :     imp->require_c_string("$");
    1923                 :       1765 :   if (imp->peek_char() == 't')
    1924                 :            :     {
    1925                 :        850 :       imp->require_c_string("true");
    1926                 :        850 :       return Expression::make_boolean(true, loc);
    1927                 :            :     }
    1928                 :            :   else
    1929                 :            :     {
    1930                 :        915 :       imp->require_c_string("false");
    1931                 :        915 :       return Expression::make_boolean(false, loc);
    1932                 :            :     }
    1933                 :            : }
    1934                 :            : 
    1935                 :            : // Make a boolean expression.
    1936                 :            : 
    1937                 :            : Expression*
    1938                 :     515144 : Expression::make_boolean(bool val, Location location)
    1939                 :            : {
    1940                 :     515144 :   return new Boolean_expression(val, location);
    1941                 :            : }
    1942                 :            : 
    1943                 :            : // Class String_expression.
    1944                 :            : 
    1945                 :            : // Traverse a string expression.  We just need to traverse the type
    1946                 :            : // if there is one.
    1947                 :            : 
    1948                 :            : int
    1949                 :    6418630 : String_expression::do_traverse(Traverse* traverse)
    1950                 :            : {
    1951                 :    6418630 :   if (this->type_ != NULL)
    1952                 :    5697840 :     return Type::traverse(this->type_, traverse);
    1953                 :            :   return TRAVERSE_CONTINUE;
    1954                 :            : }
    1955                 :            : 
    1956                 :            : // Get the type.
    1957                 :            : 
    1958                 :            : Type*
    1959                 :    4999390 : String_expression::do_type()
    1960                 :            : {
    1961                 :    4999390 :   if (this->type_ == NULL)
    1962                 :     900330 :     this->type_ = Type::make_string_type();
    1963                 :    4999390 :   return this->type_;
    1964                 :            : }
    1965                 :            : 
    1966                 :            : // Set the type from the context.
    1967                 :            : 
    1968                 :            : void
    1969                 :     365830 : String_expression::do_determine_type(const Type_context* context)
    1970                 :            : {
    1971                 :     365830 :   if (this->type_ != NULL && !this->type_->is_abstract())
    1972                 :            :     ;
    1973                 :     346412 :   else if (context->type != NULL && context->type->is_string_type())
    1974                 :     310534 :     this->type_ = context->type;
    1975                 :      35878 :   else if (!context->may_be_abstract)
    1976                 :      21004 :     this->type_ = Type::lookup_string_type();
    1977                 :     365830 : }
    1978                 :            : 
    1979                 :            : // Build a string constant.
    1980                 :            : 
    1981                 :            : Bexpression*
    1982                 :     944196 : String_expression::do_get_backend(Translate_context* context)
    1983                 :            : {
    1984                 :     944196 :   Gogo* gogo = context->gogo();
    1985                 :     944196 :   Btype* btype = Type::make_string_type()->get_backend(gogo);
    1986                 :            : 
    1987                 :     944196 :   Location loc = this->location();
    1988                 :     944196 :   std::vector<Bexpression*> init(2);
    1989                 :     944196 :   Bexpression* str_cst =
    1990                 :     944196 :       gogo->backend()->string_constant_expression(this->val_);
    1991                 :     944196 :   init[0] = gogo->backend()->address_expression(str_cst, loc);
    1992                 :            : 
    1993                 :     944196 :   Btype* int_btype = Type::lookup_integer_type("int")->get_backend(gogo);
    1994                 :     944196 :   mpz_t lenval;
    1995                 :     944196 :   mpz_init_set_ui(lenval, this->val_.length());
    1996                 :     944196 :   init[1] = gogo->backend()->integer_constant_expression(int_btype, lenval);
    1997                 :     944196 :   mpz_clear(lenval);
    1998                 :            : 
    1999                 :     944196 :   return gogo->backend()->constructor_expression(btype, init, loc);
    2000                 :            : }
    2001                 :            : 
    2002                 :            :  // Write string literal to string dump.
    2003                 :            : 
    2004                 :            : void
    2005                 :       5475 : String_expression::export_string(String_dump* exp,
    2006                 :            :                                  const String_expression* str)
    2007                 :            : {
    2008                 :       5475 :   std::string s;
    2009                 :       5475 :   s.reserve(str->val_.length() * 4 + 2);
    2010                 :       5475 :   s += '"';
    2011                 :       5475 :   for (std::string::const_iterator p = str->val_.begin();
    2012                 :     110237 :        p != str->val_.end();
    2013                 :     110237 :        ++p)
    2014                 :            :     {
    2015                 :     104762 :       if (*p == '\\' || *p == '"')
    2016                 :            :         {
    2017                 :       5912 :           s += '\\';
    2018                 :       5912 :           s += *p;
    2019                 :            :         }
    2020                 :      98850 :       else if (*p >= 0x20 && *p < 0x7f)
    2021                 :      97529 :         s += *p;
    2022                 :       1321 :       else if (*p == '\n')
    2023                 :        866 :         s += "\\n";
    2024                 :        455 :       else if (*p == '\t')
    2025                 :        295 :         s += "\\t";
    2026                 :            :       else
    2027                 :            :         {
    2028                 :        160 :           s += "\\x";
    2029                 :        160 :           unsigned char c = *p;
    2030                 :        160 :           unsigned int dig = c >> 4;
    2031                 :        160 :           s += dig < 10 ? '0' + dig : 'A' + dig - 10;
    2032                 :        160 :           dig = c & 0xf;
    2033                 :     104922 :           s += dig < 10 ? '0' + dig : 'A' + dig - 10;
    2034                 :            :         }
    2035                 :            :     }
    2036                 :       5475 :   s += '"';
    2037                 :       5475 :   exp->write_string(s);
    2038                 :       5475 : }
    2039                 :            : 
    2040                 :            : // Export a string expression.
    2041                 :            : 
    2042                 :            : void
    2043                 :       5475 : String_expression::do_export(Export_function_body* efb) const
    2044                 :            : {
    2045                 :       5475 :   String_expression::export_string(efb, this);
    2046                 :       5475 : }
    2047                 :            : 
    2048                 :            : // Import a string expression.
    2049                 :            : 
    2050                 :            : Expression*
    2051                 :      25631 : String_expression::do_import(Import_expression* imp, Location loc)
    2052                 :            : {
    2053                 :      25631 :   imp->require_c_string("\"");
    2054                 :      25631 :   std::string val;
    2055                 :     468362 :   while (true)
    2056                 :            :     {
    2057                 :     936724 :       int c = imp->get_char();
    2058                 :     468362 :       if (c == '"' || c == -1)
    2059                 :            :         break;
    2060                 :     442731 :       if (c != '\\')
    2061                 :     424751 :         val += static_cast<char>(c);
    2062                 :            :       else
    2063                 :            :         {
    2064                 :      17980 :           c = imp->get_char();
    2065                 :      17980 :           if (c == '\\' || c == '"')
    2066                 :      16602 :             val += static_cast<char>(c);
    2067                 :       1378 :           else if (c == 'n')
    2068                 :        887 :             val += '\n';
    2069                 :        491 :           else if (c == 't')
    2070                 :        443 :             val += '\t';
    2071                 :         48 :           else if (c == 'x')
    2072                 :            :             {
    2073                 :         48 :               c = imp->get_char();
    2074                 :         48 :               unsigned int vh = c >= '0' && c <= '9' ? c - '0' : c - 'A' + 10;
    2075                 :         48 :               c = imp->get_char();
    2076                 :         48 :               unsigned int vl = c >= '0' && c <= '9' ? c - '0' : c - 'A' + 10;
    2077                 :         48 :               char v = (vh << 4) | vl;
    2078                 :     468410 :               val += v;
    2079                 :            :             }
    2080                 :            :           else
    2081                 :            :             {
    2082                 :          0 :               go_error_at(imp->location(), "bad string constant");
    2083                 :          0 :               return Expression::make_error(loc);
    2084                 :            :             }
    2085                 :            :         }
    2086                 :            :     }
    2087                 :      25631 :   return Expression::make_string(val, loc);
    2088                 :            : }
    2089                 :            : 
    2090                 :            : // Ast dump for string expression.
    2091                 :            : 
    2092                 :            : void
    2093                 :          0 : String_expression::do_dump_expression(Ast_dump_context* ast_dump_context) const
    2094                 :            : {
    2095                 :          0 :   String_expression::export_string(ast_dump_context, this);
    2096                 :          0 : }
    2097                 :            : 
    2098                 :            : // Make a string expression with abstract string type (common case).
    2099                 :            : 
    2100                 :            : Expression*
    2101                 :    1233330 : Expression::make_string(const std::string& val, Location location)
    2102                 :            : {
    2103                 :    1233330 :   return new String_expression(val, NULL, location);
    2104                 :            : }
    2105                 :            : 
    2106                 :            : // Make a string expression with a specific string type.
    2107                 :            : 
    2108                 :            : Expression*
    2109                 :       8963 : Expression::make_string_typed(const std::string& val, Type* type, Location location)
    2110                 :            : {
    2111                 :       8963 :   return new String_expression(val, type, location);
    2112                 :            : }
    2113                 :            : 
    2114                 :            : // An expression that evaluates to some characteristic of a string.
    2115                 :            : // This is used when indexing, bound-checking, or nil checking a string.
    2116                 :            : 
    2117                 :            : class String_info_expression : public Expression
    2118                 :            : {
    2119                 :            :  public:
    2120                 :     381604 :   String_info_expression(Expression* string, String_info string_info,
    2121                 :            :                         Location location)
    2122                 :     381604 :     : Expression(EXPRESSION_STRING_INFO, location),
    2123                 :     763208 :       string_(string), string_info_(string_info)
    2124                 :            :   { }
    2125                 :            : 
    2126                 :            :  protected:
    2127                 :            :   Type*
    2128                 :            :   do_type();
    2129                 :            : 
    2130                 :            :   void
    2131                 :          0 :   do_determine_type(const Type_context*)
    2132                 :          0 :   { go_unreachable(); }
    2133                 :            : 
    2134                 :            :   Expression*
    2135                 :     120766 :   do_copy()
    2136                 :            :   {
    2137                 :     120766 :     return new String_info_expression(this->string_->copy(), this->string_info_,
    2138                 :     120766 :                                       this->location());
    2139                 :            :   }
    2140                 :            : 
    2141                 :            :   Bexpression*
    2142                 :            :   do_get_backend(Translate_context* context);
    2143                 :            : 
    2144                 :            :   void
    2145                 :            :   do_dump_expression(Ast_dump_context*) const;
    2146                 :            : 
    2147                 :            :   void
    2148                 :          0 :   do_issue_nil_check()
    2149                 :          0 :   { this->string_->issue_nil_check(); }
    2150                 :            : 
    2151                 :            :  private:
    2152                 :            :   // The string for which we are getting information.
    2153                 :            :   Expression* string_;
    2154                 :            :   // What information we want.
    2155                 :            :   String_info string_info_;
    2156                 :            : };
    2157                 :            : 
    2158                 :            : // Return the type of the string info.
    2159                 :            : 
    2160                 :            : Type*
    2161                 :     887593 : String_info_expression::do_type()
    2162                 :            : {
    2163                 :     887593 :   switch (this->string_info_)
    2164                 :            :     {
    2165                 :     441588 :     case STRING_INFO_DATA:
    2166                 :     441588 :       {
    2167                 :     441588 :         Type* byte_type = Type::lookup_integer_type("uint8");
    2168                 :     441588 :         return Type::make_pointer_type(byte_type);
    2169                 :            :       }
    2170                 :     446005 :     case STRING_INFO_LENGTH:
    2171                 :     446005 :         return Type::lookup_integer_type("int");
    2172                 :          0 :     default:
    2173                 :          0 :       go_unreachable();
    2174                 :            :     }
    2175                 :            : }
    2176                 :            : 
    2177                 :            : // Return string information in GENERIC.
    2178                 :            : 
    2179                 :            : Bexpression*
    2180                 :     383160 : String_info_expression::do_get_backend(Translate_context* context)
    2181                 :            : {
    2182                 :     383160 :   Gogo* gogo = context->gogo();
    2183                 :            : 
    2184                 :     383160 :   Bexpression* bstring = this->string_->get_backend(context);
    2185                 :     383160 :   switch (this->string_info_)
    2186                 :            :     {
    2187                 :     383160 :     case STRING_INFO_DATA:
    2188                 :     383160 :     case STRING_INFO_LENGTH:
    2189                 :     383160 :       return gogo->backend()->struct_field_expression(bstring,
    2190                 :            :                                                       this->string_info_,
    2191                 :     383160 :                                                       this->location());
    2192                 :          0 :       break;
    2193                 :          0 :     default:
    2194                 :          0 :       go_unreachable();
    2195                 :            :     }
    2196                 :            : }
    2197                 :            : 
    2198                 :            : // Dump ast representation for a type info expression.
    2199                 :            : 
    2200                 :            : void
    2201                 :          0 : String_info_expression::do_dump_expression(
    2202                 :            :     Ast_dump_context* ast_dump_context) const
    2203                 :            : {
    2204                 :          0 :   ast_dump_context->ostream() << "stringinfo(";
    2205                 :          0 :   this->string_->dump_expression(ast_dump_context);
    2206                 :          0 :   ast_dump_context->ostream() << ",";
    2207                 :          0 :   ast_dump_context->ostream() <<
    2208                 :          0 :       (this->string_info_ == STRING_INFO_DATA ? "data"
    2209                 :          0 :     : this->string_info_ == STRING_INFO_LENGTH ? "length"
    2210                 :          0 :     : "unknown");
    2211                 :          0 :   ast_dump_context->ostream() << ")";
    2212                 :          0 : }
    2213                 :            : 
    2214                 :            : // Make a string info expression.
    2215                 :            : 
    2216                 :            : Expression*
    2217                 :     260838 : Expression::make_string_info(Expression* string, String_info string_info,
    2218                 :            :                             Location location)
    2219                 :            : {
    2220                 :     260838 :   return new String_info_expression(string, string_info, location);
    2221                 :            : }
    2222                 :            : 
    2223                 :            : // An expression that represents an string value: a struct with value pointer
    2224                 :            : // and length fields.
    2225                 :            : 
    2226                 :            : class String_value_expression : public Expression
    2227                 :            : {
    2228                 :            :  public:
    2229                 :       1562 :   String_value_expression(Expression* valptr, Expression* len, Location location)
    2230                 :       1562 :       : Expression(EXPRESSION_STRING_VALUE, location),
    2231                 :       3124 :         valptr_(valptr), len_(len)
    2232                 :            :   { }
    2233                 :            : 
    2234                 :            :  protected:
    2235                 :            :   int
    2236                 :            :   do_traverse(Traverse*);
    2237                 :            : 
    2238                 :            :   Type*
    2239                 :          0 :   do_type()
    2240                 :          0 :   { return Type::make_string_type(); }
    2241                 :            : 
    2242                 :            :   void
    2243                 :          0 :   do_determine_type(const Type_context*)
    2244                 :          0 :   { go_unreachable(); }
    2245                 :            : 
    2246                 :            :   Expression*
    2247                 :          0 :   do_copy()
    2248                 :            :   {
    2249                 :          0 :     return new String_value_expression(this->valptr_->copy(),
    2250                 :          0 :                                        this->len_->copy(),
    2251                 :          0 :                                        this->location());
    2252                 :            :   }
    2253                 :            : 
    2254                 :            :   Bexpression*
    2255                 :            :   do_get_backend(Translate_context* context);
    2256                 :            : 
    2257                 :            :   void
    2258                 :            :   do_dump_expression(Ast_dump_context*) const;
    2259                 :            : 
    2260                 :            :  private:
    2261                 :            :   // The value pointer.
    2262                 :            :   Expression* valptr_;
    2263                 :            :   // The length.
    2264                 :            :   Expression* len_;
    2265                 :            : };
    2266                 :            : 
    2267                 :            : int
    2268                 :          0 : String_value_expression::do_traverse(Traverse* traverse)
    2269                 :            : {
    2270                 :          0 :   if (Expression::traverse(&this->valptr_, traverse) == TRAVERSE_EXIT
    2271                 :          0 :       || Expression::traverse(&this->len_, traverse) == TRAVERSE_EXIT)
    2272                 :          0 :     return TRAVERSE_EXIT;
    2273                 :            :   return TRAVERSE_CONTINUE;
    2274                 :            : }
    2275                 :            : 
    2276                 :            : Bexpression*
    2277                 :       1562 : String_value_expression::do_get_backend(Translate_context* context)
    2278                 :            : {
    2279                 :       1562 :   std::vector<Bexpression*> vals(2);
    2280                 :       1562 :   vals[0] = this->valptr_->get_backend(context);
    2281                 :       1562 :   vals[1] = this->len_->get_backend(context);
    2282                 :            : 
    2283                 :       1562 :   Gogo* gogo = context->gogo();
    2284                 :       1562 :   Btype* btype = Type::make_string_type()->get_backend(gogo);
    2285                 :       1562 :   return gogo->backend()->constructor_expression(btype, vals, this->location());
    2286                 :            : }
    2287                 :            : 
    2288                 :            : void
    2289                 :          0 : String_value_expression::do_dump_expression(
    2290                 :            :     Ast_dump_context* ast_dump_context) const
    2291                 :            : {
    2292                 :          0 :   ast_dump_context->ostream() << "stringvalue(";
    2293                 :          0 :   ast_dump_context->ostream() << "value: ";
    2294                 :          0 :   this->valptr_->dump_expression(ast_dump_context);
    2295                 :          0 :   ast_dump_context->ostream() << ", length: ";
    2296                 :          0 :   this->len_->dump_expression(ast_dump_context);
    2297                 :          0 :   ast_dump_context->ostream() << ")";
    2298                 :          0 : }
    2299                 :            : 
    2300                 :            : Expression*
    2301                 :       1562 : Expression::make_string_value(Expression* valptr, Expression* len,
    2302                 :            :                               Location location)
    2303                 :            : {
    2304                 :       1562 :   return new String_value_expression(valptr, len, location);
    2305                 :            : }
    2306                 :            : 
    2307                 :            : // Make an integer expression.
    2308                 :            : 
    2309                 :            : class Integer_expression : public Expression
    2310                 :            : {
    2311                 :            :  public:
    2312                 :    7365560 :   Integer_expression(const mpz_t* val, Type* type, bool is_character_constant,
    2313                 :            :                      Location location)
    2314                 :    7365560 :     : Expression(EXPRESSION_INTEGER, location),
    2315                 :   14731100 :       type_(type), is_character_constant_(is_character_constant)
    2316                 :    7365560 :   { mpz_init_set(this->val_, *val); }
    2317                 :            : 
    2318                 :            :   static Expression*
    2319                 :            :   do_import(Import_expression*, Location);
    2320                 :            : 
    2321                 :            :   // Write VAL to string dump.
    2322                 :            :   static void
    2323                 :            :   export_integer(String_dump* exp, const mpz_t val);
    2324                 :            : 
    2325                 :            :   // Write VAL to dump context.
    2326                 :            :   static void
    2327                 :            :   dump_integer(Ast_dump_context* ast_dump_context, const mpz_t val);
    2328                 :            : 
    2329                 :            :  protected:
    2330                 :            :   int
    2331                 :            :   do_traverse(Traverse*);
    2332                 :            : 
    2333                 :            :   bool
    2334                 :    3570430 :   do_is_constant() const
    2335                 :    3570430 :   { return true; }
    2336                 :            : 
    2337                 :            :   bool
    2338                 :        392 :   do_is_zero_value() const
    2339                 :        392 :   { return mpz_sgn(this->val_) == 0; }
    2340                 :            : 
    2341                 :            :   bool
    2342                 :    1456660 :   do_is_static_initializer() const
    2343                 :    1456660 :   { return true; }
    2344                 :            : 
    2345                 :            :   bool
    2346                 :            :   do_numeric_constant_value(Numeric_constant* nc) const;
    2347                 :            : 
    2348                 :            :   Type*
    2349                 :            :   do_type();
    2350                 :            : 
    2351                 :            :   void
    2352                 :            :   do_determine_type(const Type_context* context);
    2353                 :            : 
    2354                 :            :   void
    2355                 :            :   do_check_types(Gogo*);
    2356                 :            : 
    2357                 :            :   Bexpression*
    2358                 :            :   do_get_backend(Translate_context*);
    2359                 :            : 
    2360                 :            :   Expression*
    2361                 :     435869 :   do_copy()
    2362                 :            :   {
    2363                 :     435869 :     if (this->is_character_constant_)
    2364                 :        241 :       return Expression::make_character(&this->val_,
    2365                 :        121 :                                         (this->type_ == NULL
    2366                 :            :                                          ? NULL
    2367                 :        120 :                                          : this->type_->copy_expressions()),
    2368                 :        121 :                                         this->location());
    2369                 :            :     else
    2370                 :     846162 :       return Expression::make_integer_z(&this->val_,
    2371                 :     435748 :                                         (this->type_ == NULL
    2372                 :            :                                          ? NULL
    2373                 :     410414 :                                          : this->type_->copy_expressions()),
    2374                 :     435748 :                                         this->location());
    2375                 :            :   }
    2376                 :            : 
    2377                 :            :   int
    2378                 :    1345770 :   do_inlining_cost() const
    2379                 :    1345770 :   { return 1; }
    2380                 :            : 
    2381                 :            :   void
    2382                 :            :   do_export(Export_function_body*) const;
    2383                 :            : 
    2384                 :            :   void
    2385                 :            :   do_dump_expression(Ast_dump_context*) const;
    2386                 :            : 
    2387                 :            :  private:
    2388                 :            :   // The integer value.
    2389                 :            :   mpz_t val_;
    2390                 :            :   // The type so far.
    2391                 :            :   Type* type_;
    2392                 :            :   // Whether this is a character constant.
    2393                 :            :   bool is_character_constant_;
    2394                 :            : };
    2395                 :            : 
    2396                 :            : // Traverse an integer expression.  We just need to traverse the type
    2397                 :            : // if there is one.
    2398                 :            : 
    2399                 :            : int
    2400                 :   42082500 : Integer_expression::do_traverse(Traverse* traverse)
    2401                 :            : {
    2402                 :   42082500 :   if (this->type_ != NULL)
    2403                 :   37912600 :     return Type::traverse(this->type_, traverse);
    2404                 :            :   return TRAVERSE_CONTINUE;
    2405                 :            : }
    2406                 :            : 
    2407                 :            : // Return a numeric constant for this expression.  We have to mark
    2408                 :            : // this as a character when appropriate.
    2409                 :            : 
    2410                 :            : bool
    2411                 :   24896000 : Integer_expression::do_numeric_constant_value(Numeric_constant* nc) const
    2412                 :            : {
    2413                 :   24896000 :   if (this->is_character_constant_)
    2414                 :      33212 :     nc->set_rune(this->type_, this->val_);
    2415                 :            :   else
    2416                 :   24862800 :     nc->set_int(this->type_, this->val_);
    2417                 :   24896000 :   return true;
    2418                 :            : }
    2419                 :            : 
    2420                 :            : // Return the current type.  If we haven't set the type yet, we return
    2421                 :            : // an abstract integer type.
    2422                 :            : 
    2423                 :            : Type*
    2424                 :   20071000 : Integer_expression::do_type()
    2425                 :            : {
    2426                 :   20071000 :   if (this->type_ == NULL)
    2427                 :            :     {
    2428                 :    2072140 :       if (this->is_character_constant_)
    2429                 :      52102 :         this->type_ = Type::make_abstract_character_type();
    2430                 :            :       else
    2431                 :    2020040 :         this->type_ = Type::make_abstract_integer_type();
    2432                 :            :     }
    2433                 :   20071000 :   return this->type_;
    2434                 :            : }
    2435                 :            : 
    2436                 :            : // Set the type of the integer value.  Here we may switch from an
    2437                 :            : // abstract type to a real type.
    2438                 :            : 
    2439                 :            : void
    2440                 :    2449960 : Integer_expression::do_determine_type(const Type_context* context)
    2441                 :            : {
    2442                 :    2449960 :   if (this->type_ != NULL && !this->type_->is_abstract())
    2443                 :            :     ;
    2444                 :    1994720 :   else if (context->type != NULL && context->type->is_numeric_type())
    2445                 :    1421010 :     this->type_ = context->type;
    2446                 :     573707 :   else if (!context->may_be_abstract)
    2447                 :            :     {
    2448                 :      20157 :       if (this->is_character_constant_)
    2449                 :        356 :         this->type_ = Type::lookup_integer_type("int32");
    2450                 :            :       else
    2451                 :      19801 :         this->type_ = Type::lookup_integer_type("int");
    2452                 :            :     }
    2453                 :    2449960 : }
    2454                 :            : 
    2455                 :            : // Check the type of an integer constant.
    2456                 :            : 
    2457                 :            : void
    2458                 :    2243580 : Integer_expression::do_check_types(Gogo*)
    2459                 :            : {
    2460                 :    2243580 :   Type* type = this->type_;
    2461                 :    2243580 :   if (type == NULL)
    2462                 :          0 :     return;
    2463                 :    4487150 :   Numeric_constant nc;
    2464                 :    2243580 :   if (this->is_character_constant_)
    2465                 :      48921 :     nc.set_rune(NULL, this->val_);
    2466                 :            :   else
    2467                 :    2194660 :     nc.set_int(NULL, this->val_);
    2468                 :    2243580 :   if (!nc.set_type(type, true, this->location()))
    2469                 :         11 :     this->set_is_error();
    2470                 :            : }
    2471                 :            : 
    2472                 :            : // Get the backend representation for an integer constant.
    2473                 :            : 
    2474                 :            : Bexpression*
    2475                 :    5382820 : Integer_expression::do_get_backend(Translate_context* context)
    2476                 :            : {
    2477                 :    5382820 :   if (this->is_error_expression()
    2478                 :    5382820 :       || (this->type_ != NULL && this->type_->is_error_type()))
    2479                 :            :     {
    2480                 :          0 :       go_assert(saw_errors());
    2481                 :          0 :       return context->gogo()->backend()->error_expression();
    2482                 :            :     }
    2483                 :            : 
    2484                 :    5382820 :   Type* resolved_type = NULL;
    2485                 :    5382820 :   if (this->type_ != NULL && !this->type_->is_abstract())
    2486                 :    5325410 :     resolved_type = this->type_;
    2487                 :      57408 :   else if (this->type_ != NULL && this->type_->float_type() != NULL)
    2488                 :            :     {
    2489                 :            :       // We are converting to an abstract floating point type.
    2490                 :          0 :       resolved_type = Type::lookup_float_type("float64");
    2491                 :            :     }
    2492                 :      57408 :   else if (this->type_ != NULL && this->type_->complex_type() != NULL)
    2493                 :            :     {
    2494                 :            :       // We are converting to an abstract complex type.
    2495                 :          0 :       resolved_type = Type::lookup_complex_type("complex128");
    2496                 :            :     }
    2497                 :            :   else
    2498                 :            :     {
    2499                 :            :       // If we still have an abstract type here, then this is being
    2500                 :            :       // used in a constant expression which didn't get reduced for
    2501                 :            :       // some reason.  Use a type which will fit the value.  We use <,
    2502                 :            :       // not <=, because we need an extra bit for the sign bit.
    2503                 :      57408 :       int bits = mpz_sizeinbase(this->val_, 2);
    2504                 :      57408 :       Type* int_type = Type::lookup_integer_type("int");
    2505                 :     114816 :       if (bits < int_type->integer_type()->bits())
    2506                 :            :         resolved_type = int_type;
    2507                 :          0 :       else if (bits < 64)
    2508                 :          0 :         resolved_type = Type::lookup_integer_type("int64");
    2509                 :            :       else
    2510                 :            :         {
    2511                 :          0 :           if (!saw_errors())
    2512                 :          0 :             go_error_at(this->location(),
    2513                 :            :                         "unknown type for large integer constant");
    2514                 :          0 :           return context->gogo()->backend()->error_expression();
    2515                 :            :         }
    2516                 :            :     }
    2517                 :   10765600 :   Numeric_constant nc;
    2518                 :    5382820 :   nc.set_int(resolved_type, this->val_);
    2519                 :    5382820 :   return Expression::backend_numeric_constant_expression(context, &nc);
    2520                 :            : }
    2521                 :            : 
    2522                 :            : // Write VAL to export data.
    2523                 :            : 
    2524                 :            : void
    2525                 :      49703 : Integer_expression::export_integer(String_dump* exp, const mpz_t val)
    2526                 :            : {
    2527                 :      49703 :   char* s = mpz_get_str(NULL, 10, val);
    2528                 :      49703 :   exp->write_c_string(s);
    2529                 :      49703 :   free(s);
    2530                 :      49703 : }
    2531                 :            : 
    2532                 :            : // Export an integer in a constant expression.
    2533                 :            : 
    2534                 :            : void
    2535                 :      49703 : Integer_expression::do_export(Export_function_body* efb) const
    2536                 :            : {
    2537                 :      49703 :   bool added_type = false;
    2538                 :      49703 :   if (this->type_ != NULL
    2539                 :      49703 :       && !this->type_->is_abstract()
    2540                 :      76870 :       && this->type_ != efb->type_context())
    2541                 :            :     {
    2542                 :       9606 :       efb->write_c_string("$convert(");
    2543                 :       9606 :       efb->write_type(this->type_);
    2544                 :       9606 :       efb->write_c_string(", ");
    2545                 :       9606 :       added_type = true;
    2546                 :            :     }
    2547                 :            : 
    2548                 :      49703 :   Integer_expression::export_integer(efb, this->val_);
    2549                 :      49703 :   if (this->is_character_constant_)
    2550                 :       1200 :     efb->write_c_string("'");
    2551                 :            :   // A trailing space lets us reliably identify the end of the number.
    2552                 :      49703 :   efb->write_c_string(" ");
    2553                 :            : 
    2554                 :      49703 :   if (added_type)
    2555                 :       9606 :     efb->write_c_string(")");
    2556                 :      49703 : }
    2557                 :            : 
    2558                 :            : // Import an integer, floating point, or complex value.  This handles
    2559                 :            : // all these types because they all start with digits.
    2560                 :            : 
    2561                 :            : Expression*
    2562                 :     739455 : Integer_expression::do_import(Import_expression* imp, Location loc)
    2563                 :            : {
    2564                 :     739455 :   std::string num = imp->read_identifier();
    2565                 :     739455 :   imp->require_c_string(" ");
    2566                 :     739455 :   if (!num.empty() && num[num.length() - 1] == 'i')
    2567                 :            :     {
    2568                 :          2 :       mpfr_t real;
    2569                 :          2 :       size_t plus_pos = num.find('+', 1);
    2570                 :          2 :       size_t minus_pos = num.find('-', 1);
    2571                 :          2 :       size_t pos;
    2572                 :          2 :       if (plus_pos == std::string::npos)
    2573                 :            :         pos = minus_pos;
    2574                 :          2 :       else if (minus_pos == std::string::npos)
    2575                 :            :         pos = plus_pos;
    2576                 :            :       else
    2577                 :            :         {
    2578                 :          0 :           go_error_at(imp->location(), "bad number in import data: %qs",
    2579                 :            :                       num.c_str());
    2580                 :          0 :           return Expression::make_error(loc);
    2581                 :            :         }
    2582                 :          2 :       if (pos == std::string::npos)
    2583                 :          0 :         mpfr_set_ui(real, 0, MPFR_RNDN);
    2584                 :            :       else
    2585                 :            :         {
    2586                 :          4 :           std::string real_str = num.substr(0, pos);
    2587                 :          2 :           if (mpfr_init_set_str(real, real_str.c_str(), 10, MPFR_RNDN) != 0)
    2588                 :            :             {
    2589                 :          0 :               go_error_at(imp->location(), "bad number in import data: %qs",
    2590                 :            :                           real_str.c_str());
    2591                 :          0 :               return Expression::make_error(loc);
    2592                 :            :             }
    2593                 :            :         }
    2594                 :            : 
    2595                 :          4 :       std::string imag_str;
    2596                 :          2 :       if (pos == std::string::npos)
    2597                 :          0 :         imag_str = num;
    2598                 :            :       else
    2599                 :          2 :         imag_str = num.substr(pos);
    2600                 :          2 :       imag_str = imag_str.substr(0, imag_str.size() - 1);
    2601                 :          2 :       mpfr_t imag;
    2602                 :          2 :       if (mpfr_init_set_str(imag, imag_str.c_str(), 10, MPFR_RNDN) != 0)
    2603                 :            :         {
    2604                 :          0 :           go_error_at(imp->location(), "bad number in import data: %qs",
    2605                 :            :                       imag_str.c_str());
    2606                 :          0 :           return Expression::make_error(loc);
    2607                 :            :         }
    2608                 :          2 :       mpc_t cval;
    2609                 :          2 :       mpc_init2(cval, mpc_precision);
    2610                 :          2 :       mpc_set_fr_fr(cval, real, imag, MPC_RNDNN);
    2611                 :          2 :       mpfr_clear(real);
    2612                 :          2 :       mpfr_clear(imag);
    2613                 :          2 :       Expression* ret = Expression::make_complex(&cval, NULL, loc);
    2614                 :          2 :       mpc_clear(cval);
    2615                 :          2 :       return ret;
    2616                 :            :     }
    2617                 :     739453 :   else if (num.find('.') == std::string::npos
    2618                 :     739453 :            && num.find('E') == std::string::npos)
    2619                 :            :     {
    2620                 :     736003 :       bool is_character_constant = (!num.empty()
    2621                 :     736003 :                                     && num[num.length() - 1] == '\'');
    2622                 :       5708 :       if (is_character_constant)
    2623                 :       5708 :         num = num.substr(0, num.length() - 1);
    2624                 :     736003 :       mpz_t val;
    2625                 :     736003 :       if (mpz_init_set_str(val, num.c_str(), 10) != 0)
    2626                 :            :         {
    2627                 :          0 :           go_error_at(imp->location(), "bad number in import data: %qs",
    2628                 :            :                       num.c_str());
    2629                 :          0 :           return Expression::make_error(loc);
    2630                 :            :         }
    2631                 :     736003 :       Expression* ret;
    2632                 :     736003 :       if (is_character_constant)
    2633                 :       5708 :         ret = Expression::make_character(&val, NULL, loc);
    2634                 :            :       else
    2635                 :     730295 :         ret = Expression::make_integer_z(&val, NULL, loc);
    2636                 :     736003 :       mpz_clear(val);
    2637                 :     736003 :       return ret;
    2638                 :            :     }
    2639                 :            :   else
    2640                 :            :     {
    2641                 :       3450 :       mpfr_t val;
    2642                 :       3450 :       if (mpfr_init_set_str(val, num.c_str(), 10, MPFR_RNDN) != 0)
    2643                 :            :         {
    2644                 :          0 :           go_error_at(imp->location(), "bad number in import data: %qs",
    2645                 :            :                       num.c_str());
    2646                 :          0 :           return Expression::make_error(loc);
    2647                 :            :         }
    2648                 :       3450 :       Expression* ret = Expression::make_float(&val, NULL, loc);
    2649                 :       3450 :       mpfr_clear(val);
    2650                 :       3450 :       return ret;
    2651                 :            :     }
    2652                 :            : }
    2653                 :            : // Ast dump for integer expression.
    2654                 :            : 
    2655                 :            : void
    2656                 :          0 : Integer_expression::do_dump_expression(Ast_dump_context* ast_dump_context) const
    2657                 :            : {
    2658                 :          0 :   if (this->is_character_constant_)
    2659                 :          0 :     ast_dump_context->ostream() << '\'';
    2660                 :          0 :   Integer_expression::export_integer(ast_dump_context, this->val_);
    2661                 :          0 :   if (this->is_character_constant_)
    2662                 :          0 :     ast_dump_context->ostream() << '\'';
    2663                 :          0 : }
    2664                 :            : 
    2665                 :            : // Build a new integer value from a multi-precision integer.
    2666                 :            : 
    2667                 :            : Expression*
    2668                 :    7309440 : Expression::make_integer_z(const mpz_t* val, Type* type, Location location)
    2669                 :            : {
    2670                 :    7309440 :   return new Integer_expression(val, type, false, location);
    2671                 :            : }
    2672                 :            : 
    2673                 :            : // Build a new integer value from an unsigned long.
    2674                 :            : 
    2675                 :            : Expression*
    2676                 :    3627160 : Expression::make_integer_ul(unsigned long val, Type *type, Location location)
    2677                 :            : {
    2678                 :    3627160 :   mpz_t zval;
    2679                 :    3627160 :   mpz_init_set_ui(zval, val);
    2680                 :    3627160 :   Expression* ret = Expression::make_integer_z(&zval, type, location);
    2681                 :    3627160 :   mpz_clear(zval);
    2682                 :    3627160 :   return ret;
    2683                 :            : }
    2684                 :            : 
    2685                 :            : // Build a new integer value from a signed long.
    2686                 :            : 
    2687                 :            : Expression*
    2688                 :          0 : Expression::make_integer_sl(long val, Type *type, Location location)
    2689                 :            : {
    2690                 :          0 :   mpz_t zval;
    2691                 :          0 :   mpz_init_set_si(zval, val);
    2692                 :          0 :   Expression* ret = Expression::make_integer_z(&zval, type, location);
    2693                 :          0 :   mpz_clear(zval);
    2694                 :          0 :   return ret;
    2695                 :            : }
    2696                 :            : 
    2697                 :            : // Store an int64_t in an uninitialized mpz_t.
    2698                 :            : 
    2699                 :            : static void
    2700                 :    1071490 : set_mpz_from_int64(mpz_t* zval, int64_t val)
    2701                 :            : {
    2702                 :    1071490 :   if (val >= 0)
    2703                 :            :     {
    2704                 :    1071490 :       unsigned long ul = static_cast<unsigned long>(val);
    2705                 :    1071490 :       if (static_cast<int64_t>(ul) == val)
    2706                 :            :         {
    2707                 :    1071490 :           mpz_init_set_ui(*zval, ul);
    2708                 :    1071490 :           return;
    2709                 :            :         }
    2710                 :            :     }
    2711                 :          0 :   uint64_t uv;
    2712                 :          0 :   if (val >= 0)
    2713                 :            :     uv = static_cast<uint64_t>(val);
    2714                 :            :   else
    2715                 :          0 :     uv = static_cast<uint64_t>(- val);
    2716                 :          0 :   unsigned long ul = uv & 0xffffffffUL;
    2717                 :          0 :   mpz_init_set_ui(*zval, ul);
    2718                 :          0 :   mpz_t hval;
    2719                 :          0 :   mpz_init_set_ui(hval, static_cast<unsigned long>(uv >> 32));
    2720                 :          0 :   mpz_mul_2exp(hval, hval, 32);
    2721                 :          0 :   mpz_add(*zval, *zval, hval);
    2722                 :          0 :   mpz_clear(hval);
    2723                 :          0 :   if (val < 0)
    2724                 :          0 :     mpz_neg(*zval, *zval);
    2725                 :            : }
    2726                 :            : 
    2727                 :            : // Build a new integer value from an int64_t.
    2728                 :            : 
    2729                 :            : Expression*
    2730                 :    1070420 : Expression::make_integer_int64(int64_t val, Type* type, Location location)
    2731                 :            : {
    2732                 :    1070420 :   mpz_t zval;
    2733                 :    1070420 :   set_mpz_from_int64(&zval, val);
    2734                 :    1070420 :   Expression* ret = Expression::make_integer_z(&zval, type, location);
    2735                 :    1070420 :   mpz_clear(zval);
    2736                 :    1070420 :   return ret;
    2737                 :            : }
    2738                 :            : 
    2739                 :            : // Build a new character constant value.
    2740                 :            : 
    2741                 :            : Expression*
    2742                 :      56117 : Expression::make_character(const mpz_t* val, Type* type, Location location)
    2743                 :            : {
    2744                 :      56117 :   return new Integer_expression(val, type, true, location);
    2745                 :            : }
    2746                 :            : 
    2747                 :            : // Floats.
    2748                 :            : 
    2749                 :            : class Float_expression : public Expression
    2750                 :            : {
    2751                 :            :  public:
    2752                 :      29133 :   Float_expression(const mpfr_t* val, Type* type, Location location)
    2753                 :      29133 :     : Expression(EXPRESSION_FLOAT, location),
    2754                 :      29133 :       type_(type)
    2755                 :            :   {
    2756                 :      29133 :     mpfr_init_set(this->val_, *val, MPFR_RNDN);
    2757                 :      29133 :   }
    2758                 :            : 
    2759                 :            :   // Write VAL to export data.
    2760                 :            :   static void
    2761                 :            :   export_float(String_dump* exp, const mpfr_t val);
    2762                 :            : 
    2763                 :            :   // Write VAL to dump file.
    2764                 :            :   static void
    2765                 :            :   dump_float(Ast_dump_context* ast_dump_context, const mpfr_t val);
    2766                 :            : 
    2767                 :            :  protected:
    2768                 :            :   int
    2769                 :            :   do_traverse(Traverse*);
    2770                 :            : 
    2771                 :            :   bool
    2772                 :      34176 :   do_is_constant() const
    2773                 :      34176 :   { return true; }
    2774                 :            : 
    2775                 :            :   bool
    2776                 :          4 :   do_is_zero_value() const
    2777                 :            :   {
    2778                 :          4 :     return mpfr_zero_p(this->val_) != 0
    2779                 :          4 :            && mpfr_signbit(this->val_) == 0;
    2780                 :            :   }
    2781                 :            : 
    2782                 :            :   bool
    2783                 :      13944 :   do_is_static_initializer() const
    2784                 :      13944 :   { return true; }
    2785                 :            : 
    2786                 :            :   bool
    2787                 :      17810 :   do_numeric_constant_value(Numeric_constant* nc) const
    2788                 :            :   {
    2789                 :      17810 :     nc->set_float(this->type_, this->val_);
    2790                 :      17810 :     return true;
    2791                 :            :   }
    2792                 :            : 
    2793                 :            :   Type*
    2794                 :            :   do_type();
    2795                 :            : 
    2796                 :            :   void
    2797                 :            :   do_determine_type(const Type_context*);
    2798                 :            : 
    2799                 :            :   void
    2800                 :            :   do_check_types(Gogo*);
    2801                 :            : 
    2802                 :            :   Expression*
    2803                 :         61 :   do_copy()
    2804                 :        122 :   { return Expression::make_float(&this->val_,
    2805                 :         61 :                                   (this->type_ == NULL
    2806                 :            :                                    ? NULL
    2807                 :         61 :                                    : this->type_->copy_expressions()),
    2808                 :         61 :                                   this->location()); }
    2809                 :            : 
    2810                 :            :   Bexpression*
    2811                 :            :   do_get_backend(Translate_context*);
    2812                 :            : 
    2813                 :            :   int
    2814                 :       4403 :   do_inlining_cost() const
    2815                 :       4403 :   { return 1; }
    2816                 :            : 
    2817                 :            :   void
    2818                 :            :   do_export(Export_function_body*) const;
    2819                 :            : 
    2820                 :            :   void
    2821                 :            :   do_dump_expression(Ast_dump_context*) const;
    2822                 :            : 
    2823                 :            :  private:
    2824                 :            :   // The floating point value.
    2825                 :            :   mpfr_t val_;
    2826                 :            :   // The type so far.
    2827                 :            :   Type* type_;
    2828                 :            : };
    2829                 :            : 
    2830                 :            : // Traverse a float expression.  We just need to traverse the type if
    2831                 :            : // there is one.
    2832                 :            : 
    2833                 :            : int
    2834                 :     361627 : Float_expression::do_traverse(Traverse* traverse)
    2835                 :            : {
    2836                 :     361627 :   if (this->type_ != NULL)
    2837                 :     320112 :     return Type::traverse(this->type_, traverse);
    2838                 :            :   return TRAVERSE_CONTINUE;
    2839                 :            : }
    2840                 :            : 
    2841                 :            : // Return the current type.  If we haven't set the type yet, we return
    2842                 :            : // an abstract float type.
    2843                 :            : 
    2844                 :            : Type*
    2845                 :     212942 : Float_expression::do_type()
    2846                 :            : {
    2847                 :     212942 :   if (this->type_ == NULL)
    2848                 :      20741 :     this->type_ = Type::make_abstract_float_type();
    2849                 :     212942 :   return this->type_;
    2850                 :            : }
    2851                 :            : 
    2852                 :            : // Set the type of the float value.  Here we may switch from an
    2853                 :            : // abstract type to a real type.
    2854                 :            : 
    2855                 :            : void
    2856                 :      22851 : Float_expression::do_determine_type(const Type_context* context)
    2857                 :            : {
    2858                 :      22851 :   if (this->type_ != NULL && !this->type_->is_abstract())
    2859                 :            :     ;
    2860                 :      20991 :   else if (context->type != NULL
    2861                 :      20991 :            && (context->type->integer_type() != NULL
    2862                 :      28734 :                || context->type->float_type() != NULL
    2863                 :      15324 :                || context->type->complex_type() != NULL))
    2864                 :      14701 :     this->type_ = context->type;
    2865                 :       6290 :   else if (!context->may_be_abstract)
    2866                 :       1007 :     this->type_ = Type::lookup_float_type("float64");
    2867                 :      22851 : }
    2868                 :            : 
    2869                 :            : // Check the type of a float value.
    2870                 :            : 
    2871                 :            : void
    2872                 :      20730 : Float_expression::do_check_types(Gogo*)
    2873                 :            : {
    2874                 :      20730 :   Type* type = this->type_;
    2875                 :      20730 :   if (type == NULL)
    2876                 :          0 :     return;
    2877                 :      41460 :   Numeric_constant nc;
    2878                 :      20730 :   nc.set_float(NULL, this->val_);
    2879                 :      20730 :   if (!nc.set_type(this->type_, true, this->location()))
    2880                 :         30 :     this->set_is_error();
    2881                 :            : }
    2882                 :            : 
    2883                 :            : // Get the backend representation for a float constant.
    2884                 :            : 
    2885                 :            : Bexpression*
    2886                 :      19032 : Float_expression::do_get_backend(Translate_context* context)
    2887                 :            : {
    2888                 :      19032 :   if (this->is_error_expression()
    2889                 :      19032 :       || (this->type_ != NULL && this->type_->is_error_type()))
    2890                 :            :     {
    2891                 :          0 :       go_assert(saw_errors());
    2892                 :          0 :       return context->gogo()->backend()->error_expression();
    2893                 :            :     }
    2894                 :            : 
    2895                 :      19032 :   Type* resolved_type;
    2896                 :      19032 :   if (this->type_ != NULL && !this->type_->is_abstract())
    2897                 :      19032 :     resolved_type = this->type_;
    2898                 :          0 :   else if (this->type_ != NULL && this->type_->integer_type() != NULL)
    2899                 :            :     {
    2900                 :            :       // We have an abstract integer type.  We just hope for the best.
    2901                 :          0 :       resolved_type = Type::lookup_integer_type("int");
    2902                 :            :     }
    2903                 :          0 :   else if (this->type_ != NULL && this->type_->complex_type() != NULL)
    2904                 :            :     {
    2905                 :            :       // We are converting to an abstract complex type.
    2906                 :          0 :       resolved_type = Type::lookup_complex_type("complex128");
    2907                 :            :     }
    2908                 :            :   else
    2909                 :            :     {
    2910                 :            :       // If we still have an abstract type here, then this is being
    2911                 :            :       // used in a constant expression which didn't get reduced.  We
    2912                 :            :       // just use float64 and hope for the best.
    2913                 :          0 :       resolved_type = Type::lookup_float_type("float64");
    2914                 :            :     }
    2915                 :            : 
    2916                 :      38064 :   Numeric_constant nc;
    2917                 :      19032 :   nc.set_float(resolved_type, this->val_);
    2918                 :      19032 :   return Expression::backend_numeric_constant_expression(context, &nc);
    2919                 :            : }
    2920                 :            : 
    2921                 :            : // Write a floating point number to a string dump.
    2922                 :            : 
    2923                 :            : void
    2924                 :        483 : Float_expression::export_float(String_dump *exp, const mpfr_t val)
    2925                 :            : {
    2926                 :        483 :   mpfr_exp_t exponent;
    2927                 :        483 :   char* s = mpfr_get_str(NULL, &exponent, 10, 0, val, MPFR_RNDN);
    2928                 :        483 :   if (*s == '-')
    2929                 :         50 :     exp->write_c_string("-");
    2930                 :        483 :   exp->write_c_string("0.");
    2931                 :        483 :   exp->write_c_string(*s == '-' ? s + 1 : s);
    2932                 :        483 :   mpfr_free_str(s);
    2933                 :        483 :   char buf[30];
    2934                 :        483 :   snprintf(buf, sizeof buf, "E%ld", exponent);
    2935                 :        483 :   exp->write_c_string(buf);
    2936                 :        483 : }
    2937                 :            : 
    2938                 :            : // Export a floating point number in a constant expression.
    2939                 :            : 
    2940                 :            : void
    2941                 :        439 : Float_expression::do_export(Export_function_body* efb) const
    2942                 :            : {
    2943                 :        439 :   bool added_type = false;
    2944                 :        439 :   if (this->type_ != NULL
    2945                 :        439 :       && !this->type_->is_abstract()
    2946                 :        691 :       && this->type_ != efb->type_context())
    2947                 :            :     {
    2948                 :        216 :       efb->write_c_string("$convert(");
    2949                 :        216 :       efb->write_type(this->type_);
    2950                 :        216 :       efb->write_c_string(", ");
    2951                 :        216 :       added_type = true;
    2952                 :            :     }
    2953                 :            : 
    2954                 :        439 :   Float_expression::export_float(efb, this->val_);
    2955                 :            :   // A trailing space lets us reliably identify the end of the number.
    2956                 :        439 :   efb->write_c_string(" ");
    2957                 :            : 
    2958                 :        439 :   if (added_type)
    2959                 :        216 :     efb->write_c_string(")");
    2960                 :        439 : }
    2961                 :            : 
    2962                 :            : // Dump a floating point number to the dump file.
    2963                 :            : 
    2964                 :            : void
    2965                 :          0 : Float_expression::do_dump_expression(Ast_dump_context* ast_dump_context) const
    2966                 :            : {
    2967                 :          0 :   Float_expression::export_float(ast_dump_context, this->val_);
    2968                 :          0 : }
    2969                 :            : 
    2970                 :            : // Make a float expression.
    2971                 :            : 
    2972                 :            : Expression*
    2973                 :      29133 : Expression::make_float(const mpfr_t* val, Type* type, Location location)
    2974                 :            : {
    2975                 :      29133 :   return new Float_expression(val, type, location);
    2976                 :            : }
    2977                 :            : 
    2978                 :            : // Complex numbers.
    2979                 :            : 
    2980                 :            : class Complex_expression : public Expression
    2981                 :            : {
    2982                 :            :  public:
    2983                 :       3694 :   Complex_expression(const mpc_t* val, Type* type, Location location)
    2984                 :       3694 :     : Expression(EXPRESSION_COMPLEX, location),
    2985                 :       3694 :       type_(type)
    2986                 :            :   {
    2987                 :       3694 :     mpc_init2(this->val_, mpc_precision);
    2988                 :       3694 :     mpc_set(this->val_, *val, MPC_RNDNN);
    2989                 :       3694 :   }
    2990                 :            : 
    2991                 :            :   // Write VAL to string dump.
    2992                 :            :   static void
    2993                 :            :   export_complex(String_dump* exp, const mpc_t val);
    2994                 :            : 
    2995                 :            :   // Write REAL/IMAG to dump context.
    2996                 :            :   static void
    2997                 :            :   dump_complex(Ast_dump_context* ast_dump_context, const mpc_t val);
    2998                 :            : 
    2999                 :            :  protected:
    3000                 :            :   int
    3001                 :            :   do_traverse(Traverse*);
    3002                 :            : 
    3003                 :            :   bool
    3004                 :       2886 :   do_is_constant() const
    3005                 :       2886 :   { return true; }
    3006                 :            : 
    3007                 :            :   bool
    3008                 :          4 :   do_is_zero_value() const
    3009                 :            :   {
    3010                 :          4 :     return mpfr_zero_p(mpc_realref(this->val_)) != 0
    3011                 :          0 :            && mpfr_signbit(mpc_realref(this->val_)) == 0
    3012                 :          0 :            && mpfr_zero_p(mpc_imagref(this->val_)) != 0
    3013                 :          4 :            && mpfr_signbit(mpc_imagref(this->val_)) == 0;
    3014                 :            :   }
    3015                 :            : 
    3016                 :            :   bool
    3017                 :       2274 :   do_is_static_initializer() const
    3018                 :       2274 :   { return true; }
    3019                 :            : 
    3020                 :            :   bool
    3021                 :        970 :   do_numeric_constant_value(Numeric_constant* nc) const
    3022                 :            :   {
    3023                 :        970 :     nc->set_complex(this->type_, this->val_);
    3024                 :        970 :     return true;
    3025                 :            :   }
    3026                 :            : 
    3027                 :            :   Type*
    3028                 :            :   do_type();
    3029                 :            : 
    3030                 :            :   void
    3031                 :            :   do_determine_type(const Type_context*);
    3032                 :            : 
    3033                 :            :   void
    3034                 :            :   do_check_types(Gogo*);
    3035                 :            : 
    3036                 :            :   Expression*
    3037                 :          0 :   do_copy()
    3038                 :            :   {
    3039                 :          0 :     return Expression::make_complex(&this->val_,
    3040                 :          0 :                                     (this->type_ == NULL
    3041                 :            :                                      ? NULL
    3042                 :          0 :                                      : this->type_->copy_expressions()),
    3043                 :          0 :                                     this->location());
    3044                 :            :   }
    3045                 :            : 
    3046                 :            :   Bexpression*
    3047                 :            :   do_get_backend(Translate_context*);
    3048                 :            : 
    3049                 :            :   int
    3050                 :        116 :   do_inlining_cost() const
    3051                 :        116 :   { return 2; }
    3052                 :            : 
    3053                 :            :   void
    3054                 :            :   do_export(Export_function_body*) const;
    3055                 :            : 
    3056                 :            :   void
    3057                 :            :   do_dump_expression(Ast_dump_context*) const;
    3058                 :            : 
    3059                 :            :  private:
    3060                 :            :   // The complex value.
    3061                 :            :   mpc_t val_;
    3062                 :            :   // The type if known.
    3063                 :            :   Type* type_;
    3064                 :            : };
    3065                 :            : 
    3066                 :            : // Traverse a complex expression.  We just need to traverse the type
    3067                 :            : // if there is one.
    3068                 :            : 
    3069                 :            : int
    3070                 :      52511 : Complex_expression::do_traverse(Traverse* traverse)
    3071                 :            : {
    3072                 :      52511 :   if (this->type_ != NULL)
    3073                 :      48872 :     return Type::traverse(this->type_, traverse);
    3074                 :            :   return TRAVERSE_CONTINUE;
    3075                 :            : }
    3076                 :            : 
    3077                 :            : // Return the current type.  If we haven't set the type yet, we return
    3078                 :            : // an abstract complex type.
    3079                 :            : 
    3080                 :            : Type*
    3081                 :      26429 : Complex_expression::do_type()
    3082                 :            : {
    3083                 :      26429 :   if (this->type_ == NULL)
    3084                 :       2797 :     this->type_ = Type::make_abstract_complex_type();
    3085                 :      26429 :   return this->type_;
    3086                 :            : }
    3087                 :            : 
    3088                 :            : // Set the type of the complex value.  Here we may switch from an
    3089                 :            : // abstract type to a real type.
    3090                 :            : 
    3091                 :            : void
    3092                 :       2874 : Complex_expression::do_determine_type(const Type_context* context)
    3093                 :            : {
    3094                 :       2874 :   if (this->type_ != NULL && !this->type_->is_abstract())
    3095                 :            :     ;
    3096                 :       2735 :   else if (context->type != NULL && context->type->is_numeric_type())
    3097                 :       2479 :     this->type_ = context->type;
    3098                 :        256 :   else if (!context->may_be_abstract)
    3099                 :        230 :     this->type_ = Type::lookup_complex_type("complex128");
    3100                 :       2874 : }
    3101                 :            : 
    3102                 :            : // Check the type of a complex value.
    3103                 :            : 
    3104                 :            : void
    3105                 :       2820 : Complex_expression::do_check_types(Gogo*)
    3106                 :            : {
    3107                 :       2820 :   Type* type = this->type_;
    3108                 :       2820 :   if (type == NULL)
    3109                 :          0 :     return;
    3110                 :       5640 :   Numeric_constant nc;
    3111                 :       2820 :   nc.set_complex(NULL, this->val_);
    3112                 :       2820 :   if (!nc.set_type(this->type_, true, this->location()))
    3113                 :          0 :     this->set_is_error();
    3114                 :            : }
    3115                 :            : 
    3116                 :            : // Get the backend representation for a complex constant.
    3117                 :            : 
    3118                 :            : Bexpression*
    3119                 :       2848 : Complex_expression::do_get_backend(Translate_context* context)
    3120                 :            : {
    3121                 :       2848 :   if (this->is_error_expression()
    3122                 :       2848 :       || (this->type_ != NULL && this->type_->is_error_type()))
    3123                 :            :     {
    3124                 :          0 :       go_assert(saw_errors());
    3125                 :          0 :       return context->gogo()->backend()->error_expression();
    3126                 :            :     }
    3127                 :            : 
    3128                 :       2848 :   Type* resolved_type;
    3129                 :       2848 :   if (this->type_ != NULL && !this->type_->is_abstract())
    3130                 :       2848 :     resolved_type = this->type_;
    3131                 :          0 :   else if (this->type_ != NULL && this->type_->integer_type() != NULL)
    3132                 :            :     {
    3133                 :            :       // We are converting to an abstract integer type.
    3134                 :          0 :       resolved_type = Type::lookup_integer_type("int");
    3135                 :            :     }
    3136                 :          0 :   else if (this->type_ != NULL && this->type_->float_type() != NULL)
    3137                 :            :     {
    3138                 :            :       // We are converting to an abstract float type.
    3139                 :          0 :       resolved_type = Type::lookup_float_type("float64");
    3140                 :            :     }
    3141                 :            :   else
    3142                 :            :     {
    3143                 :            :       // If we still have an abstract type here, this is being
    3144                 :            :       // used in a constant expression which didn't get reduced.  We
    3145                 :            :       // just use complex128 and hope for the best.
    3146                 :          0 :       resolved_type = Type::lookup_complex_type("complex128");
    3147                 :            :     }
    3148                 :            : 
    3149                 :       5696 :   Numeric_constant nc;
    3150                 :       2848 :   nc.set_complex(resolved_type, this->val_);
    3151                 :       2848 :   return Expression::backend_numeric_constant_expression(context, &nc);
    3152                 :            : }
    3153                 :            : 
    3154                 :            : // Write REAL/IMAG to export data.
    3155                 :            : 
    3156                 :            : void
    3157                 :         25 : Complex_expression::export_complex(String_dump* exp, const mpc_t val)
    3158                 :            : {
    3159                 :         25 :   if (!mpfr_zero_p(mpc_realref(val)))
    3160                 :            :     {
    3161                 :         19 :       Float_expression::export_float(exp, mpc_realref(val));
    3162                 :         19 :       if (mpfr_sgn(mpc_imagref(val)) >= 0)
    3163                 :         15 :         exp->write_c_string("+");
    3164                 :            :     }
    3165                 :         25 :   Float_expression::export_float(exp, mpc_imagref(val));
    3166                 :         25 :   exp->write_c_string("i");
    3167                 :         25 : }
    3168                 :            : 
    3169                 :            : // Export a complex number in a constant expression.
    3170                 :            : 
    3171                 :            : void
    3172                 :         25 : Complex_expression::do_export(Export_function_body* efb) const
    3173                 :            : {
    3174                 :         25 :   bool added_type = false;
    3175                 :         25 :   if (this->type_ != NULL
    3176                 :         25 :       && !this->type_->is_abstract()
    3177                 :         28 :       && this->type_ != efb->type_context())
    3178                 :            :     {
    3179                 :          3 :       efb->write_c_string("$convert(");
    3180                 :          3 :       efb->write_type(this->type_);
    3181                 :          3 :       efb->write_c_string(", ");
    3182                 :          3 :       added_type = true;
    3183                 :            :     }
    3184                 :            : 
    3185                 :         25 :   Complex_expression::export_complex(efb, this->val_);
    3186                 :            :   // A trailing space lets us reliably identify the end of the number.
    3187                 :         25 :   efb->write_c_string(" ");
    3188                 :            : 
    3189                 :         25 :   if (added_type)
    3190                 :          3 :     efb->write_c_string(")");
    3191                 :         25 : }
    3192                 :            : 
    3193                 :            : // Dump a complex expression to the dump file.
    3194                 :            : 
    3195                 :            : void
    3196                 :          0 : Complex_expression::do_dump_expression(Ast_dump_context* ast_dump_context) const
    3197                 :            : {
    3198                 :          0 :   Complex_expression::export_complex(ast_dump_context, this->val_);
    3199                 :          0 : }
    3200                 :            : 
    3201                 :            : // Make a complex expression.
    3202                 :            : 
    3203                 :            : Expression*
    3204                 :       3694 : Expression::make_complex(const mpc_t* val, Type* type, Location location)
    3205                 :            : {
    3206                 :       3694 :   return new Complex_expression(val, type, location);
    3207                 :            : }
    3208                 :            : 
    3209                 :            : // Find a named object in an expression.
    3210                 :            : 
    3211                 :     342709 : class Find_named_object : public Traverse
    3212                 :            : {
    3213                 :            :  public:
    3214                 :     342709 :   Find_named_object(Named_object* no)
    3215                 :     342709 :     : Traverse(traverse_expressions),
    3216                 :     342709 :       no_(no), found_(false)
    3217                 :            :   { }
    3218                 :            : 
    3219                 :            :   // Whether we found the object.
    3220                 :            :   bool
    3221                 :     342709 :   found() const
    3222                 :     342709 :   { return this->found_; }
    3223                 :            : 
    3224                 :            :  protected:
    3225                 :            :   int
    3226                 :            :   expression(Expression**);
    3227                 :            : 
    3228                 :            :  private:
    3229                 :            :   // The object we are looking for.
    3230                 :            :   Named_object* no_;
    3231                 :            :   // Whether we found it.
    3232                 :            :   bool found_;
    3233                 :            : };
    3234                 :            : 
    3235                 :            : // A reference to a const in an expression.
    3236                 :            : 
    3237                 :            : class Const_expression : public Expression
    3238                 :            : {
    3239                 :            :  public:
    3240                 :     392490 :   Const_expression(Named_object* constant, Location location)
    3241                 :     392490 :     : Expression(EXPRESSION_CONST_REFERENCE, location),
    3242                 :     784980 :       constant_(constant), type_(NULL), seen_(false)
    3243                 :            :   { }
    3244                 :            : 
    3245                 :            :   Named_object*
    3246                 :       8388 :   named_object()
    3247                 :       8388 :   { return this->constant_; }
    3248                 :            : 
    3249                 :            :   const Named_object*
    3250                 :      16046 :   named_object() const
    3251                 :      16046 :   { return this->constant_; }
    3252                 :            : 
    3253                 :            :   // Check that the initializer does not refer to the constant itself.
    3254                 :            :   void
    3255                 :            :   check_for_init_loop();
    3256                 :            : 
    3257                 :            :  protected:
    3258                 :            :   int
    3259                 :            :   do_traverse(Traverse*);
    3260                 :            : 
    3261                 :            :   Expression*
    3262                 :            :   do_lower(Gogo*, Named_object*, Statement_inserter*, int);
    3263                 :            : 
    3264                 :            :   bool
    3265                 :     197030 :   do_is_constant() const
    3266                 :     197030 :   { return true; }
    3267                 :            : 
    3268                 :            :   bool
    3269                 :         31 :   do_is_zero_value() const
    3270                 :         31 :   { return this->constant_->const_value()->expr()->is_zero_value(); }
    3271                 :            : 
    3272                 :            :   bool
    3273                 :      58486 :   do_is_static_initializer() const
    3274                 :      58486 :   { return true; }
    3275                 :            : 
    3276                 :            :   bool
    3277                 :            :   do_numeric_constant_value(Numeric_constant* nc) const;
    3278                 :            : 
    3279                 :            :   bool
    3280                 :            :   do_string_constant_value(std::string* val) const;
    3281                 :            : 
    3282                 :            :   bool
    3283                 :            :   do_boolean_constant_value(bool* val) const;
    3284                 :            : 
    3285                 :            :   Type*
    3286                 :            :   do_type();
    3287                 :            : 
    3288                 :            :   // The type of a const is set by the declaration, not the use.
    3289                 :            :   void
    3290                 :            :   do_determine_type(const Type_context*);
    3291                 :            : 
    3292                 :            :   void
    3293                 :            :   do_check_types(Gogo*);
    3294                 :            : 
    3295                 :            :   Expression*
    3296                 :      31699 :   do_copy()
    3297                 :      31699 :   { return this; }
    3298                 :            : 
    3299                 :            :   Bexpression*
    3300                 :            :   do_get_backend(Translate_context* context);
    3301                 :            : 
    3302                 :            :   int
    3303                 :     426744 :   do_inlining_cost() const
    3304                 :     426744 :   { return 1; }
    3305                 :            : 
    3306                 :            :   // When exporting a reference to a const as part of a const
    3307                 :            :   // expression, we export the value.  We ignore the fact that it has
    3308                 :            :   // a name.
    3309                 :            :   void
    3310                 :      26829 :   do_export(Export_function_body* efb) const
    3311                 :      26829 :   { this->constant_->const_value()->expr()->export_expression(efb); }
    3312                 :            : 
    3313                 :            :   void
    3314                 :            :   do_dump_expression(Ast_dump_context*) const;
    3315                 :            : 
    3316                 :            :  private:
    3317                 :            :   // The constant.
    3318                 :            :   Named_object* constant_;
    3319                 :            :   // The type of this reference.  This is used if the constant has an
    3320                 :            :   // abstract type.
    3321                 :            :   Type* type_;
    3322                 :            :   // Used to prevent infinite recursion when a constant incorrectly
    3323                 :            :   // refers to itself.
    3324                 :            :   mutable bool seen_;
    3325                 :            : };
    3326                 :            : 
    3327                 :            : // Traversal.
    3328                 :            : 
    3329                 :            : int
    3330                 :    6334910 : Const_expression::do_traverse(Traverse* traverse)
    3331                 :            : {
    3332                 :    6334910 :   if (this->type_ != NULL)
    3333                 :    2457260 :     return Type::traverse(this->type_, traverse);
    3334                 :            :   return TRAVERSE_CONTINUE;
    3335                 :            : }
    3336                 :            : 
    3337                 :            : // Lower a constant expression.  This is where we convert the
    3338                 :            : // predeclared constant iota into an integer value.
    3339                 :            : 
    3340                 :            : Expression*
    3341                 :     862097 : Const_expression::do_lower(Gogo* gogo, Named_object*,
    3342                 :            :                            Statement_inserter*, int iota_value)
    3343                 :            : {
    3344                 :     862097 :   if (this->constant_->const_value()->expr()->classification()
    3345                 :            :       == EXPRESSION_IOTA)
    3346                 :            :     {
    3347                 :       8749 :       if (iota_value == -1)
    3348                 :            :         {
    3349                 :          4 :           go_error_at(this->location(),
    3350                 :            :                       "iota is only defined in const declarations");
    3351                 :          4 :           iota_value = 0;
    3352                 :            :         }
    3353                 :       8749 :       return Expression::make_integer_ul(iota_value, NULL, this->location());
    3354                 :            :     }
    3355                 :            : 
    3356                 :            :   // Make sure that the constant itself has been lowered.
    3357                 :     853348 :   gogo->lower_constant(this->constant_);
    3358                 :            : 
    3359                 :     853348 :   return this;
    3360                 :            : }
    3361                 :            : 
    3362                 :            : // Return a numeric constant value.
    3363                 :            : 
    3364                 :            : bool
    3365                 :     286654 : Const_expression::do_numeric_constant_value(Numeric_constant* nc) const
    3366                 :            : {
    3367                 :     286654 :   if (this->seen_)
    3368                 :            :     return false;
    3369                 :            : 
    3370                 :     286654 :   Expression* e = this->constant_->const_value()->expr();
    3371                 :            : 
    3372                 :     286654 :   this->seen_ = true;
    3373                 :            : 
    3374                 :     286654 :   bool r = e->numeric_constant_value(nc);
    3375                 :            : 
    3376                 :     286654 :   this->seen_ = false;
    3377                 :            : 
    3378                 :     286654 :   Type* ctype;
    3379                 :     286654 :   if (this->type_ != NULL)
    3380                 :            :     ctype = this->type_;
    3381                 :            :   else
    3382                 :      68958 :     ctype = this->constant_->const_value()->type();
    3383                 :     286654 :   if (r && ctype != NULL)
    3384                 :            :     {
    3385                 :     252725 :       if (!nc->set_type(ctype, false, this->location()))
    3386                 :        870 :         return false;
    3387                 :            :     }
    3388                 :            : 
    3389                 :            :   return r;
    3390                 :            : }
    3391                 :            : 
    3392                 :            : bool
    3393                 :       8834 : Const_expression::do_string_constant_value(std::string* val) const
    3394                 :            : {
    3395                 :       8834 :   if (this->seen_)
    3396                 :            :     return false;
    3397                 :            : 
    3398                 :       8834 :   Expression* e = this->constant_->const_value()->expr();
    3399                 :            : 
    3400                 :       8834 :   this->seen_ = true;
    3401                 :       8834 :   bool ok = e->string_constant_value(val);
    3402                 :       8834 :   this->seen_ = false;
    3403                 :            : 
    3404                 :       8834 :   return ok;
    3405                 :            : }
    3406                 :            : 
    3407                 :            : bool
    3408                 :       5252 : Const_expression::do_boolean_constant_value(bool* val) const
    3409                 :            : {
    3410                 :       5252 :   if (this->seen_)
    3411                 :            :     return false;
    3412                 :            : 
    3413                 :       5252 :   Expression* e = this->constant_->const_value()->expr();
    3414                 :            : 
    3415                 :       5252 :   this->seen_ = true;
    3416                 :       5252 :   bool ok = e->boolean_constant_value(val);
    3417                 :       5252 :   this->seen_ = false;
    3418                 :            : 
    3419                 :       5252 :   return ok;
    3420                 :            : }
    3421                 :            : 
    3422                 :            : // Return the type of the const reference.
    3423                 :            : 
    3424                 :            : Type*
    3425                 :    3579100 : Const_expression::do_type()
    3426                 :            : {
    3427                 :    3579100 :   if (this->type_ != NULL)
    3428                 :            :     return this->type_;
    3429                 :            : 
    3430                 :    2547930 :   Named_constant* nc = this->constant_->const_value();
    3431                 :            : 
    3432                 :    2547930 :   if (this->seen_ || nc->lowering())
    3433                 :            :     {
    3434                 :          4 :       if (nc->type() == NULL || !nc->type()->is_error_type())
    3435                 :            :         {
    3436                 :          2 :           Location loc = this->location();
    3437                 :          2 :           if (!this->seen_)
    3438                 :          2 :             loc = nc->location();
    3439                 :          2 :           go_error_at(loc, "constant refers to itself");
    3440                 :            :         }
    3441                 :          4 :       this->set_is_error();
    3442                 :          4 :       this->type_ = Type::make_error_type();
    3443                 :          4 :       nc->set_type(this->type_);
    3444                 :          4 :       return this->type_;
    3445                 :            :     }
    3446                 :            : 
    3447                 :    2547930 :   this->seen_ = true;
    3448                 :            : 
    3449                 :    2547930 :   Type* ret = nc->type();
    3450                 :            : 
    3451                 :    2547930 :   if (ret != NULL)
    3452                 :            :     {
    3453                 :    2078980 :       this->seen_ = false;
    3454                 :    2078980 :       return ret;
    3455                 :            :     }
    3456                 :            : 
    3457                 :            :   // During parsing, a named constant may have a NULL type, but we
    3458                 :            :   // must not return a NULL type here.
    3459                 :     468946 :   ret = nc->expr()->type();
    3460                 :            : 
    3461                 :     468946 :   this->seen_ = false;
    3462                 :            : 
    3463                 :     468946 :   if (ret->is_error_type())
    3464                 :          2 :     nc->set_type(ret);
    3465                 :            : 
    3466                 :            :   return ret;
    3467                 :            : }
    3468                 :            : 
    3469                 :            : // Set the type of the const reference.
    3470                 :            : 
    3471                 :            : void
    3472                 :     424808 : Const_expression::do_determine_type(const Type_context* context)
    3473                 :            : {
    3474                 :     424808 :   Type* ctype = this->constant_->const_value()->type();
    3475                 :     424808 :   Type* cetype = (ctype != NULL
    3476                 :     424808 :                   ? ctype
    3477                 :      39374 :                   : this->constant_->const_value()->expr()->type());
    3478                 :     424808 :   if (ctype != NULL && !ctype->is_abstract())
    3479                 :            :     ;
    3480                 :     208868 :   else if (context->type != NULL
    3481                 :     176452 :            && context->type->is_numeric_type()
    3482                 :     296840 :            && cetype->is_numeric_type())
    3483                 :      87969 :     this->type_ = context->type;
    3484                 :     120899 :   else if (context->type != NULL
    3485                 :      88483 :            && context->type->is_string_type()
    3486                 :     127192 :            && cetype->is_string_type())
    3487                 :       6115 :     this->type_ = context->type;
    3488                 :     114784 :   else if (context->type != NULL
    3489                 :      82368 :            && context->type->is_boolean_type()
    3490                 :     194633 :            && cetype->is_boolean_type())
    3491                 :      79849 :     this->type_ = context->type;
    3492                 :      34935 :   else if (!context->may_be_abstract)
    3493                 :            :     {
    3494                 :       8264 :       if (cetype->is_abstract())
    3495                 :       7130 :         cetype = cetype->make_non_abstract_type();
    3496                 :       8264 :       this->type_ = cetype;
    3497                 :            :     }
    3498                 :     424808 : }
    3499                 :            : 
    3500                 :            : // Check for a loop in which the initializer of a constant refers to
    3501                 :            : // the constant itself.
    3502                 :            : 
    3503                 :            : void
    3504                 :     342709 : Const_expression::check_for_init_loop()
    3505                 :            : {
    3506                 :     507490 :   if (this->type_ != NULL && this->type_->is_error())
    3507                 :          0 :     return;
    3508                 :            : 
    3509                 :     342709 :   if (this->seen_)
    3510                 :            :     {
    3511                 :          0 :       this->report_error(_("constant refers to itself"));
    3512                 :          0 :       this->type_ = Type::make_error_type();
    3513                 :          0 :       return;
    3514                 :            :     }
    3515                 :            : 
    3516                 :     342709 :   Expression* init = this->constant_->const_value()->expr();
    3517                 :     685418 :   Find_named_object find_named_object(this->constant_);
    3518                 :            : 
    3519                 :     342709 :   this->seen_ = true;
    3520                 :     342709 :   Expression::traverse(&init, &find_named_object);
    3521                 :     342709 :   this->seen_ = false;
    3522                 :            : 
    3523                 :     342709 :   if (find_named_object.found())
    3524                 :            :     {
    3525                 :          0 :       if (this->type_ == NULL || !this->type_->is_error())
    3526                 :            :         {
    3527                 :          0 :           this->report_error(_("constant refers to itself"));
    3528                 :          0 :           this->type_ = Type::make_error_type();
    3529                 :            :         }
    3530                 :          0 :       return;
    3531                 :            :     }
    3532                 :            : }
    3533                 :            : 
    3534                 :            : // Check types of a const reference.
    3535                 :            : 
    3536                 :            : void
    3537                 :     334408 : Const_expression::do_check_types(Gogo*)
    3538                 :            : {
    3539                 :     491363 :   if (this->type_ != NULL && this->type_->is_error())
    3540                 :            :     return;
    3541                 :            : 
    3542                 :     334408 :   this->check_for_init_loop();
    3543                 :            : 
    3544                 :            :   // Check that numeric constant fits in type.
    3545                 :     334408 :   if (this->type_ != NULL && this->type_->is_numeric_type())
    3546                 :            :     {
    3547                 :     165960 :       Numeric_constant nc;
    3548                 :      82980 :       if (this->constant_->const_value()->expr()->numeric_constant_value(&nc))
    3549                 :            :         {
    3550                 :      82980 :           if (!nc.set_type(this->type_, true, this->location()))
    3551                 :        873 :             this->set_is_error();
    3552                 :            :         }
    3553                 :            :     }
    3554                 :            : }
    3555                 :            : 
    3556                 :            : // Return the backend representation for a const reference.
    3557                 :            : 
    3558                 :            : Bexpression*
    3559                 :     231238 : Const_expression::do_get_backend(Translate_context* context)
    3560                 :            : {
    3561                 :     231238 :   if (this->is_error_expression()
    3562                 :     386311 :       || (this->type_ != NULL && this->type_->is_error()))
    3563                 :            :     {
    3564                 :          0 :       go_assert(saw_errors());
    3565                 :          0 :       return context->backend()->error_expression();
    3566                 :            :     }
    3567                 :            : 
    3568                 :            :   // If the type has been set for this expression, but the underlying
    3569                 :            :   // object is an abstract int or float, we try to get the abstract
    3570                 :            :   // value.  Otherwise we may lose something in the conversion.
    3571                 :     231238 :   Expression* expr = this->constant_->const_value()->expr();
    3572                 :     231238 :   if (this->type_ != NULL
    3573                 :     155073 :       && this->type_->is_numeric_type()
    3574                 :     311564 :       && (this->constant_->const_value()->type() == NULL
    3575                 :      80326 :           || this->constant_->const_value()->type()->is_abstract()))
    3576                 :            :     {
    3577                 :      78382 :       Numeric_constant nc;
    3578                 :      78382 :       if (expr->numeric_constant_value(&nc)
    3579                 :      78382 :           && nc.set_type(this->type_, false, this->location()))
    3580                 :            :         {
    3581                 :      78382 :           Expression* e = nc.expression(this->location());
    3582                 :      78382 :           return e->get_backend(context);
    3583                 :            :         }
    3584                 :            :     }
    3585                 :            : 
    3586                 :     152856 :   if (this->type_ != NULL)
    3587                 :      76691 :     expr = Expression::make_cast(this->type_, expr, this->location());
    3588                 :     152856 :   return expr->get_backend(context);
    3589                 :            : }
    3590                 :            : 
    3591                 :            : // Dump ast representation for constant expression.
    3592                 :            : 
    3593                 :            : void
    3594                 :          0 : Const_expression::do_dump_expression(Ast_dump_context* ast_dump_context) const
    3595                 :            : {
    3596                 :          0 :   ast_dump_context->ostream() << this->constant_->name();
    3597                 :          0 : }
    3598                 :            : 
    3599                 :            : // Make a reference to a constant in an expression.
    3600                 :            : 
    3601                 :            : Expression*
    3602                 :     392490 : Expression::make_const_reference(Named_object* constant,
    3603                 :            :                                  Location location)
    3604                 :            : {
    3605                 :     392490 :   return new Const_expression(constant, location);
    3606                 :            : }
    3607                 :            : 
    3608                 :            : // Find a named object in an expression.
    3609                 :            : 
    3610                 :            : int
    3611                 :     342865 : Find_named_object::expression(Expression** pexpr)
    3612                 :            : {
    3613                 :     342865 :   switch ((*pexpr)->classification())
    3614                 :            :     {
    3615                 :       8301 :     case Expression::EXPRESSION_CONST_REFERENCE:
    3616                 :       8301 :       {
    3617                 :       8301 :         Const_expression* ce = static_cast<Const_expression*>(*pexpr);
    3618                 :       8301 :         if (ce->named_object() == this->no_)
    3619                 :            :           break;
    3620                 :            : 
    3621                 :            :         // We need to check a constant initializer explicitly, as
    3622                 :            :         // loops here will not be caught by the loop checking for
    3623                 :            :         // variable initializers.
    3624                 :       8301 :         ce->check_for_init_loop();
    3625                 :            : 
    3626                 :       8301 :         return TRAVERSE_CONTINUE;
    3627                 :            :       }
    3628                 :            : 
    3629                 :          0 :     case Expression::EXPRESSION_VAR_REFERENCE:
    3630                 :          0 :       if ((*pexpr)->var_expression()->named_object() == this->no_)
    3631                 :            :         break;
    3632                 :            :       return TRAVERSE_CONTINUE;
    3633                 :          0 :     case Expression::EXPRESSION_FUNC_REFERENCE:
    3634                 :          0 :       if ((*pexpr)->func_expression()->named_object() == this->no_)
    3635                 :            :         break;
    3636                 :            :       return TRAVERSE_CONTINUE;
    3637                 :            :     default:
    3638                 :            :       return TRAVERSE_CONTINUE;
    3639                 :            :     }
    3640                 :          0 :   this->found_ = true;
    3641                 :          0 :   return TRAVERSE_EXIT;
    3642                 :            : }
    3643                 :            : 
    3644                 :            : // The nil value.
    3645                 :            : 
    3646                 :            : class Nil_expression : public Expression
    3647                 :            : {
    3648                 :            :  public:
    3649                 :    1897000 :   Nil_expression(Location location)
    3650                 :    3794000 :     : Expression(EXPRESSION_NIL, location)
    3651                 :            :   { }
    3652                 :            : 
    3653                 :            :   static Expression*
    3654                 :            :   do_import(Import_expression*, Location);
    3655                 :            : 
    3656                 :            :  protected:
    3657                 :            :   bool
    3658                 :      23514 :   do_is_constant() const
    3659                 :      23514 :   { return true; }
    3660                 :            : 
    3661                 :            :   bool
    3662                 :         17 :   do_is_zero_value() const
    3663                 :         17 :   { return true; }
    3664                 :            : 
    3665                 :            :   bool
    3666                 :     517512 :   do_is_static_initializer() const
    3667                 :     517512 :   { return true; }
    3668                 :            : 
    3669                 :            :   Type*
    3670                 :    1516890 :   do_type()
    3671                 :    1516890 :   { return Type::make_nil_type(); }
    3672                 :            : 
    3673                 :            :   void
    3674                 :      36804 :   do_determine_type(const Type_context*)
    3675                 :      36804 :   { }
    3676                 :            : 
    3677                 :            :   Expression*
    3678                 :          0 :   do_copy()
    3679                 :          0 :   { return this; }
    3680                 :            : 
    3681                 :            :   Bexpression*
    3682                 :    1002380 :   do_get_backend(Translate_context* context)
    3683                 :    1002380 :   { return context->backend()->nil_pointer_expression(); }
    3684                 :            : 
    3685                 :            :   int
    3686                 :      13899 :   do_inlining_cost() const
    3687                 :      13899 :   { return 1; }
    3688                 :            : 
    3689                 :            :   void
    3690                 :       1159 :   do_export(Export_function_body* efb) const
    3691                 :       1159 :   { efb->write_c_string("$nil"); }
    3692                 :            : 
    3693                 :            :   void
    3694                 :          0 :   do_dump_expression(Ast_dump_context* ast_dump_context) const
    3695                 :          0 :   { ast_dump_context->ostream() << "nil"; }
    3696                 :            : };
    3697                 :            : 
    3698                 :            : // Import a nil expression.
    3699                 :            : 
    3700                 :            : Expression*
    3701                 :        396 : Nil_expression::do_import(Import_expression* imp, Location loc)
    3702                 :            : {
    3703                 :        396 :   if (imp->version() >= EXPORT_FORMAT_V3)
    3704                 :        396 :     imp->require_c_string("$");
    3705                 :        396 :   imp->require_c_string("nil");
    3706                 :        396 :   return Expression::make_nil(loc);
    3707                 :            : }
    3708                 :            : 
    3709                 :            : // Make a nil expression.
    3710                 :            : 
    3711                 :            : Expression*
    3712                 :    1897000 : Expression::make_nil(Location location)
    3713                 :            : {
    3714                 :    1897000 :   return new Nil_expression(location);
    3715                 :            : }
    3716                 :            : 
    3717                 :            : // The value of the predeclared constant iota.  This is little more
    3718                 :            : // than a marker.  This will be lowered to an integer in
    3719                 :            : // Const_expression::do_lower, which is where we know the value that
    3720                 :            : // it should have.
    3721                 :            : 
    3722                 :            : class Iota_expression : public Parser_expression
    3723                 :            : {
    3724                 :            :  public:
    3725                 :       3372 :   Iota_expression(Location location)
    3726                 :       6744 :     : Parser_expression(EXPRESSION_IOTA, location)
    3727                 :            :   { }
    3728                 :            : 
    3729                 :            :  protected:
    3730                 :            :   Expression*
    3731                 :          0 :   do_lower(Gogo*, Named_object*, Statement_inserter*, int)
    3732                 :          0 :   { go_unreachable(); }
    3733                 :            : 
    3734                 :            :   // There should only ever be one of these.
    3735                 :            :   Expression*
    3736                 :          0 :   do_copy()
    3737                 :          0 :   { go_unreachable(); }
    3738                 :            : 
    3739                 :            :   void
    3740                 :          0 :   do_dump_expression(Ast_dump_context* ast_dump_context) const
    3741                 :          0 :   { ast_dump_context->ostream() << "iota"; }
    3742                 :            : };
    3743                 :            : 
    3744                 :            : // Make an iota expression.  This is only called for one case: the
    3745                 :            : // value of the predeclared constant iota.
    3746                 :            : 
    3747                 :            : Expression*
    3748                 :       3372 : Expression::make_iota()
    3749                 :            : {
    3750                 :       3372 :   static Iota_expression iota_expression(Linemap::unknown_location());
    3751                 :       3372 :   return &iota_expression;
    3752                 :            : }
    3753                 :            : 
    3754                 :            : // Class Type_conversion_expression.
    3755                 :            : 
    3756                 :            : // Traversal.
    3757                 :            : 
    3758                 :            : int
    3759                 :    5286260 : Type_conversion_expression::do_traverse(Traverse* traverse)
    3760                 :            : {
    3761                 :    5286260 :   if (Expression::traverse(&this->expr_, traverse) == TRAVERSE_EXIT
    3762                 :    5286260 :       || Type::traverse(this->type_, traverse) == TRAVERSE_EXIT)
    3763                 :      62438 :     return TRAVERSE_EXIT;
    3764                 :            :   return TRAVERSE_CONTINUE;
    3765                 :            : }
    3766                 :            : 
    3767                 :            : // Convert to a constant at lowering time.
    3768                 :            : 
    3769                 :            : Expression*
    3770                 :     323046 : Type_conversion_expression::do_lower(Gogo*, Named_object*,
    3771                 :            :                                      Statement_inserter*, int)
    3772                 :            : {
    3773                 :     323046 :   Type* type = this->type_;
    3774                 :     323046 :   Expression* val = this->expr_;
    3775                 :     323046 :   Location location = this->location();
    3776                 :            : 
    3777                 :     323046 :   if (type->is_numeric_type())
    3778                 :            :     {
    3779                 :     332174 :       Numeric_constant nc;
    3780                 :     179499 :       if (val->numeric_constant_value(&nc))
    3781                 :            :         {
    3782                 :      26824 :           if (!nc.set_type(type, true, location))
    3783                 :      26824 :             return Expression::make_error(location);
    3784                 :      26811 :           return nc.expression(location);
    3785                 :            :         }
    3786                 :            :     }
    3787                 :            : 
    3788                 :            :   // According to the language specification on string conversions
    3789                 :            :   // (http://golang.org/ref/spec#Conversions_to_and_from_a_string_type):
    3790                 :            :   // When converting an integer into a string, the string will be a UTF-8
    3791                 :            :   // representation of the integer and integers "outside the range of valid
    3792                 :            :   // Unicode code points are converted to '\uFFFD'."
    3793                 :     296222 :   if (type->is_string_type())
    3794                 :            :     {
    3795                 :      35049 :       Numeric_constant nc;
    3796                 :      17525 :       if (val->numeric_constant_value(&nc) && nc.is_int())
    3797                 :            :         {
    3798                 :            :           // An integer value doesn't fit in the Unicode code point range if it
    3799                 :            :           // overflows the Go "int" type or is negative.
    3800                 :        310 :           unsigned long ul;
    3801                 :        310 :           if (!nc.set_type(Type::lookup_integer_type("int"), false, location)
    3802                 :        310 :               || nc.to_unsigned_long(&ul) == Numeric_constant::NC_UL_NEGATIVE)
    3803                 :          1 :             return Expression::make_string("\ufffd", location);
    3804                 :            :         }
    3805                 :            :     }
    3806                 :            : 
    3807                 :     296221 :   if (type->is_slice_type())
    3808                 :            :     {
    3809                 :      22890 :       Type* element_type = type->array_type()->element_type()->forwarded();
    3810                 :      21892 :       bool is_byte = (element_type->integer_type() != NULL
    3811                 :      10447 :                       && element_type->integer_type()->is_byte());
    3812                 :      21892 :       bool is_rune = (element_type->integer_type() != NULL
    3813                 :      10447 :                       && element_type->integer_type()->is_rune());
    3814                 :      11445 :       if (is_byte || is_rune)
    3815                 :            :         {
    3816                 :      13622 :           std::string s;
    3817                 :       9044 :           if (val->string_constant_value(&s))
    3818                 :            :             {
    3819                 :       4466 :               Expression_list* vals = new Expression_list();
    3820                 :       4466 :               if (is_byte)
    3821                 :            :                 {
    3822                 :       4412 :                   for (std::string::const_iterator p = s.begin();
    3823                 :     138347 :                        p != s.end();
    3824                 :     133935 :                        p++)
    3825                 :            :                     {
    3826                 :     133935 :                       unsigned char c = static_cast<unsigned char>(*p);
    3827                 :     133935 :                       vals->push_back(Expression::make_integer_ul(c,
    3828                 :            :                                                                   element_type,
    3829                 :            :                                                                   location));
    3830                 :            :                     }
    3831                 :            :                 }
    3832                 :            :               else
    3833                 :            :                 {
    3834                 :         54 :                   const char *p = s.data();
    3835                 :         54 :                   const char *pend = s.data() + s.length();
    3836                 :        607 :                   while (p < pend)
    3837                 :            :                     {
    3838                 :        553 :                       unsigned int c;
    3839                 :        553 :                       int adv = Lex::fetch_char(p, &c);
    3840                 :        553 :                       if (adv == 0)
    3841                 :            :                         {
    3842                 :          4 :                           go_warning_at(this->location(), 0,
    3843                 :            :                                      "invalid UTF-8 encoding");
    3844                 :          4 :                           adv = 1;
    3845                 :            :                         }
    3846                 :        553 :                       p += adv;
    3847                 :        553 :                       vals->push_back(Expression::make_integer_ul(c,
    3848                 :            :                                                                   element_type,
    3849                 :            :                                                                   location));
    3850                 :            :                     }
    3851                 :            :                 }
    3852                 :            : 
    3853                 :       4466 :               return Expression::make_slice_composite_literal(type, vals,
    3854                 :       4466 :                                                               location);
    3855                 :            :             }
    3856                 :            :         }
    3857                 :            :     }
    3858                 :            : 
    3859                 :     291755 :   return this;
    3860                 :            : }
    3861                 :            : 
    3862                 :            : // Flatten a type conversion by using a temporary variable for the slice
    3863                 :            : // in slice to string conversions.
    3864                 :            : 
    3865                 :            : Expression*
    3866                 :     705227 : Type_conversion_expression::do_flatten(Gogo*, Named_object*,
    3867                 :            :                                        Statement_inserter* inserter)
    3868                 :            : {
    3869                 :     705227 :   if (this->type()->is_error_type() || this->expr_->is_error_expression())
    3870                 :            :     {
    3871                 :        728 :       go_assert(saw_errors());
    3872                 :        728 :       return Expression::make_error(this->location());
    3873                 :            :     }
    3874                 :            : 
    3875                 :     704499 :   if (((this->type()->is_string_type()
    3876                 :      18759 :         && this->expr_->type()->is_slice_type())
    3877                 :     699237 :        || this->expr_->type()->interface_type() != NULL)
    3878                 :     735614 :       && !this->expr_->is_variable())
    3879                 :            :     {
    3880                 :       5810 :       Temporary_statement* temp =
    3881                 :       5810 :           Statement::make_temporary(NULL, this->expr_, this->location());
    3882                 :       5810 :       inserter->insert(temp);
    3883                 :       5810 :       this->expr_ = Expression::make_temporary_reference(temp, this->location());
    3884                 :            :     }
    3885                 :            : 
    3886                 :            :   // For interface conversion and string to/from slice conversions,
    3887                 :            :   // decide if we can allocate on stack.
    3888                 :     704499 :   if (this->type()->interface_type() != NULL
    3889                 :     492803 :       || this->type()->is_string_type()
    3890                 :     474044 :       || this->expr_->type()->is_string_type())
    3891                 :            :     {
    3892                 :     232194 :       Node* n = Node::make_node(this);
    3893                 :     232194 :       if ((n->encoding() & ESCAPE_MASK) == Node::ESCAPE_NONE)
    3894                 :       7294 :         this->no_escape_ = true;
    3895                 :            :     }
    3896                 :     704499 :   return this;
    3897                 :            : }
    3898                 :            : 
    3899                 :            : // Return whether a type conversion is a constant.
    3900                 :            : 
    3901                 :            : bool
    3902                 :      78409 : Type_conversion_expression::do_is_constant() const
    3903                 :            : {
    3904                 :      78409 :   if (!this->expr_->is_constant())
    3905                 :            :     return false;
    3906                 :            : 
    3907                 :            :   // A conversion to a type that may not be used as a constant is not
    3908                 :            :   // a constant.  For example, []byte(nil).
    3909                 :       8892 :   Type* type = this->type_;
    3910                 :      17766 :   if (type->integer_type() == NULL
    3911                 :       8874 :       && type->float_type() == NULL
    3912                 :       8874 :       && type->complex_type() == NULL
    3913                 :       8874 :       && !type->is_boolean_type()
    3914                 :       8483 :       && !type->is_string_type())
    3915                 :       5846 :     return false;
    3916                 :            : 
    3917                 :            :   return true;
    3918                 :            : }
    3919                 :            : 
    3920                 :            : // Return whether a type conversion is a zero value.
    3921                 :            : 
    3922                 :            : bool
    3923                 :        178 : Type_conversion_expression::do_is_zero_value() const
    3924                 :            : {
    3925                 :        178 :   if (!this->expr_->is_zero_value())
    3926                 :            :     return false;
    3927                 :            : 
    3928                 :            :   // Some type conversion from zero value is still not zero value.
    3929                 :            :   // For example, []byte("") or interface{}(0).
    3930                 :            :   // Conservatively, only report true if the RHS is nil.
    3931                 :          0 :   Type* type = this->type_;
    3932                 :          0 :   if (type->integer_type() == NULL
    3933                 :          0 :       && type->float_type() == NULL
    3934                 :          0 :       && type->complex_type() == NULL
    3935                 :          0 :       && !type->is_boolean_type()
    3936                 :          0 :       && !type->is_string_type())
    3937                 :          0 :     return this->expr_->is_nil_expression();
    3938                 :            : 
    3939                 :            :   return true;
    3940                 :            : }
    3941                 :            : 
    3942                 :            : // Return whether a type conversion can be used in a constant
    3943                 :            : // initializer.
    3944                 :            : 
    3945                 :            : bool
    3946                 :      52819 : Type_conversion_expression::do_is_static_initializer() const
    3947                 :            : {
    3948                 :      52819 :   Type* type = this->type_;
    3949                 :      52819 :   Type* expr_type = this->expr_->type();
    3950                 :            : 
    3951                 :      93708 :   if (type->interface_type() != NULL
    3952                 :      52819 :       || expr_type->interface_type() != NULL)
    3953                 :      11930 :     return false;
    3954                 :            : 
    3955                 :      40889 :   if (!this->expr_->is_static_initializer())
    3956                 :            :     return false;
    3957                 :            : 
    3958                 :      30911 :   if (Type::are_identical(type, expr_type,
    3959                 :            :                           Type::COMPARE_ERRORS | Type::COMPARE_TAGS,
    3960                 :            :                           NULL))
    3961                 :            :     return true;
    3962                 :            : 
    3963                 :      20158 :   if (type->is_string_type() && expr_type->is_string_type())
    3964                 :            :     return true;
    3965                 :            : 
    3966                 :      20144 :   if ((type->is_numeric_type()
    3967                 :      20144 :        || type->is_boolean_type()
    3968                 :      20141 :        || type->points_to() != NULL)
    3969                 :      40185 :       && (expr_type->is_numeric_type()
    3970                 :      20039 :           || expr_type->is_boolean_type()
    3971                 :      20036 :           || expr_type->points_to() != NULL))
    3972                 :      20038 :     return true;
    3973                 :            : 
    3974                 :            :   return false;
    3975                 :            : }
    3976                 :            : 
    3977                 :            : // Return the constant numeric value if there is one.
    3978                 :            : 
    3979                 :            : bool
    3980                 :      65292 : Type_conversion_expression::do_numeric_constant_value(
    3981                 :            :     Numeric_constant* nc) const
    3982                 :            : {
    3983                 :      65292 :   if (!this->type_->is_numeric_type())
    3984                 :            :     return false;
    3985                 :      58014 :   if (!this->expr_->numeric_constant_value(nc))
    3986                 :            :     return false;
    3987                 :          0 :   return nc->set_type(this->type_, false, this->location());
    3988                 :            : }
    3989                 :            : 
    3990                 :            : // Return the constant string value if there is one.
    3991                 :            : 
    3992                 :            : bool
    3993                 :       7006 : Type_conversion_expression::do_string_constant_value(std::string* val) const
    3994                 :            : {
    3995                 :       7006 :   if (this->type_->is_string_type()
    3996                 :       7006 :       && this->expr_->type()->integer_type() != NULL)
    3997                 :            :     {
    3998                 :        180 :       Numeric_constant nc;
    3999                 :        120 :       if (this->expr_->numeric_constant_value(&nc))
    4000                 :            :         {
    4001                 :         60 :           unsigned long ival;
    4002                 :         60 :           if (nc.to_unsigned_long(&ival) == Numeric_constant::NC_UL_VALID)
    4003                 :            :             {
    4004                 :         60 :               val->clear();
    4005                 :         60 :               Lex::append_char(ival, true, val, this->location());
    4006                 :         60 :               return true;
    4007                 :            :             }
    4008                 :            :         }
    4009                 :            :     }
    4010                 :            : 
    4011                 :            :   // FIXME: Could handle conversion from const []int here.
    4012                 :            : 
    4013                 :            :   return false;
    4014                 :            : }
    4015                 :            : 
    4016                 :            : // Return the constant boolean value if there is one.
    4017                 :            : 
    4018                 :            : bool
    4019                 :       6280 : Type_conversion_expression::do_boolean_constant_value(bool* val) const
    4020                 :            : {
    4021                 :       6280 :   if (!this->type_->is_boolean_type())
    4022                 :            :     return false;
    4023                 :        965 :   return this->expr_->boolean_constant_value(val);
    4024                 :            : }
    4025                 :            : 
    4026                 :            : // Determine the resulting type of the conversion.
    4027                 :            : 
    4028                 :            : void
    4029                 :     141286 : Type_conversion_expression::do_determine_type(const Type_context*)
    4030                 :            : {
    4031                 :     141286 :   Type_context subcontext(this->type_, false);
    4032                 :     141286 :   this->expr_->determine_type(&subcontext);
    4033                 :     141286 : }
    4034                 :            : 
    4035                 :            : // Check that types are convertible.
    4036                 :            : 
    4037                 :            : void
    4038                 :     133209 : Type_conversion_expression::do_check_types(Gogo*)
    4039                 :            : {
    4040                 :     133209 :   Type* type = this->type_;
    4041                 :     133209 :   Type* expr_type = this->expr_->type();
    4042                 :     133282 :   std::string reason;
    4043                 :            : 
    4044                 :     399627 :   if (type->is_error() || expr_type->is_error())
    4045                 :            :     {
    4046                 :          8 :       this->set_is_error();
    4047                 :     133144 :       return;
    4048                 :            :     }
    4049                 :            : 
    4050                 :     133201 :   if (this->may_convert_function_types_
    4051                 :          0 :       && type->function_type() != NULL
    4052                 :     266337 :       && expr_type->function_type() != NULL)
    4053                 :            :     return;
    4054                 :            : 
    4055                 :     133201 :   if (Type::are_convertible(type, expr_type, &reason))
    4056                 :            :     return;
    4057                 :            : 
    4058                 :         73 :   go_error_at(this->location(), "%s", reason.c_str());
    4059                 :         73 :   this->set_is_error();
    4060                 :            : }
    4061                 :            : 
    4062                 :            : // Copy.
    4063                 :            : 
    4064                 :            : Expression*
    4065                 :       5387 : Type_conversion_expression::do_copy()
    4066                 :            : {
    4067                 :       5387 :   Expression* ret = new Type_conversion_expression(this->type_->copy_expressions(),
    4068                 :       5387 :                                                    this->expr_->copy(),
    4069                 :       5387 :                                                    this->location());
    4070                 :       5387 :   ret->conversion_expression()->set_no_copy(this->no_copy_);
    4071                 :       5387 :   return ret;
    4072                 :            : }
    4073                 :            : 
    4074                 :            : // Get the backend representation for a type conversion.
    4075                 :            : 
    4076                 :            : Bexpression*
    4077                 :    2444310 : Type_conversion_expression::do_get_backend(Translate_context* context)
    4078                 :            : {
    4079                 :    2444310 :   Type* type = this->type_;
    4080                 :    2444310 :   Type* expr_type = this->expr_->type();
    4081                 :            : 
    4082                 :    2444310 :   Gogo* gogo = context->gogo();
    4083                 :    2444310 :   Btype* btype = type->get_backend(gogo);
    4084                 :    2444310 :   Location loc = this->location();
    4085                 :            : 
    4086                 :    2444310 :   if (Type::are_identical(type, expr_type,
    4087                 :            :                           Type::COMPARE_ERRORS | Type::COMPARE_TAGS,
    4088                 :            :                           NULL))
    4089                 :            :     {
    4090                 :     840702 :       Bexpression* bexpr = this->expr_->get_backend(context);
    4091                 :     840702 :       return gogo->backend()->convert_expression(btype, bexpr, loc);
    4092                 :            :     }
    4093                 :    1797950 :   else if (type->interface_type() != NULL
    4094                 :    1603610 :            && expr_type->interface_type() == NULL)
    4095                 :            :     {
    4096                 :     172890 :       Expression* conversion =
    4097                 :     345780 :           Expression::convert_type_to_interface(type, this->expr_,
    4098                 :     172890 :                                                 this->no_escape_, loc);
    4099                 :     172890 :       return conversion->get_backend(context);
    4100                 :            :     }
    4101                 :    2839990 :   else if (type->interface_type() != NULL
    4102                 :    1430720 :            || expr_type->interface_type() != NULL)
    4103                 :            :     {
    4104                 :      21448 :       Expression* conversion =
    4105                 :      21448 :           Expression::convert_for_assignment(gogo, type, this->expr_,
    4106                 :            :                                              loc);
    4107                 :      21448 :       return conversion->get_backend(context);
    4108                 :            :     }
    4109                 :    1409270 :   else if (type->is_string_type()
    4110                 :    1409270 :            && expr_type->integer_type() != NULL)
    4111                 :            :     {
    4112                 :        581 :       mpz_t intval;
    4113                 :       1162 :       Numeric_constant nc;
    4114                 :        581 :       if (this->expr_->numeric_constant_value(&nc)
    4115                 :        581 :           && nc.to_int(&intval))
    4116                 :            :         {
    4117                 :        750 :           std::string s;
    4118                 :        375 :           unsigned int x;
    4119                 :        375 :           if (mpz_fits_uint_p(intval))
    4120                 :        377 :             x = mpz_get_ui(intval);
    4121                 :            :           else
    4122                 :            :             {
    4123                 :          0 :               char* ms = mpz_get_str(NULL, 16, intval);
    4124                 :          0 :               go_warning_at(loc, 0,
    4125                 :            :                             "unicode code point 0x%s out of range in string",
    4126                 :            :                             ms);
    4127                 :          0 :               free(ms);
    4128                 :          0 :               x = 0xfffd;
    4129                 :            :             }
    4130                 :        375 :           Lex::append_char(x, true, &s, loc);
    4131                 :        375 :           mpz_clear(intval);
    4132                 :        375 :           Expression* se = Expression::make_string(s, loc);
    4133                 :        375 :           return se->get_backend(context);
    4134                 :            :         }
    4135                 :            : 
    4136                 :        206 :       Expression* buf;
    4137                 :        206 :       if (this->no_escape_)
    4138                 :            :         {
    4139                 :        137 :           Type* byte_type = Type::lookup_integer_type("uint8");
    4140                 :        137 :           Expression* buflen =
    4141                 :        137 :             Expression::make_integer_ul(4, NULL, loc);
    4142                 :        137 :           Type* array_type = Type::make_array_type(byte_type, buflen);
    4143                 :        137 :           buf = Expression::make_allocation(array_type, loc);
    4144                 :        137 :           buf->allocation_expression()->set_allocate_on_stack();
    4145                 :        137 :           buf->allocation_expression()->set_no_zero();
    4146                 :            :         }
    4147                 :            :       else
    4148                 :         69 :         buf = Expression::make_nil(loc);
    4149                 :        206 :       Expression* i2s_expr =
    4150                 :        206 :         Runtime::make_call(Runtime::INTSTRING, loc, 2, buf, this->expr_);
    4151                 :        206 :       return Expression::make_cast(type, i2s_expr, loc)->get_backend(context);
    4152                 :            :     }
    4153                 :    1408690 :   else if (type->is_string_type() && expr_type->is_slice_type())
    4154                 :            :     {
    4155                 :       4862 :       Array_type* a = expr_type->array_type();
    4156                 :       4862 :       Type* e = a->element_type()->forwarded();
    4157                 :       4862 :       go_assert(e->integer_type() != NULL);
    4158                 :       4862 :       go_assert(this->expr_->is_variable());
    4159                 :            : 
    4160                 :       4862 :       Runtime::Function code;
    4161                 :       9724 :       if (e->integer_type()->is_byte())
    4162                 :            :         {
    4163                 :       4758 :           if (this->no_copy_)
    4164                 :            :             {
    4165                 :       1562 :               if (gogo->debug_optimization())
    4166                 :          6 :                 go_debug(loc, "no copy string([]byte)");
    4167                 :       1562 :               Expression* ptr = Expression::make_slice_info(this->expr_,
    4168                 :            :                                                             SLICE_INFO_VALUE_POINTER,
    4169                 :            :                                                             loc);
    4170                 :       1562 :               Expression* len = Expression::make_slice_info(this->expr_,
    4171                 :            :                                                             SLICE_INFO_LENGTH,
    4172                 :            :                                                             loc);
    4173                 :       1562 :               Expression* str = Expression::make_string_value(ptr, len, loc);
    4174                 :       1562 :               return str->get_backend(context);
    4175                 :            :             }
    4176                 :            :           code = Runtime::SLICEBYTETOSTRING;
    4177                 :            :         }
    4178                 :            :       else
    4179                 :            :         {
    4180                 :        208 :           go_assert(e->integer_type()->is_rune());
    4181                 :            :           code = Runtime::SLICERUNETOSTRING;
    4182                 :            :         }
    4183                 :            : 
    4184                 :       3300 :       Expression* buf;
    4185                 :       3300 :       if (this->no_escape_)
    4186                 :            :         {
    4187                 :        388 :           Type* byte_type = Type::lookup_integer_type("uint8");
    4188                 :        388 :           Expression* buflen =
    4189                 :        388 :             Expression::make_integer_ul(tmp_string_buf_size, NULL, loc);
    4190                 :        388 :           Type* array_type = Type::make_array_type(byte_type, buflen);
    4191                 :        388 :           buf = Expression::make_allocation(array_type, loc);
    4192                 :        388 :           buf->allocation_expression()->set_allocate_on_stack();
    4193                 :        388 :           buf->allocation_expression()->set_no_zero();
    4194                 :            :         }
    4195                 :            :       else
    4196                 :       2912 :         buf = Expression::make_nil(loc);
    4197                 :       3300 :       return Runtime::make_call(code, loc, 2, buf,
    4198                 :       3300 :                                 this->expr_)->get_backend(context);
    4199                 :            :     }
    4200                 :    1407200 :   else if (type->is_slice_type() && expr_type->is_string_type())
    4201                 :            :     {
    4202                 :       2940 :       Type* e = type->array_type()->element_type()->forwarded();
    4203                 :       1470 :       go_assert(e->integer_type() != NULL);
    4204                 :            : 
    4205                 :       1470 :       Runtime::Function code;
    4206                 :       2940 :       if (e->integer_type()->is_byte())
    4207                 :            :         code = Runtime::STRINGTOSLICEBYTE;
    4208                 :            :       else
    4209                 :            :         {
    4210                 :         84 :           go_assert(e->integer_type()->is_rune());
    4211                 :            :           code = Runtime::STRINGTOSLICERUNE;
    4212                 :            :         }
    4213                 :            : 
    4214                 :       1470 :       Expression* buf;
    4215                 :       1470 :       if (this->no_escape_)
    4216                 :            :         {
    4217                 :        514 :           Expression* buflen =
    4218                 :        514 :             Expression::make_integer_ul(tmp_string_buf_size, NULL, loc);
    4219                 :        514 :           Type* array_type = Type::make_array_type(e, buflen);
    4220                 :        514 :           buf = Expression::make_allocation(array_type, loc);
    4221                 :        514 :           buf->allocation_expression()->set_allocate_on_stack();
    4222                 :        514 :           buf->allocation_expression()->set_no_zero();
    4223                 :            :         }
    4224                 :            :       else
    4225                 :        956 :         buf = Expression::make_nil(loc);
    4226                 :       1470 :       Expression* s2a = Runtime::make_call(code, loc, 2, buf, this->expr_);
    4227                 :       1470 :       return Expression::make_unsafe_cast(type, s2a, loc)->get_backend(context);
    4228                 :            :     }
    4229                 :    1402360 :   else if (type->is_numeric_type())
    4230                 :            :     {
    4231                 :     342585 :       go_assert(Type::are_convertible(type, expr_type, NULL));
    4232                 :     342585 :       Bexpression* bexpr = this->expr_->get_backend(context);
    4233                 :     342585 :       return gogo->backend()->convert_expression(btype, bexpr, loc);
    4234                 :            :     }
    4235                 :    1059780 :   else if ((type->is_unsafe_pointer_type()
    4236                 :     659995 :             && (expr_type->points_to() != NULL
    4237                 :    1244430 :                 || expr_type->integer_type()))
    4238                 :     413150 :            || (expr_type->is_unsafe_pointer_type()
    4239                 :     184651 :                && type->points_to() != NULL)
    4240                 :    1288270 :            || (this->may_convert_function_types_
    4241                 :          0 :                && type->function_type() != NULL
    4242                 :     831276 :                && expr_type->function_type() != NULL))
    4243                 :            :     {
    4244                 :     831276 :       Bexpression* bexpr = this->expr_->get_backend(context);
    4245                 :     831276 :       return gogo->backend()->convert_expression(btype, bexpr, loc);
    4246                 :            :     }
    4247                 :            :   else
    4248                 :            :     {
    4249                 :     228499 :       Expression* conversion =
    4250                 :     228499 :           Expression::convert_for_assignment(gogo, type, this->expr_, loc);
    4251                 :     228499 :       return conversion->get_backend(context);
    4252                 :            :     }
    4253                 :            : }
    4254                 :            : 
    4255                 :            : // Cost of inlining a type conversion.
    4256                 :            : 
    4257                 :            : int
    4258                 :     235355 : Type_conversion_expression::do_inlining_cost() const
    4259                 :            : {
    4260                 :     235355 :   Type* type = this->type_;
    4261                 :     235355 :   Type* expr_type = this->expr_->type();
    4262                 :     402060 :   if (type->interface_type() != NULL || expr_type->interface_type() != NULL)
    4263                 :      68650 :     return 10;
    4264                 :     166705 :   else if (type->is_string_type() && expr_type->integer_type() != NULL)
    4265                 :            :     return 10;
    4266                 :     166541 :   else if (type->is_string_type() && expr_type->is_slice_type())
    4267                 :            :     return 10;
    4268                 :     164449 :   else if (type->is_slice_type() && expr_type->is_string_type())
    4269                 :            :     return 10;
    4270                 :            :   else
    4271                 :     158874 :     return 1;
    4272                 :            : }
    4273                 :            : 
    4274                 :            : // Output a type conversion in a constant expression.
    4275                 :            : 
    4276                 :            : void
    4277                 :       8652 : Type_conversion_expression::do_export(Export_function_body* efb) const
    4278                 :            : {
    4279                 :       8652 :   efb->write_c_string("$convert(");
    4280                 :       8652 :   efb->write_type(this->type_);
    4281                 :       8652 :   efb->write_c_string(", ");
    4282                 :            : 
    4283                 :       8652 :   Type* old_context = efb->type_context();
    4284                 :       8652 :   efb->set_type_context(this->type_);
    4285                 :            : 
    4286                 :       8652 :   this->expr_->export_expression(efb);
    4287                 :            : 
    4288                 :       8652 :   efb->set_type_context(old_context);
    4289                 :            : 
    4290                 :       8652 :   efb->write_c_string(")");
    4291                 :       8652 : }
    4292                 :            : 
    4293                 :            : // Import a type conversion or a struct construction.
    4294                 :            : 
    4295                 :            : Expression*
    4296                 :      12391 : Type_conversion_expression::do_import(Import_expression* imp, Location loc)
    4297                 :            : {
    4298                 :      12391 :   imp->require_c_string("$convert(");
    4299                 :      12391 :   Type* type = imp->read_type();
    4300                 :      12391 :   imp->require_c_string(", ");
    4301                 :      12391 :   Expression* val = Expression::import_expression(imp, loc);
    4302                 :      12391 :   imp->require_c_string(")");
    4303                 :      12391 :   return Expression::make_cast(type, val, loc);
    4304                 :            : }
    4305                 :            : 
    4306                 :            : // Dump ast representation for a type conversion expression.
    4307                 :            : 
    4308                 :            : void
    4309                 :          0 : Type_conversion_expression::do_dump_expression(
    4310                 :            :     Ast_dump_context* ast_dump_context) const
    4311                 :            : {
    4312                 :          0 :   ast_dump_context->dump_type(this->type_);
    4313                 :          0 :   ast_dump_context->ostream() << "(";
    4314                 :          0 :   ast_dump_context->dump_expression(this->expr_);
    4315                 :          0 :   ast_dump_context->ostream() << ") ";
    4316                 :          0 : }
    4317                 :            : 
    4318                 :            : // Make a type cast expression.
    4319                 :            : 
    4320                 :            : Expression*
    4321                 :    2499610 : Expression::make_cast(Type* type, Expression* val, Location location)
    4322                 :            : {
    4323                 :    2499610 :   if (type->is_error_type() || val->is_error_expression())
    4324                 :       2742 :     return Expression::make_error(location);
    4325                 :    2496870 :   return new Type_conversion_expression(type, val, location);
    4326                 :            : }
    4327                 :            : 
    4328                 :            : // Class Unsafe_type_conversion_expression.
    4329                 :            : 
    4330                 :            : // Traversal.
    4331                 :            : 
    4332                 :            : int
    4333                 :    1355410 : Unsafe_type_conversion_expression::do_traverse(Traverse* traverse)
    4334                 :            : {
    4335                 :    1355410 :   if (Expression::traverse(&this->expr_, traverse) == TRAVERSE_EXIT
    4336                 :    1355410 :       || Type::traverse(this->type_, traverse) == TRAVERSE_EXIT)
    4337                 :      55683 :     return TRAVERSE_EXIT;
    4338                 :            :   return TRAVERSE_CONTINUE;
    4339                 :            : }
    4340                 :            : 
    4341                 :            : // Return whether an unsafe type conversion can be used as a constant
    4342                 :            : // initializer.
    4343                 :            : 
    4344                 :            : bool
    4345                 :        664 : Unsafe_type_conversion_expression::do_is_static_initializer() const
    4346                 :            : {
    4347                 :        664 :   Type* type = this->type_;
    4348                 :        664 :   Type* expr_type = this->expr_->type();
    4349                 :            : 
    4350                 :       1328 :   if (type->interface_type() != NULL
    4351                 :        664 :       || expr_type->interface_type() != NULL)
    4352                 :          0 :     return false;
    4353                 :            : 
    4354                 :        664 :   if (!this->expr_->is_static_initializer())
    4355                 :            :     return false;
    4356                 :            : 
    4357                 :          0 :   if (Type::are_convertible(type, expr_type, NULL))
    4358                 :            :     return true;
    4359                 :            : 
    4360                 :          0 :   if (type->is_string_type() && expr_type->is_string_type())
    4361                 :            :     return true;
    4362                 :            : 
    4363                 :          0 :   if ((type->is_numeric_type()
    4364                 :          0 :        || type->is_boolean_type()
    4365                 :          0 :        || type->points_to() != NULL)
    4366                 :          0 :       && (expr_type->is_numeric_type()
    4367                 :          0 :           || expr_type->is_boolean_type()
    4368                 :          0 :           || expr_type->points_to() != NULL))
    4369                 :          0 :     return true;
    4370                 :            : 
    4371                 :            :   return false;
    4372                 :            : }
    4373                 :            : 
    4374                 :            : // Copy.
    4375                 :            : 
    4376                 :            : Expression*
    4377                 :          0 : Unsafe_type_conversion_expression::do_copy()
    4378                 :            : {
    4379                 :          0 :   return new Unsafe_type_conversion_expression(this->type_->copy_expressions(),
    4380                 :          0 :                                                this->expr_->copy(),
    4381                 :          0 :                                                this->location());
    4382                 :            : }
    4383                 :            : 
    4384                 :            : // Convert to backend representation.
    4385                 :            : 
    4386                 :            : Bexpression*
    4387                 :    1185640 : Unsafe_type_conversion_expression::do_get_backend(Translate_context* context)
    4388                 :            : {
    4389                 :            :   // We are only called for a limited number of cases.
    4390                 :            : 
    4391                 :    1185640 :   Type* t = this->type_;
    4392                 :    1185640 :   Type* et = this->expr_->type();
    4393                 :            : 
    4394                 :    1185640 :   if (t->is_error_type()
    4395                 :    1185640 :       || this->expr_->is_error_expression()
    4396                 :    2371280 :       || et->is_error_type())
    4397                 :            :     {
    4398                 :          0 :       go_assert(saw_errors());
    4399                 :          0 :       return context->backend()->error_expression();
    4400                 :            :     }
    4401                 :            : 
    4402                 :    1185640 :   if (t->array_type() != NULL)
    4403                 :      61562 :     go_assert(et->array_type() != NULL
    4404                 :            :               && t->is_slice_type() == et->is_slice_type());
    4405                 :    1154860 :   else if (t->struct_type() != NULL)
    4406                 :            :     {
    4407                 :         34 :       if (t->named_type() != NULL
    4408                 :         28 :           && et->named_type() != NULL
    4409                 :         54 :           && !Type::are_convertible(t, et, NULL))
    4410                 :            :         {
    4411                 :          0 :           go_assert(saw_errors());
    4412                 :          0 :           return context->backend()->error_expression();
    4413                 :            :         }
    4414                 :            : 
    4415                 :         68 :       go_assert(et->struct_type() != NULL
    4416                 :            :                 && Type::are_convertible(t, et, NULL));
    4417                 :            :     }
    4418                 :    1154820 :   else if (t->map_type() != NULL)
    4419                 :      18142 :     go_assert(et->map_type() != NULL || et->points_to() != NULL);
    4420                 :    1137000 :   else if (t->channel_type() != NULL)
    4421                 :       8080 :     go_assert(et->channel_type() != NULL || et->points_to() != NULL);
    4422                 :    1129020 :   else if (t->points_to() != NULL)
    4423                 :    1072810 :     go_assert(et->points_to() != NULL
    4424                 :            :               || et->channel_type() != NULL
    4425                 :            :               || et->map_type() != NULL
    4426                 :            :               || et->function_type() != NULL
    4427                 :            :               || et->integer_type() != NULL
    4428                 :            :               || et->is_nil_type());
    4429                 :      98871 :   else if (t->function_type() != NULL)
    4430                 :       1152 :     go_assert(et->points_to() != NULL);
    4431                 :      97719 :   else if (et->is_unsafe_pointer_type())
    4432                 :      37608 :     go_assert(t->points_to() != NULL
    4433                 :            :               || (t->integer_type() != NULL
    4434                 :            :                   && t->integer_type() == Type::lookup_integer_type("uintptr")->real_type()));
    4435                 :      85183 :   else if (t->interface_type() != NULL)
    4436                 :            :     {
    4437                 :      66984 :       bool empty_iface = t->interface_type()->is_empty();
    4438                 :     100476 :       go_assert(et->interface_type() != NULL
    4439                 :            :                 && et->interface_type()->is_empty() == empty_iface);
    4440                 :            :     }
    4441                 :      51691 :   else if (t->integer_type() != NULL)
    4442                 :    1296990 :     go_assert(et->is_boolean_type()
    4443                 :            :               || et->integer_type() != NULL
    4444                 :            :               || et->function_type() != NULL
    4445                 :            :               || et->points_to() != NULL
    4446                 :            :               || et->map_type() != NULL
    4447                 :            :               || et->channel_type() != NULL
    4448                 :            :               || et->is_nil_type());
    4449                 :            :   else
    4450                 :          0 :     go_unreachable();
    4451                 :            : 
    4452                 :    1185640 :   Gogo* gogo = context->gogo();
    4453                 :    1185640 :   Btype* btype = t->get_backend(gogo);
    4454                 :    1185640 :   Bexpression* bexpr = this->expr_->get_backend(context);
    4455                 :    1185640 :   Location loc = this->location();
    4456                 :    1185640 :   return gogo->backend()->convert_expression(btype, bexpr, loc);
    4457                 :            : }
    4458                 :            : 
    4459                 :            : // Dump ast representation for an unsafe type conversion expression.
    4460                 :            : 
    4461                 :            : void
    4462                 :          0 : Unsafe_type_conversion_expression::do_dump_expression(
    4463                 :            :     Ast_dump_context* ast_dump_context) const
    4464                 :            : {
    4465                 :          0 :   ast_dump_context->dump_type(this->type_);
    4466                 :          0 :   ast_dump_context->ostream() << "(";
    4467                 :          0 :   ast_dump_context->dump_expression(this->expr_);
    4468                 :          0 :   ast_dump_context->ostream() << ") ";
    4469                 :          0 : }
    4470                 :            : 
    4471                 :            : // Make an unsafe type conversion expression.
    4472                 :            : 
    4473                 :            : Expression*
    4474                 :    1219950 : Expression::make_unsafe_cast(Type* type, Expression* expr,
    4475                 :            :                              Location location)
    4476                 :            : {
    4477                 :    1219950 :   return new Unsafe_type_conversion_expression(type, expr, location);
    4478                 :            : }
    4479                 :            : 
    4480                 :            : // Class Unary_expression.
    4481                 :            : 
    4482                 :            : // Call the address_taken method of the operand if needed.  This is
    4483                 :            : // called after escape analysis but before inserting write barriers.
    4484                 :            : 
    4485                 :            : void
    4486                 :     708055 : Unary_expression::check_operand_address_taken(Gogo*)
    4487                 :            : {
    4488                 :     708055 :   if (this->op_ != OPERATOR_AND)
    4489                 :            :     return;
    4490                 :            : 
    4491                 :            :   // If this->escapes_ is false at this point, then it was set to
    4492                 :            :   // false by an explicit call to set_does_not_escape, and the value
    4493                 :            :   // does not escape.  If this->escapes_ is true, we may be able to
    4494                 :            :   // set it to false based on the escape analysis pass.
    4495                 :     175541 :   if (this->escapes_)
    4496                 :            :     {
    4497                 :     148949 :       Node* n = Node::make_node(this);
    4498                 :     148949 :       if ((n->encoding() & ESCAPE_MASK) == int(Node::ESCAPE_NONE))
    4499                 :     107244 :         this->escapes_ = false;
    4500                 :            :     }
    4501                 :            : 
    4502                 :     175541 :   this->expr_->address_taken(this->escapes_);
    4503                 :            : }
    4504                 :            : 
    4505                 :            : // If we are taking the address of a composite literal, and the
    4506                 :            : // contents are not constant, then we want to make a heap expression
    4507                 :            : // instead.
    4508                 :            : 
    4509                 :            : Expression*
    4510                 :    1478600 : Unary_expression::do_lower(Gogo*, Named_object*, Statement_inserter*, int)
    4511                 :            : {
    4512                 :    1478600 :   Location loc = this->location();
    4513                 :    1478600 :   Operator op = this->op_;
    4514                 :    1478600 :   Expression* expr = this->expr_;
    4515                 :            : 
    4516                 :    1478600 :   if (op == OPERATOR_MULT && expr->is_type_expression())
    4517                 :       4425 :     return Expression::make_type(Type::make_pointer_type(expr->type()), loc);
    4518                 :            : 
    4519                 :            :   // *&x simplifies to x.  *(*T)(unsafe.Pointer)(&x) does not require
    4520                 :            :   // moving x to the heap.  FIXME: Is it worth doing a real escape
    4521                 :            :   // analysis here?  This case is found in math/unsafe.go and is
    4522                 :            :   // therefore worth special casing.
    4523                 :    1474170 :   if (op == OPERATOR_MULT)
    4524                 :            :     {
    4525                 :            :       Expression* e = expr;
    4526                 :    1058660 :       while (e->classification() == EXPRESSION_CONVERSION)
    4527                 :            :         {
    4528                 :      17587 :           Type_conversion_expression* te
    4529                 :            :             = static_cast<Type_conversion_expression*>(e);
    4530                 :      17587 :           e = te->expr();
    4531                 :            :         }
    4532                 :            : 
    4533                 :    1041070 :       if (e->classification() == EXPRESSION_UNARY)
    4534                 :            :         {
    4535                 :       2911 :           Unary_expression* ue = static_cast<Unary_expression*>(e);
    4536                 :       2911 :           if (ue->op_ == OPERATOR_AND)
    4537                 :            :             {
    4538                 :        928 :               if (e == expr)
    4539                 :            :                 {
    4540                 :            :                   // *&x == x.
    4541                 :         27 :                   if (!ue->expr_->is_addressable() && !ue->create_temp_)
    4542                 :            :                     {
    4543                 :          0 :                       go_error_at(ue->location(),
    4544                 :            :                                   "invalid operand for unary %<&%>");
    4545                 :          0 :                       this->set_is_error();
    4546                 :            :                     }
    4547                 :         27 :                   return ue->expr_;
    4548                 :            :                 }
    4549                 :        901 :               ue->set_does_not_escape();
    4550                 :            :             }
    4551                 :            :         }
    4552                 :            :     }
    4553                 :            : 
    4554                 :            :   // Catching an invalid indirection of unsafe.Pointer here avoid
    4555                 :            :   // having to deal with TYPE_VOID in other places.
    4556                 :    2515190 :   if (op == OPERATOR_MULT && expr->type()->is_unsafe_pointer_type())
    4557                 :            :     {
    4558                 :          1 :       go_error_at(this->location(), "invalid indirect of %<unsafe.Pointer%>");
    4559                 :          1 :       return Expression::make_error(this->location());
    4560                 :            :     }
    4561                 :            : 
    4562                 :            :   // Check for an invalid pointer dereference.  We need to do this
    4563                 :            :   // here because Unary_expression::do_type will return an error type
    4564                 :            :   // in this case.  That can cause code to appear erroneous, and
    4565                 :            :   // therefore disappear at lowering time, without any error message.
    4566                 :    2515190 :   if (op == OPERATOR_MULT && expr->type()->points_to() == NULL)
    4567                 :            :     {
    4568                 :          1 :       this->report_error(_("expected pointer"));
    4569                 :          1 :       return Expression::make_error(this->location());
    4570                 :            :     }
    4571                 :            : 
    4572                 :    1474140 :   if (op == OPERATOR_PLUS || op == OPERATOR_MINUS || op == OPERATOR_XOR)
    4573                 :            :     {
    4574                 :     125868 :       Numeric_constant nc;
    4575                 :     100179 :       if (expr->numeric_constant_value(&nc))
    4576                 :            :         {
    4577                 :      74490 :           Numeric_constant result;
    4578                 :      74490 :           bool issued_error;
    4579                 :      74490 :           if (Unary_expression::eval_constant(op, &nc, loc, &result,
    4580                 :            :                                               &issued_error))
    4581                 :      74490 :             return result.expression(loc);
    4582                 :          0 :           else if (issued_error)
    4583                 :          0 :             return Expression::make_error(this->location());
    4584                 :            :         }
    4585                 :            :     }
    4586                 :            : 
    4587                 :    1399650 :   return this;
    4588                 :            : }
    4589                 :            : 
    4590                 :            : // Flatten expression if a nil check must be performed and create temporary
    4591                 :            : // variables if necessary.
    4592                 :            : 
    4593                 :            : Expression*
    4594                 :    1112860 : Unary_expression::do_flatten(Gogo* gogo, Named_object*,
    4595                 :            :                              Statement_inserter* inserter)
    4596                 :            : {
    4597                 :    1112860 :   if (this->is_error_expression()
    4598                 :    1112860 :       || this->expr_->is_error_expression()
    4599                 :    2225720 :       || this->expr_->type()->is_error_type())
    4600                 :            :     {
    4601                 :          7 :       go_assert(saw_errors());
    4602                 :          7 :       return Expression::make_error(this->location());
    4603                 :            :     }
    4604                 :            : 
    4605                 :    1112860 :   Location location = this->location();
    4606                 :    1112860 :   if (this->op_ == OPERATOR_MULT
    4607                 :    1112860 :       && !this->expr_->is_variable())
    4608                 :            :     {
    4609                 :     135667 :       go_assert(this->expr_->type()->points_to() != NULL);
    4610                 :     135667 :       switch (this->requires_nil_check(gogo))
    4611                 :            :         {
    4612                 :          0 :           case NIL_CHECK_ERROR_ENCOUNTERED:
    4613                 :          0 :             {
    4614                 :          0 :               go_assert(saw_errors());
    4615                 :          0 :               return Expression::make_error(this->location());
    4616                 :            :             }
    4617                 :            :           case NIL_CHECK_NOT_NEEDED:
    4618                 :            :             break;
    4619                 :       2892 :           case NIL_CHECK_NEEDED:
    4620                 :       2892 :             this->create_temp_ = true;
    4621                 :       2892 :             break;
    4622                 :          0 :           case NIL_CHECK_DEFAULT:
    4623                 :          0 :             go_unreachable();
    4624                 :            :         }
    4625                 :            :     }
    4626                 :            : 
    4627                 :    1112860 :   if (this->create_temp_ && !this->expr_->is_variable())
    4628                 :            :     {
    4629                 :       8959 :       Temporary_statement* temp =
    4630                 :       8959 :           Statement::make_temporary(NULL, this->expr_, location);
    4631                 :       8959 :       inserter->insert(temp);
    4632                 :       8959 :       this->expr_ = Expression::make_temporary_reference(temp, location);
    4633                 :            :     }
    4634                 :            : 
    4635                 :    1112860 :   return this;
    4636                 :            : }
    4637                 :            : 
    4638                 :            : // Return whether a unary expression is a constant.
    4639                 :            : 
    4640                 :            : bool
    4641                 :      37427 : Unary_expression::do_is_constant() const
    4642                 :            : {
    4643                 :      37427 :   if (this->op_ == OPERATOR_MULT)
    4644                 :            :     {
    4645                 :            :       // Indirecting through a pointer is only constant if the object
    4646                 :            :       // to which the expression points is constant, but we currently
    4647                 :            :       // have no way to determine that.
    4648                 :            :       return false;
    4649                 :            :     }
    4650                 :      28647 :   else if (this->op_ == OPERATOR_AND)
    4651                 :            :     {
    4652                 :            :       // Taking the address of a variable is constant if it is a
    4653                 :            :       // global variable, not constant otherwise.  In other cases taking the
    4654                 :            :       // address is probably not a constant.
    4655                 :      11041 :       Var_expression* ve = this->expr_->var_expression();
    4656                 :       3186 :       if (ve != NULL)
    4657                 :            :         {
    4658                 :       3186 :           Named_object* no = ve->named_object();
    4659                 :       3186 :           return no->is_variable() && no->var_value()->is_global();
    4660                 :            :         }
    4661                 :            :       return false;
    4662                 :            :     }
    4663                 :            :   else
    4664                 :      17606 :     return this->expr_->is_constant();
    4665                 :            : }
    4666                 :            : 
    4667                 :            : // Return whether a unary expression can be used as a constant
    4668                 :            : // initializer.
    4669                 :            : 
    4670                 :            : bool
    4671                 :     890196 : Unary_expression::do_is_static_initializer() const
    4672                 :            : {
    4673                 :     890196 :   if (this->op_ == OPERATOR_MULT)
    4674                 :            :     return false;
    4675                 :     890030 :   else if (this->op_ == OPERATOR_AND)
    4676                 :     889938 :     return Unary_expression::base_is_static_initializer(this->expr_);
    4677                 :            :   else
    4678                 :         92 :     return this->expr_->is_static_initializer();
    4679                 :            : }
    4680                 :            : 
    4681                 :            : // Return whether the address of EXPR can be used as a static
    4682                 :            : // initializer.
    4683                 :            : 
    4684                 :            : bool
    4685                 :     890066 : Unary_expression::base_is_static_initializer(Expression* expr)
    4686                 :            : {
    4687                 :            :   // The address of a field reference can be a static initializer if
    4688                 :            :   // the base can be a static initializer.
    4689                 :     892823 :   Field_reference_expression* fre = expr->field_reference_expression();
    4690                 :       2757 :   if (fre != NULL)
    4691                 :       2757 :     return Unary_expression::base_is_static_initializer(fre->expr());
    4692                 :            : 
    4693                 :            :   // The address of an index expression can be a static initializer if
    4694                 :            :   // the base can be a static initializer and the index is constant.
    4695                 :     890066 :   Array_index_expression* aind = expr->array_index_expression();
    4696                 :        128 :   if (aind != NULL)
    4697                 :        128 :     return (aind->end() == NULL
    4698                 :        128 :             && aind->start()->is_constant()
    4699                 :        256 :             && Unary_expression::base_is_static_initializer(aind->array()));
    4700                 :            : 
    4701                 :            :   // The address of a global variable can be a static initializer.
    4702                 :     889938 :   Var_expression* ve = expr->var_expression();
    4703                 :      28854 :   if (ve != NULL)
    4704                 :            :     {
    4705                 :      28854 :       Named_object* no = ve->named_object();
    4706                 :      28854 :       return no->is_variable() && no->var_value()->is_global();
    4707                 :            :     }
    4708                 :            : 
    4709                 :            :   // The address of a composite literal can be used as a static
    4710                 :            :   // initializer if the composite literal is itself usable as a
    4711                 :            :   // static initializer.
    4712                 :     861084 :   if (expr->is_composite_literal() && expr->is_static_initializer())
    4713                 :            :     return true;
    4714                 :            : 
    4715                 :            :   // The address of a string constant can be used as a static
    4716                 :            :   // initializer.  This can not be written in Go itself but this is
    4717                 :            :   // used when building a type descriptor.
    4718                 :     861084 :   if (expr->string_expression() != NULL)
    4719                 :     858430 :     return true;
    4720                 :            : 
    4721                 :            :   return false;
    4722                 :            : }
    4723                 :            : 
    4724                 :            : // Return whether this dereference expression requires an explicit nil
    4725                 :            : // check. If we are dereferencing the pointer to a large struct
    4726                 :            : // (greater than the specified size threshold), we need to check for
    4727                 :            : // nil. We don't bother to check for small structs because we expect
    4728                 :            : // the system to crash on a nil pointer dereference. However, if we
    4729                 :            : // know the address of this expression is being taken, we must always
    4730                 :            : // check for nil.
    4731                 :            : Unary_expression::Nil_check_classification
    4732                 :    1087670 : Unary_expression::requires_nil_check(Gogo* gogo)
    4733                 :            : {
    4734                 :    1087670 :   go_assert(this->op_ == OPERATOR_MULT);
    4735                 :    1087670 :   go_assert(this->expr_->type()->points_to() != NULL);
    4736                 :            : 
    4737                 :    1087670 :   if (this->issue_nil_check_ == NIL_CHECK_NEEDED)
    4738                 :            :     return NIL_CHECK_NEEDED;
    4739                 :    1030420 :   else if (this->issue_nil_check_ == NIL_CHECK_NOT_NEEDED)
    4740                 :            :     return NIL_CHECK_NOT_NEEDED;
    4741                 :            : 
    4742                 :     484743 :   Type* ptype = this->expr_->type()->points_to();
    4743                 :     484743 :   int64_t type_size = -1;
    4744                 :     484743 :   if (!ptype->is_void_type())
    4745                 :            :     {
    4746                 :     484743 :       bool ok = ptype->backend_type_size(gogo, &type_size);
    4747                 :     484743 :       if (!ok)
    4748                 :            :         return NIL_CHECK_ERROR_ENCOUNTERED;
    4749                 :            :     }
    4750                 :            : 
    4751                 :     484743 :   int64_t size_cutoff = gogo->nil_check_size_threshold();
    4752                 :     484743 :   if (size_cutoff == -1 || (type_size != -1 && type_size >= size_cutoff))
    4753                 :      14771 :     this->issue_nil_check_ = NIL_CHECK_NEEDED;
    4754                 :            :   else
    4755                 :     469972 :     this->issue_nil_check_ = NIL_CHECK_NOT_NEEDED;
    4756                 :     484743 :   return this->issue_nil_check_;
    4757                 :            : }
    4758                 :            : 
    4759                 :            : // Apply unary opcode OP to UNC, setting NC.  Return true if this
    4760                 :            : // could be done, false if not.  On overflow, issues an error and sets
    4761                 :            : // *ISSUED_ERROR.
    4762                 :            : 
    4763                 :            : bool
    4764                 :      74490 : Unary_expression::eval_constant(Operator op, const Numeric_constant* unc,
    4765                 :            :                                 Location location, Numeric_constant* nc,
    4766                 :            :                                 bool* issued_error)
    4767                 :            : {
    4768                 :      74490 :   *issued_error = false;
    4769                 :      74490 :   switch (op)
    4770                 :            :     {
    4771                 :        642 :     case OPERATOR_PLUS:
    4772                 :        642 :       *nc = *unc;
    4773                 :        642 :       return true;
    4774                 :            : 
    4775                 :      72819 :     case OPERATOR_MINUS:
    4776                 :      72819 :       if (unc->is_int() || unc->is_rune())
    4777                 :            :         break;
    4778                 :       2470 :       else if (unc->is_float())
    4779                 :            :         {
    4780                 :       2467 :           mpfr_t uval;
    4781                 :       2467 :           unc->get_float(&uval);
    4782                 :       2467 :           mpfr_t val;
    4783                 :       2467 :           mpfr_init(val);
    4784                 :       2467 :           mpfr_neg(val, uval, MPFR_RNDN);
    4785                 :       2467 :           nc->set_float(unc->type(), val);
    4786                 :       2467 :           mpfr_clear(uval);
    4787                 :       2467 :           mpfr_clear(val);
    4788                 :       2467 :           return true;
    4789                 :            :         }
    4790                 :          3 :       else if (unc->is_complex())
    4791                 :            :         {
    4792                 :          3 :           mpc_t uval;
    4793                 :          3 :           unc->get_complex(&uval);
    4794                 :          3 :           mpc_t val;
    4795                 :          3 :           mpc_init2(val, mpc_precision);
    4796                 :          3 :           mpc_neg(val, uval, MPC_RNDNN);
    4797                 :          3 :           nc->set_complex(unc->type(), val);
    4798                 :          3 :           mpc_clear(uval);
    4799                 :          3 :           mpc_clear(val);
    4800                 :          3 :           return true;
    4801                 :            :         }
    4802                 :            :       else
    4803                 :          0 :         go_unreachable();
    4804                 :            : 
    4805                 :            :     case OPERATOR_XOR:
    4806                 :            :       break;
    4807                 :            : 
    4808                 :            :     case OPERATOR_NOT:
    4809                 :            :     case OPERATOR_AND:
    4810                 :            :     case OPERATOR_MULT:
    4811                 :            :       return false;
    4812                 :            : 
    4813                 :          0 :     default:
    4814                 :          0 :       go_unreachable();
    4815                 :            :     }
    4816                 :            : 
    4817                 :      71378 :   if (!unc->is_int() && !unc->is_rune())
    4818                 :            :     return false;
    4819                 :            : 
    4820                 :      71378 :   mpz_t uval;
    4821                 :      71378 :   if (unc->is_rune())
    4822                 :          0 :     unc->get_rune(&uval);
    4823                 :            :   else
    4824                 :      71378 :     unc->get_int(&uval);
    4825                 :      71378 :   mpz_t val;
    4826                 :      71378 :   mpz_init(val);
    4827                 :            : 
    4828                 :      71378 :   switch (op)
    4829                 :            :     {
    4830                 :      70349 :     case OPERATOR_MINUS:
    4831                 :      70349 :       mpz_neg(val, uval);
    4832                 :            :       break;
    4833                 :            : 
    4834                 :          0 :     case OPERATOR_NOT:
    4835                 :          0 :       mpz_set_ui(val, mpz_cmp_si(uval, 0) == 0 ? 1 : 0);
    4836                 :          0 :       break;
    4837                 :            : 
    4838                 :       1029 :     case OPERATOR_XOR:
    4839                 :       1029 :       {
    4840                 :       1029 :         Type* utype = unc->type();
    4841                 :       2058 :         if (utype->integer_type() == NULL
    4842                 :       1029 :             || utype->integer_type()->is_abstract())
    4843                 :        100 :           mpz_com(val, uval);
    4844                 :            :         else
    4845                 :            :           {
    4846                 :            :             // The number of HOST_WIDE_INTs that it takes to represent
    4847                 :            :             // UVAL.
    4848                 :        929 :             size_t count = ((mpz_sizeinbase(uval, 2)
    4849                 :            :                              + HOST_BITS_PER_WIDE_INT
    4850                 :        929 :                              - 1)
    4851                 :            :                             / HOST_BITS_PER_WIDE_INT);
    4852                 :            : 
    4853                 :        929 :             unsigned HOST_WIDE_INT* phwi = new unsigned HOST_WIDE_INT[count];
    4854                 :        929 :             memset(phwi, 0, count * sizeof(HOST_WIDE_INT));
    4855                 :            : 
    4856                 :       1858 :             size_t obits = utype->integer_type()->bits();
    4857                 :            : 
    4858                 :       1858 :             if (!utype->integer_type()->is_unsigned() && mpz_sgn(uval) < 0)
    4859                 :            :               {
    4860                 :          0 :                 mpz_t adj;
    4861                 :          0 :                 mpz_init_set_ui(adj, 1);
    4862                 :          0 :                 mpz_mul_2exp(adj, adj, obits);
    4863                 :          0 :                 mpz_add(uval, uval, adj);
    4864                 :          0 :                 mpz_clear(adj);
    4865                 :            :               }
    4866                 :            : 
    4867                 :        929 :             size_t ecount;
    4868                 :        929 :             mpz_export(phwi, &ecount, -1, sizeof(HOST_WIDE_INT), 0, 0, uval);
    4869                 :        929 :             go_assert(ecount <= count);
    4870                 :            : 
    4871                 :            :             // Trim down to the number of words required by the type.
    4872                 :        929 :             size_t ocount = ((obits + HOST_BITS_PER_WIDE_INT - 1)
    4873                 :            :                              / HOST_BITS_PER_WIDE_INT);
    4874                 :        929 :             go_assert(ocount <= count);
    4875                 :            : 
    4876                 :       1858 :             for (size_t i = 0; i < ocount; ++i)
    4877                 :        929 :               phwi[i] = ~phwi[i];
    4878                 :            : 
    4879                 :        929 :             size_t clearbits = ocount * HOST_BITS_PER_WIDE_INT - obits;
    4880                 :        929 :             if (clearbits != 0)
    4881                 :        347 :               phwi[ocount - 1] &= (((unsigned HOST_WIDE_INT) (HOST_WIDE_INT) -1)
    4882                 :        347 :                                    >> clearbits);
    4883                 :            : 
    4884                 :        929 :             mpz_import(val, ocount, -1, sizeof(HOST_WIDE_INT), 0, 0, phwi);
    4885                 :            : 
    4886                 :       1858 :             if (!utype->integer_type()->is_unsigned()
    4887                 :        929 :                 && mpz_tstbit(val, obits - 1))
    4888                 :            :               {
    4889                 :          7 :                 mpz_t adj;
    4890                 :          7 :                 mpz_init_set_ui(adj, 1);
    4891                 :          7 :                 mpz_mul_2exp(adj, adj, obits);
    4892                 :          7 :                 mpz_sub(val, val, adj);
    4893                 :          7 :                 mpz_clear(adj);
    4894                 :            :               }
    4895                 :            : 
    4896                 :        929 :             delete[] phwi;
    4897                 :            :           }
    4898                 :            :       }
    4899                 :            :       break;
    4900                 :            : 
    4901                 :          0 :     default:
    4902                 :          0 :       go_unreachable();
    4903                 :            :     }
    4904                 :            : 
    4905                 :      71378 :   if (unc->is_rune())
    4906                 :          0 :     nc->set_rune(NULL, val);
    4907                 :            :   else
    4908                 :      71378 :     nc->set_int(NULL, val);
    4909                 :            : 
    4910                 :      71378 :   mpz_clear(uval);
    4911                 :      71378 :   mpz_clear(val);
    4912                 :            : 
    4913                 :      71378 :   if (!nc->set_type(unc->type(), true, location))
    4914                 :            :     {
    4915                 :          0 :       *issued_error = true;
    4916                 :          0 :       return false;
    4917                 :            :     }
    4918                 :            :   return true;
    4919                 :            : }
    4920                 :            : 
    4921                 :            : // Return the integral constant value of a unary expression, if it has one.
    4922                 :            : 
    4923                 :            : bool
    4924                 :      17227 : Unary_expression::do_numeric_constant_value(Numeric_constant* nc) const
    4925                 :            : {
    4926                 :      34454 :   Numeric_constant unc;
    4927                 :      17227 :   if (!this->expr_->numeric_constant_value(&unc))
    4928                 :            :     return false;
    4929                 :          0 :   bool issued_error;
    4930                 :          0 :   return Unary_expression::eval_constant(this->op_, &unc, this->location(),
    4931                 :          0 :                                          nc, &issued_error);
    4932                 :            : }
    4933                 :            : 
    4934                 :            : // Return the boolean constant value of a unary expression, if it has one.
    4935                 :            : 
    4936                 :            : bool
    4937                 :      47658 : Unary_expression::do_boolean_constant_value(bool* val) const
    4938                 :            : {
    4939                 :      47658 :   if (this->op_ == OPERATOR_NOT
    4940                 :      47658 :       && this->expr_->boolean_constant_value(val))
    4941                 :            :     {
    4942                 :        194 :       *val = !*val;
    4943                 :        194 :       return true;
    4944                 :            :     }
    4945                 :            :   return false;
    4946                 :            : }
    4947                 :            : 
    4948                 :            : // Return the type of a unary expression.
    4949                 :            : 
    4950                 :            : Type*
    4951                 :   20876200 : Unary_expression::do_type()
    4952                 :            : {
    4953                 :   20876200 :   switch (this->op_)
    4954                 :            :     {
    4955                 :     532350 :     case OPERATOR_PLUS:
    4956                 :     532350 :     case OPERATOR_MINUS:
    4957                 :     532350 :     case OPERATOR_NOT:
    4958                 :     532350 :     case OPERATOR_XOR:
    4959                 :     532350 :       return this->expr_->type();
    4960                 :            : 
    4961                 :    5317270 :     case OPERATOR_AND:
    4962                 :    5317270 :       return Type::make_pointer_type(this->expr_->type());
    4963                 :            : 
    4964                 :   15026600 :     case OPERATOR_MULT:
    4965                 :   15026600 :       {
    4966                 :   15026600 :         Type* subtype = this->expr_->type();
    4967                 :   15026600 :         Type* points_to = subtype->points_to();
    4968                 :   15026600 :         if (points_to == NULL)
    4969                 :          0 :           return Type::make_error_type();
    4970                 :            :         return points_to;
    4971                 :            :       }
    4972                 :            : 
    4973                 :          0 :     default:
    4974                 :          0 :       go_unreachable();
    4975                 :            :     }
    4976                 :            : }
    4977                 :            : 
    4978                 :            : // Determine abstract types for a unary expression.
    4979                 :            : 
    4980                 :            : void
    4981                 :     681699 : Unary_expression::do_determine_type(const Type_context* context)
    4982                 :            : {
    4983                 :     681699 :   switch (this->op_)
    4984                 :            :     {
    4985                 :      55584 :     case OPERATOR_PLUS:
    4986                 :      55584 :     case OPERATOR_MINUS:
    4987                 :      55584 :     case OPERATOR_NOT:
    4988                 :      55584 :     case OPERATOR_XOR:
    4989                 :      55584 :       this->expr_->determine_type(context);
    4990                 :      55584 :       break;
    4991                 :            : 
    4992                 :     167971 :     case OPERATOR_AND:
    4993                 :            :       // Taking the address of something.
    4994                 :     167971 :       {
    4995                 :     167971 :         Type* subtype = (context->type == NULL
    4996                 :     167971 :                          ? NULL
    4997                 :     160794 :                          : context->type->points_to());
    4998                 :     167971 :         Type_context subcontext(subtype, false);
    4999                 :     167971 :         this->expr_->determine_type(&subcontext);
    5000                 :            :       }
    5001                 :     167971 :       break;
    5002                 :            : 
    5003                 :     458144 :     case OPERATOR_MULT:
    5004                 :            :       // Indirecting through a pointer.
    5005                 :     458144 :       {
    5006                 :     458144 :         Type* subtype = (context->type == NULL
    5007                 :     458144 :                          ? NULL
    5008                 :      30826 :                          : Type::make_pointer_type(context->type));
    5009                 :     458144 :         Type_context subcontext(subtype, false);
    5010                 :     458144 :         this->expr_->determine_type(&subcontext);
    5011                 :            :       }
    5012                 :     458144 :       break;
    5013                 :            : 
    5014                 :          0 :     default:
    5015                 :          0 :       go_unreachable();
    5016                 :            :     }
    5017                 :     681699 : }
    5018                 :            : 
    5019                 :            : // Check types for a unary expression.
    5020                 :            : 
    5021                 :            : void
    5022                 :     576665 : Unary_expression::do_check_types(Gogo*)
    5023                 :            : {
    5024                 :     576665 :   Type* type = this->expr_->type();
    5025                 :    1153330 :   if (type->is_error())
    5026                 :            :     {
    5027                 :          0 :       this->set_is_error();
    5028                 :          0 :       return;
    5029                 :            :     }
    5030                 :            : 
    5031                 :     576665 :   switch (this->op_)
    5032                 :            :     {
    5033                 :       6157 :     case OPERATOR_PLUS:
    5034                 :       6157 :     case OPERATOR_MINUS:
    5035                 :      10891 :       if (type->integer_type() == NULL
    5036                 :          5 :           && type->float_type() == NULL
    5037                 :     576667 :           && type->complex_type() == NULL)
    5038                 :          2 :         this->report_error(_("expected numeric type"));
    5039                 :            :       break;
    5040                 :            : 
    5041                 :      47683 :     case OPERATOR_NOT:
    5042                 :      47683 :       if (!type->is_boolean_type())
    5043                 :          0 :         this->report_error(_("expected boolean type"));
    5044                 :            :       break;
    5045                 :            : 
    5046                 :        808 :     case OPERATOR_XOR:
    5047                 :        808 :       if (type->integer_type() == NULL)
    5048                 :          0 :         this->report_error(_("expected integer"));
    5049                 :            :       break;
    5050                 :            : 
    5051                 :     171402 :     case OPERATOR_AND:
    5052                 :     171402 :       if (!this->expr_->is_addressable())
    5053                 :            :         {
    5054                 :       3858 :           if (!this->create_temp_)
    5055                 :            :             {
    5056                 :          1 :               go_error_at(this->location(), "invalid operand for unary %<&%>");
    5057                 :          1 :               this->set_is_error();
    5058                 :            :             }
    5059                 :            :         }
    5060                 :            :       else
    5061                 :     167544 :         this->expr_->issue_nil_check();
    5062                 :            :       break;
    5063                 :            : 
    5064                 :     350615 :     case OPERATOR_MULT:
    5065                 :            :       // Indirecting through a pointer.
    5066                 :     350615 :       if (type->points_to() == NULL)
    5067                 :          0 :         this->report_error(_("expected pointer"));
    5068                 :     701230 :       if (type->points_to()->is_error())
    5069                 :          0 :         this->set_is_error();
    5070                 :            :       break;
    5071                 :            : 
    5072                 :          0 :     default:
    5073                 :          0 :       go_unreachable();
    5074                 :            :     }
    5075                 :            : }
    5076                 :            : 
    5077                 :            : // Get the backend representation for a unary expression.
    5078                 :            : 
    5079                 :            : Bexpression*
    5080                 :    2591000 : Unary_expression::do_get_backend(Translate_context* context)
    5081                 :            : {
    5082                 :    2591000 :   Gogo* gogo = context->gogo();
    5083                 :    2591000 :   Location loc = this->location();
    5084                 :            : 
    5085                 :            :   // Taking the address of a set-and-use-temporary expression requires
    5086                 :            :   // setting the temporary and then taking the address.
    5087                 :    2591000 :   if (this->op_ == OPERATOR_AND)
    5088                 :            :     {
    5089                 :    1548180 :       Set_and_use_temporary_expression* sut =
    5090                 :    1548180 :         this->expr_->set_and_use_temporary_expression();
    5091                 :        372 :       if (sut != NULL)
    5092                 :            :         {
    5093                 :        372 :           Temporary_statement* temp = sut->temporary();
    5094                 :        372 :           Bvariable* bvar = temp->get_backend_variable(context);
    5095                 :        372 :           Bexpression* bvar_expr =
    5096                 :        372 :               gogo->backend()->var_expression(bvar, loc);
    5097                 :        372 :           Bexpression* bval = sut->expression()->get_backend(context);
    5098                 :            : 
    5099                 :        372 :           Named_object* fn = context->function();
    5100                 :        372 :           go_assert(fn != NULL);
    5101                 :        372 :           Bfunction* bfn =
    5102                 :        372 :               fn->func_value()->get_or_make_decl(gogo, fn);
    5103                 :        372 :           Bstatement* bassign =
    5104                 :        372 :               gogo->backend()->assignment_statement(bfn, bvar_expr, bval, loc);
    5105                 :        372 :           Bexpression* bvar_addr =
    5106                 :        372 :               gogo->backend()->address_expression(bvar_expr, loc);
    5107                 :        372 :           return gogo->backend()->compound_expression(bassign, bvar_addr, loc);
    5108                 :            :         }
    5109                 :            :     }
    5110                 :            : 
    5111                 :    2590630 :   Bexpression* ret;
    5112                 :    2590630 :   Bexpression* bexpr = this->expr_->get_backend(context);
    5113                 :    2590630 :   Btype* btype = this->expr_->type()->get_backend(gogo);
    5114                 :    2590630 :   switch (this->op_)
    5115                 :            :     {
    5116                 :            :     case OPERATOR_PLUS:
    5117                 :            :       ret = bexpr;
    5118                 :            :       break;
    5119                 :            : 
    5120                 :       9478 :     case OPERATOR_MINUS:
    5121                 :       9478 :       ret = gogo->backend()->unary_expression(this->op_, bexpr, loc);
    5122                 :       9478 :       ret = gogo->backend()->convert_expression(btype, ret, loc);
    5123                 :       9478 :       break;
    5124                 :            : 
    5125                 :      81318 :     case OPERATOR_NOT:
    5126                 :      81318 :     case OPERATOR_XOR:
    5127                 :      81318 :       ret = gogo->backend()->unary_expression(this->op_, bexpr, loc);
    5128                 :      81318 :       break;
    5129                 :            : 
    5130                 :    1547800 :     case OPERATOR_AND:
    5131                 :    1547800 :       if (!this->create_temp_)
    5132                 :            :         {
    5133                 :            :           // We should not see a non-constant constructor here; cases
    5134                 :            :           // where we would see one should have been moved onto the
    5135                 :            :           // heap at parse time.  Taking the address of a nonconstant
    5136                 :            :           // constructor will not do what the programmer expects.
    5137                 :            : 
    5138                 :    1518490 :           go_assert(!this->expr_->is_composite_literal()
    5139                 :            :                     || this->expr_->is_static_initializer());
    5140                 :    1518490 :           if (this->expr_->classification() == EXPRESSION_UNARY)
    5141                 :            :             {
    5142                 :       3621 :               Unary_expression* ue =
    5143                 :            :                 static_cast<Unary_expression*>(this->expr_);
    5144                 :       3621 :               go_assert(ue->op() != OPERATOR_AND);
    5145                 :            :             }
    5146                 :            :         }
    5147                 :            : 
    5148                 :    1547800 :       if (this->is_gc_root_ || this->is_slice_init_)
    5149                 :            :         {
    5150                 :     247574 :           std::string var_name;
    5151                 :     247574 :           bool copy_to_heap = false;
    5152                 :     247574 :           if (this->is_gc_root_)
    5153                 :            :             {
    5154                 :            :               // Build a decl for a GC root variable.  GC roots are mutable, so
    5155                 :            :               // they cannot be represented as an immutable_struct in the
    5156                 :            :               // backend.
    5157                 :       1762 :               var_name = gogo->gc_root_name();
    5158                 :            :             }
    5159                 :            :           else
    5160                 :            :             {
    5161                 :            :               // Build a decl for a slice value initializer.  An immutable slice
    5162                 :            :               // value initializer may have to be copied to the heap if it
    5163                 :            :               // contains pointers in a non-constant context.
    5164                 :     245812 :               var_name = gogo->initializer_name();
    5165                 :            : 
    5166                 :     245812 :               Array_type* at = this->expr_->type()->array_type();
    5167                 :          0 :               go_assert(at != NULL);
    5168                 :            : 
    5169                 :            :               // If we are not copying the value to the heap, we will only
    5170                 :            :               // initialize the value once, so we can use this directly
    5171                 :            :               // rather than copying it.  In that case we can't make it
    5172                 :            :               // read-only, because the program is permitted to change it.
    5173                 :     245812 :               copy_to_heap = (context->function() != NULL
    5174                 :     245812 :                               || context->is_const());
    5175                 :            :             }
    5176                 :     495148 :           std::string asm_name(go_selectively_encode_id(var_name));
    5177                 :     247574 :           Bvariable* implicit =
    5178                 :     247574 :               gogo->backend()->implicit_variable(var_name, asm_name,
    5179                 :            :                                                  btype, true, copy_to_heap,
    5180                 :     247574 :                                                  false, 0);
    5181                 :     247574 :           gogo->backend()->implicit_variable_set_init(implicit, var_name, btype,
    5182                 :            :                                                       true, copy_to_heap, false,
    5183                 :     247574 :                                                       bexpr);
    5184                 :     247574 :           bexpr = gogo->backend()->var_expression(implicit, loc);
    5185                 :            : 
    5186                 :            :           // If we are not copying a slice initializer to the heap,
    5187                 :            :           // then it can be changed by the program, so if it can
    5188                 :            :           // contain pointers we must register it as a GC root.
    5189                 :     247574 :           if (this->is_slice_init_
    5190                 :     245812 :               && !copy_to_heap
    5191                 :     255356 :               && this->expr_->type()->has_pointer())
    5192                 :            :             {
    5193                 :       2644 :               Bexpression* root =
    5194                 :       2644 :                   gogo->backend()->var_expression(implicit, loc);
    5195                 :       2644 :               root = gogo->backend()->address_expression(root, loc);
    5196                 :       2644 :               Type* type = Type::make_pointer_type(this->expr_->type());
    5197                 :       2644 :               gogo->add_gc_root(Expression::make_backend(root, type, loc));
    5198                 :     247574 :             }
    5199                 :            :         }
    5200                 :    1300230 :       else if ((this->expr_->is_composite_literal()
    5201                 :    1252420 :                 || this->expr_->string_expression() != NULL)
    5202                 :    1859370 :                && this->expr_->is_static_initializer())
    5203                 :            :         {
    5204                 :    1213900 :           std::string var_name(gogo->initializer_name());
    5205                 :    1213900 :           std::string asm_name(go_selectively_encode_id(var_name));
    5206                 :     606948 :           Bvariable* decl =
    5207                 :     606948 :               gogo->backend()->immutable_struct(var_name, asm_name,
    5208                 :     606948 :                                                 true, false, btype, loc);
    5209                 :     606948 :           gogo->backend()->immutable_struct_set_init(decl, var_name, true,
    5210                 :     606948 :                                                      false, btype, loc, bexpr);
    5211                 :     606948 :           bexpr = gogo->backend()->var_expression(decl, loc);
    5212                 :            :         }
    5213                 :     693282 :       else if (this->expr_->is_constant())
    5214                 :            :         {
    5215                 :      24196 :           std::string var_name(gogo->initializer_name());
    5216                 :      24196 :           std::string asm_name(go_selectively_encode_id(var_name));
    5217                 :      12098 :           Bvariable* decl =
    5218                 :      12098 :               gogo->backend()->implicit_variable(var_name, asm_name, btype,
    5219                 :      12098 :                                                  true, true, false, 0);
    5220                 :      12098 :           gogo->backend()->implicit_variable_set_init(decl, var_name, btype,
    5221                 :            :                                                       true, true, false,
    5222                 :      12098 :                                                       bexpr);
    5223                 :      12098 :           bexpr = gogo->backend()->var_expression(decl, loc);
    5224                 :            :         }
    5225                 :            : 
    5226                 :    1547800 :       go_assert(!this->create_temp_ || this->expr_->is_variable());
    5227                 :    1547800 :       ret = gogo->backend()->address_expression(bexpr, loc);
    5228                 :    1547800 :       break;
    5229                 :            : 
    5230                 :     952000 :     case OPERATOR_MULT:
    5231                 :     952000 :       {
    5232                 :     952000 :         go_assert(this->expr_->type()->points_to() != NULL);
    5233                 :            : 
    5234                 :     952000 :         bool known_valid = false;
    5235                 :     952000 :         Type* ptype = this->expr_->type()->points_to();
    5236                 :     952000 :         Btype* pbtype = ptype->get_backend(gogo);
    5237                 :     952000 :         switch (this->requires_nil_check(gogo))
    5238                 :            :           {
    5239                 :            :             case NIL_CHECK_NOT_NEEDED:
    5240                 :            :               break;
    5241                 :          0 :             case NIL_CHECK_ERROR_ENCOUNTERED:
    5242                 :          0 :               {
    5243                 :          0 :                 go_assert(saw_errors());
    5244                 :          0 :                 return gogo->backend()->error_expression();
    5245                 :            :               }
    5246                 :      69124 :             case NIL_CHECK_NEEDED:
    5247                 :      69124 :               {
    5248                 :      69124 :                 go_assert(this->expr_->is_variable());
    5249                 :            : 
    5250                 :            :                 // If we're nil-checking the result of a set-and-use-temporary
    5251                 :            :                 // expression, then pick out the target temp and use that
    5252                 :            :                 // for the final result of the conditional.
    5253                 :      69124 :                 Bexpression* tbexpr = bexpr;
    5254                 :      69124 :                 Bexpression* ubexpr = bexpr;
    5255                 :      69124 :                 Set_and_use_temporary_expression* sut =
    5256                 :      69124 :                     this->expr_->set_and_use_temporary_expression();
    5257                 :          0 :                 if (sut != NULL) {
    5258                 :          0 :                   Temporary_statement* temp = sut->temporary();
    5259                 :          0 :                   Bvariable* bvar = temp->get_backend_variable(context);
    5260                 :          0 :                   ubexpr = gogo->backend()->var_expression(bvar, loc);
    5261                 :            :                 }
    5262                 :      69124 :                 Bexpression* nil =
    5263                 :      69124 :                     Expression::make_nil(loc)->get_backend(context);
    5264                 :      69124 :                 Bexpression* compare =
    5265                 :      69124 :                     gogo->backend()->binary_expression(OPERATOR_EQEQ, tbexpr,
    5266                 :      69124 :                                                        nil, loc);
    5267                 :      69124 :                 Expression* crash = Runtime::make_call(Runtime::PANIC_MEM,
    5268                 :            :                                                        loc, 0);
    5269                 :      69124 :                 Bexpression* bcrash = crash->get_backend(context);
    5270                 :      69124 :                 Bfunction* bfn = context->function()->func_value()->get_decl();
    5271                 :      69124 :                 bexpr = gogo->backend()->conditional_expression(bfn, btype,
    5272                 :            :                                                                 compare,
    5273                 :            :                                                                 bcrash, ubexpr,
    5274                 :      69124 :                                                                 loc);
    5275                 :      69124 :                 known_valid = true;
    5276                 :      69124 :                 break;
    5277                 :            :               }
    5278                 :          0 :             case NIL_CHECK_DEFAULT:
    5279                 :          0 :               go_unreachable();
    5280                 :            :           }
    5281                 :     952000 :         ret = gogo->backend()->indirect_expression(pbtype, bexpr,
    5282                 :     952000 :                                                    known_valid, loc);
    5283                 :            :       }
    5284                 :     952000 :       break;
    5285                 :            : 
    5286                 :          0 :     default:
    5287                 :          0 :       go_unreachable();
    5288                 :            :     }
    5289                 :            : 
    5290                 :            :   return ret;
    5291                 :            : }
    5292                 :            : 
    5293                 :            : // Export a unary expression.
    5294                 :            : 
    5295                 :            : void
    5296                 :       2783 : Unary_expression::do_export(Export_function_body* efb) const
    5297                 :            : {
    5298                 :       2783 :   switch (this->op_)
    5299                 :            :     {
    5300                 :          0 :     case OPERATOR_PLUS:
    5301                 :          0 :       efb->write_c_string("+");
    5302                 :          0 :       break;
    5303                 :        126 :     case OPERATOR_MINUS:
    5304                 :        126 :       efb->write_c_string("-");
    5305                 :        126 :       break;
    5306                 :        250 :     case OPERATOR_NOT:
    5307                 :        250 :       efb->write_c_string("!");
    5308                 :        250 :       break;
    5309                 :         48 :     case OPERATOR_XOR:
    5310                 :         48 :       efb->write_c_string("^");
    5311                 :         48 :       break;
    5312                 :        905 :     case OPERATOR_AND:
    5313                 :        905 :       efb->write_c_string("&");
    5314                 :        905 :       break;
    5315                 :       1454 :     case OPERATOR_MULT:
    5316                 :       1454 :       efb->write_c_string("*");
    5317                 :       1454 :       break;
    5318                 :          0 :     default:
    5319                 :          0 :       go_unreachable();
    5320                 :            :     }
    5321                 :       2783 :   this->expr_->export_expression(efb);
    5322                 :       2783 : }
    5323                 :            : 
    5324                 :            : // Import a unary expression.
    5325                 :            : 
    5326                 :            : Expression*
    5327                 :       7811 : Unary_expression::do_import(Import_expression* imp, Location loc)
    5328                 :            : {
    5329                 :       7811 :   Operator op;
    5330                 :       7811 :   switch (imp->get_char())
    5331                 :            :     {
    5332                 :            :     case '+':
    5333                 :            :       op = OPERATOR_PLUS;
    5334                 :            :       break;
    5335                 :       6411 :     case '-':
    5336                 :       6411 :       op = OPERATOR_MINUS;
    5337                 :       6411 :       break;
    5338                 :        442 :     case '!':
    5339                 :        442 :       op = OPERATOR_NOT;
    5340                 :        442 :       break;
    5341                 :         44 :     case '^':
    5342                 :         44 :       op = OPERATOR_XOR;
    5343                 :         44 :       break;
    5344                 :        529 :     case '&':
    5345                 :        529 :       op = OPERATOR_AND;
    5346                 :        529 :       break;
    5347                 :        385 :     case '*':
    5348                 :        385 :       op = OPERATOR_MULT;
    5349                 :        385 :       break;
    5350                 :          0 :     default:
    5351                 :          0 :       go_unreachable();
    5352                 :            :     }
    5353                 :       7811 :   if (imp->version() < EXPORT_FORMAT_V3)
    5354                 :          0 :     imp->require_c_string(" ");
    5355                 :       7811 :   Expression* expr = Expression::import_expression(imp, loc);
    5356                 :       7811 :   return Expression::make_unary(op, expr, loc);
    5357                 :            : }
    5358                 :            : 
    5359                 :            : // Dump ast representation of an unary expression.
    5360                 :            : 
    5361                 :            : void
    5362                 :          0 : Unary_expression::do_dump_expression(Ast_dump_context* ast_dump_context) const
    5363                 :            : {
    5364                 :          0 :   ast_dump_context->dump_operator(this->op_);
    5365                 :          0 :   ast_dump_context->ostream() << "(";
    5366                 :          0 :   ast_dump_context->dump_expression(this->expr_);
    5367                 :          0 :   ast_dump_context->ostream() << ") ";
    5368                 :          0 : }
    5369                 :            : 
    5370                 :            : // Make a unary expression.
    5371                 :            : 
    5372                 :            : Expression*
    5373                 :    3149420 : Expression::make_unary(Operator op, Expression* expr, Location location)
    5374                 :            : {
    5375                 :    3149420 :   return new Unary_expression(op, expr, location);
    5376                 :            : }
    5377                 :            : 
    5378                 :            : Expression*
    5379                 :     847784 : Expression::make_dereference(Expression* ptr,
    5380                 :            :                              Nil_check_classification docheck,
    5381                 :            :                              Location location)
    5382                 :            : {
    5383                 :     847784 :   Expression* deref = Expression::make_unary(OPERATOR_MULT, ptr, location);
    5384                 :     847784 :   if (docheck == NIL_CHECK_NEEDED)
    5385                 :      11004 :     deref->unary_expression()->set_requires_nil_check(true);
    5386                 :     836780 :   else if (docheck == NIL_CHECK_NOT_NEEDED)
    5387                 :     366471 :     deref->unary_expression()->set_requires_nil_check(false);
    5388                 :     847784 :   return deref;
    5389                 :            : }
    5390                 :            : 
    5391                 :            : // If this is an indirection through a pointer, return the expression
    5392                 :            : // being pointed through.  Otherwise return this.
    5393                 :            : 
    5394                 :            : Expression*
    5395                 :       9308 : Expression::deref()
    5396                 :            : {
    5397                 :       9308 :   if (this->classification_ == EXPRESSION_UNARY)
    5398                 :            :     {
    5399                 :       4480 :       Unary_expression* ue = static_cast<Unary_expression*>(this);
    5400                 :       4480 :       if (ue->op() == OPERATOR_MULT)
    5401                 :       4480 :         return ue->operand();
    5402                 :            :     }
    5403                 :            :   return this;
    5404                 :            : }
    5405                 :            : 
    5406                 :            : // Class Binary_expression.
    5407                 :            : 
    5408                 :            : // Traversal.
    5409                 :            : 
    5410                 :            : int
    5411                 :   11461300 : Binary_expression::do_traverse(Traverse* traverse)
    5412                 :            : {
    5413                 :   11461300 :   int t = Expression::traverse(&this->left_, traverse);
    5414                 :   11461300 :   if (t == TRAVERSE_EXIT)
    5415                 :            :     return TRAVERSE_EXIT;
    5416                 :   11158300 :   return Expression::traverse(&this->right_, traverse);
    5417                 :            : }
    5418                 :            : 
    5419                 :            : // Return whether this expression may be used as a static initializer.
    5420                 :            : 
    5421                 :            : bool
    5422                 :     411380 : Binary_expression::do_is_static_initializer() const
    5423                 :            : {
    5424                 :     411380 :   if (!this->left_->is_static_initializer()
    5425                 :     411380 :       || !this->right_->is_static_initializer())
    5426                 :        996 :     return false;
    5427                 :            : 
    5428                 :            :   // Addresses can be static initializers, but we can't implement
    5429                 :            :   // arbitray binary expressions of them.
    5430                 :     410384 :   Unary_expression* lu = this->left_->unary_expression();
    5431                 :     410384 :   Unary_expression* ru = this->right_->unary_expression();
    5432                 :     410384 :   if (lu != NULL && lu->op() == OPERATOR_AND)
    5433                 :            :     {
    5434                 :          0 :       if (ru != NULL && ru->op() == OPERATOR_AND)
    5435                 :          0 :         return this->op_ == OPERATOR_MINUS;
    5436                 :            :       else
    5437                 :          0 :         return this->op_ == OPERATOR_PLUS || this->op_ == OPERATOR_MINUS;
    5438                 :            :     }
    5439                 :     410384 :   else if (ru != NULL && ru->op() == OPERATOR_AND)
    5440                 :          0 :     return this->op_ == OPERATOR_PLUS || this->op_ == OPERATOR_MINUS;
    5441                 :            : 
    5442                 :            :   // Other cases should resolve in the backend.
    5443                 :            :   return true;
    5444                 :            : }
    5445                 :            : 
    5446                 :            : // Return the type to use for a binary operation on operands of
    5447                 :            : // LEFT_TYPE and RIGHT_TYPE.  These are the types of constants and as
    5448                 :            : // such may be NULL or abstract.
    5449                 :            : 
    5450                 :            : bool
    5451                 :    5087000 : Binary_expression::operation_type(Operator op, Type* left_type,
    5452                 :            :                                   Type* right_type, Type** result_type)
    5453                 :            : {
    5454                 :    5087000 :   if (left_type != right_type
    5455                 :    1578320 :       && !left_type->is_abstract()
    5456                 :    1137520 :       && !right_type->is_abstract()
    5457                 :     646358 :       && left_type->base() != right_type->base()
    5458                 :            :       && op != OPERATOR_LSHIFT
    5459                 :    5087040 :       && op != OPERATOR_RSHIFT)
    5460                 :            :     {
    5461                 :            :       // May be a type error--let it be diagnosed elsewhere.
    5462                 :            :       return false;
    5463                 :            :     }
    5464                 :            : 
    5465                 :    5086960 :   if (op == OPERATOR_LSHIFT || op == OPERATOR_RSHIFT)
    5466                 :            :     {
    5467                 :      10080 :       if (left_type->integer_type() != NULL)
    5468                 :      10071 :         *result_type = left_type;
    5469                 :            :       else
    5470                 :          9 :         *result_type = Type::make_abstract_integer_type();
    5471                 :            :     }
    5472                 :    5076880 :   else if (!left_type->is_abstract() && left_type->named_type() != NULL)
    5473                 :    4222020 :     *result_type = left_type;
    5474                 :     854856 :   else if (!right_type->is_abstract() && right_type->named_type() != NULL)
    5475                 :     438672 :     *result_type = right_type;
    5476                 :     416184 :   else if (!left_type->is_abstract())
    5477                 :         41 :     *result_type = left_type;
    5478                 :     416143 :   else if (!right_type->is_abstract())
    5479                 :          0 :     *result_type = right_type;
    5480                 :     416143 :   else if (left_type->complex_type() != NULL)
    5481                 :         16 :     *result_type = left_type;
    5482                 :     416127 :   else if (right_type->complex_type() != NULL)
    5483                 :        712 :     *result_type = right_type;
    5484                 :     415415 :   else if (left_type->float_type() != NULL)
    5485                 :        784 :     *result_type = left_type;
    5486                 :     414631 :   else if (right_type->float_type() != NULL)
    5487                 :        457 :     *result_type = right_type;
    5488                 :     436338 :   else if (left_type->integer_type() != NULL
    5489                 :      22164 :            && left_type->integer_type()->is_rune())
    5490                 :        415 :     *result_type = left_type;
    5491                 :     435508 :   else if (right_type->integer_type() != NULL
    5492                 :      21749 :            && right_type->integer_type()->is_rune())
    5493                 :         17 :     *result_type = right_type;
    5494                 :            :   else
    5495                 :     413742 :     *result_type = left_type;
    5496                 :            : 
    5497                 :            :   return true;
    5498                 :            : }
    5499                 :            : 
    5500                 :            : // Convert an integer comparison code and an operator to a boolean
    5501                 :            : // value.
    5502                 :            : 
    5503                 :            : bool
    5504                 :       2574 : Binary_expression::cmp_to_bool(Operator op, int cmp)
    5505                 :            : {
    5506                 :       2574 :   switch (op)
    5507                 :            :     {
    5508                 :       1922 :     case OPERATOR_EQEQ:
    5509                 :       1922 :       return cmp == 0;
    5510                 :        625 :       break;
    5511                 :        625 :     case OPERATOR_NOTEQ:
    5512                 :        625 :       return cmp != 0;
    5513                 :         11 :       break;
    5514                 :         11 :     case OPERATOR_LT:
    5515                 :         11 :       return cmp < 0;
    5516                 :          0 :       break;
    5517                 :          0 :     case OPERATOR_LE:
    5518                 :          0 :       return cmp <= 0;
    5519                 :          6 :     case OPERATOR_GT:
    5520                 :          6 :       return cmp > 0;
    5521                 :         10 :     case OPERATOR_GE:
    5522                 :         10 :       return cmp >= 0;
    5523                 :          0 :     default:
    5524                 :          0 :       go_unreachable();
    5525                 :            :     }
    5526                 :            : }
    5527                 :            : 
    5528                 :            : // Compare constants according to OP.
    5529                 :            : 
    5530                 :            : bool
    5531                 :        871 : Binary_expression::compare_constant(Operator op, Numeric_constant* left_nc,
    5532                 :            :                                     Numeric_constant* right_nc,
    5533                 :            :                                     Location location, bool* result)
    5534                 :            : {
    5535                 :        871 :   Type* left_type = left_nc->type();
    5536                 :        871 :   Type* right_type = right_nc->type();
    5537                 :            : 
    5538                 :        871 :   Type* type;
    5539                 :        871 :   if (!Binary_expression::operation_type(op, left_type, right_type, &type))
    5540                 :            :     return false;
    5541                 :            : 
    5542                 :            :   // When comparing an untyped operand to a typed operand, we are
    5543                 :            :   // effectively coercing the untyped operand to the other operand's
    5544                 :            :   // type, so make sure that is valid.
    5545                 :        869 :   if (!left_nc->set_type(type, true, location)
    5546                 :        869 :       || !right_nc->set_type(type, true, location))
    5547                 :          0 :     return false;
    5548                 :            : 
    5549                 :        869 :   bool ret;
    5550                 :        869 :   int cmp;
    5551                 :        869 :   if (type->complex_type() != NULL)
    5552                 :            :     {
    5553                 :          4 :       if (op != OPERATOR_EQEQ && op != OPERATOR_NOTEQ)
    5554                 :            :         return false;
    5555                 :          4 :       ret = Binary_expression::compare_complex(left_nc, right_nc, &cmp);
    5556                 :            :     }
    5557                 :        865 :   else if (type->float_type() != NULL)
    5558                 :         21 :     ret = Binary_expression::compare_float(left_nc, right_nc, &cmp);
    5559                 :            :   else
    5560                 :        844 :     ret = Binary_expression::compare_integer(left_nc, right_nc, &cmp);
    5561                 :            : 
    5562                 :        869 :   if (ret)
    5563                 :        869 :     *result = Binary_expression::cmp_to_bool(op, cmp);
    5564                 :            : 
    5565                 :            :   return ret;
    5566                 :            : }
    5567                 :            : 
    5568                 :            : // Compare integer constants.
    5569                 :            : 
    5570                 :            : bool
    5571                 :        844 : Binary_expression::compare_integer(const Numeric_constant* left_nc,
    5572                 :            :                                    const Numeric_constant* right_nc,
    5573                 :            :                                    int* cmp)
    5574                 :            : {
    5575                 :        844 :   mpz_t left_val;
    5576                 :        844 :   if (!left_nc->to_int(&left_val))
    5577                 :            :     return false;
    5578                 :        844 :   mpz_t right_val;
    5579                 :        844 :   if (!right_nc->to_int(&right_val))
    5580                 :            :     {
    5581                 :          0 :       mpz_clear(left_val);
    5582                 :          0 :       return false;
    5583                 :            :     }
    5584                 :            : 
    5585                 :        844 :   *cmp = mpz_cmp(left_val, right_val);
    5586                 :            : 
    5587                 :        844 :   mpz_clear(left_val);
    5588                 :        844 :   mpz_clear(right_val);
    5589                 :            : 
    5590                 :        844 :   return true;
    5591                 :            : }
    5592                 :            : 
    5593                 :            : // Compare floating point constants.
    5594                 :            : 
    5595                 :            : bool
    5596                 :         21 : Binary_expression::compare_float(const Numeric_constant* left_nc,
    5597                 :            :                                  const Numeric_constant* right_nc,
    5598                 :            :                                  int* cmp)
    5599                 :            : {
    5600                 :         21 :   mpfr_t left_val;
    5601                 :         21 :   if (!left_nc->to_float(&left_val))
    5602                 :            :     return false;
    5603                 :         21 :   mpfr_t right_val;
    5604                 :         21 :   if (!right_nc->to_float(&right_val))
    5605                 :            :     {
    5606                 :          0 :       mpfr_clear(left_val);
    5607                 :          0 :       return false;
    5608                 :            :     }
    5609                 :            : 
    5610                 :            :   // We already coerced both operands to the same type.  If that type
    5611                 :            :   // is not an abstract type, we need to round the values accordingly.
    5612                 :         21 :   Type* type = left_nc->type();
    5613                 :         21 :   if (!type->is_abstract() && type->float_type() != NULL)
    5614                 :            :     {
    5615                 :         26 :       int bits = type->float_type()->bits();
    5616                 :         13 :       mpfr_prec_round(left_val, bits, MPFR_RNDN);
    5617                 :         13 :       mpfr_prec_round(right_val, bits, MPFR_RNDN);
    5618                 :            :     }
    5619                 :            : 
    5620                 :         21 :   *cmp = mpfr_cmp(left_val, right_val);
    5621                 :            : 
    5622                 :         21 :   mpfr_clear(left_val);
    5623                 :         21 :   mpfr_clear(right_val);
    5624                 :            : 
    5625                 :         21 :   return true;
    5626                 :            : }
    5627                 :            : 
    5628                 :            : // Compare complex constants.  Complex numbers may only be compared
    5629                 :            : // for equality.
    5630                 :            : 
    5631                 :            : bool
    5632                 :          4 : Binary_expression::compare_complex(const Numeric_constant* left_nc,
    5633                 :            :                                    const Numeric_constant* right_nc,
    5634                 :            :                                    int* cmp)
    5635                 :            : {
    5636                 :          4 :   mpc_t left_val;
    5637                 :          4 :   if (!left_nc->to_complex(&left_val))
    5638                 :            :     return false;
    5639                 :          4 :   mpc_t right_val;
    5640                 :          4 :   if (!right_nc->to_complex(&right_val))
    5641                 :            :     {
    5642                 :          0 :       mpc_clear(left_val);
    5643                 :          0 :       return false;
    5644                 :            :     }
    5645                 :            : 
    5646                 :            :   // We already coerced both operands to the same type.  If that type
    5647                 :            :   // is not an abstract type, we need to round the values accordingly.
    5648                 :          4 :   Type* type = left_nc->type();
    5649                 :          4 :   if (!type->is_abstract() && type->complex_type() != NULL)
    5650                 :            :     {
    5651                 :          0 :       int bits = type->complex_type()->bits();
    5652                 :          0 :       mpfr_prec_round(mpc_realref(left_val), bits / 2, MPFR_RNDN);
    5653                 :          0 :       mpfr_prec_round(mpc_imagref(left_val), bits / 2, MPFR_RNDN);
    5654                 :          0 :       mpfr_prec_round(mpc_realref(right_val), bits / 2, MPFR_RNDN);
    5655                 :          0 :       mpfr_prec_round(mpc_imagref(right_val), bits / 2, MPFR_RNDN);
    5656                 :            :     }
    5657                 :            : 
    5658                 :          4 :   *cmp = mpc_cmp(left_val, right_val) != 0;
    5659                 :            : 
    5660                 :          4 :   mpc_clear(left_val);
    5661                 :          4 :   mpc_clear(right_val);
    5662                 :            : 
    5663                 :          4 :   return true;
    5664                 :            : }
    5665                 :            : 
    5666                 :            : // Apply binary opcode OP to LEFT_NC and RIGHT_NC, setting NC.  Return
    5667                 :            : // true if this could be done, false if not.  Issue errors at LOCATION
    5668                 :            : // as appropriate, and sets *ISSUED_ERROR if it did.
    5669                 :            : 
    5670                 :            : bool
    5671                 :      37081 : Binary_expression::eval_constant(Operator op, Numeric_constant* left_nc,
    5672                 :            :                                  Numeric_constant* right_nc,
    5673                 :            :                                  Location location, Numeric_constant* nc,
    5674                 :            :                                  bool* issued_error)
    5675                 :            : {
    5676                 :      37081 :   *issued_error = false;
    5677                 :      37081 :   switch (op)
    5678                 :            :     {
    5679                 :            :     case OPERATOR_OROR:
    5680                 :            :     case OPERATOR_ANDAND:
    5681                 :            :     case OPERATOR_EQEQ:
    5682                 :            :     case OPERATOR_NOTEQ:
    5683                 :            :     case OPERATOR_LT:
    5684                 :            :     case OPERATOR_LE:
    5685                 :            :     case OPERATOR_GT:
    5686                 :            :     case OPERATOR_GE:
    5687                 :            :       // These return boolean values, not numeric.
    5688                 :            :       return false;
    5689                 :      37081 :     default:
    5690                 :      37081 :       break;
    5691                 :            :     }
    5692                 :            : 
    5693                 :      37081 :   Type* left_type = left_nc->type();
    5694                 :      37081 :   Type* right_type = right_nc->type();
    5695                 :            : 
    5696                 :      37081 :   Type* type;
    5697                 :      37081 :   if (!Binary_expression::operation_type(op, left_type, right_type, &type))
    5698                 :            :     return false;
    5699                 :            : 
    5700                 :      37081 :   bool is_shift = op == OPERATOR_LSHIFT || op == OPERATOR_RSHIFT;
    5701                 :            : 
    5702                 :            :   // When combining an untyped operand with a typed operand, we are
    5703                 :            :   // effectively coercing the untyped operand to the other operand's
    5704                 :            :   // type, so make sure that is valid.
    5705                 :      37081 :   if (!left_nc->set_type(type, true, location))
    5706                 :            :     return false;
    5707                 :      37081 :   if (!is_shift && !right_nc->set_type(type, true, location))
    5708                 :            :     return false;
    5709                 :      37070 :   if (is_shift
    5710                 :      47150 :       && ((left_type->integer_type() == NULL
    5711                 :          9 :            && !left_type->is_abstract())
    5712                 :      37070 :           || (right_type->integer_type() == NULL
    5713                 :          0 :               && !right_type->is_abstract())))
    5714                 :          0 :     return false;
    5715                 :            : 
    5716                 :      37070 :   bool r;
    5717                 :      37070 :   if (type->complex_type() != NULL)
    5718                 :        724 :     r = Binary_expression::eval_complex(op, left_nc, right_nc, location, nc);
    5719                 :      36346 :   else if (type->float_type() != NULL)
    5720                 :        816 :     r = Binary_expression::eval_float(op, left_nc, right_nc, location, nc);
    5721                 :            :   else
    5722                 :      35530 :     r = Binary_expression::eval_integer(op, left_nc, right_nc, location, nc);
    5723                 :            : 
    5724                 :      37070 :   if (r)
    5725                 :            :     {
    5726                 :      37068 :       r = nc->set_type(type, true, location);
    5727                 :      37068 :       if (!r)
    5728                 :         12 :         *issued_error = true;
    5729                 :            :     }
    5730                 :            : 
    5731                 :            :   return r;
    5732                 :            : }
    5733                 :            : 
    5734                 :            : // Apply binary opcode OP to LEFT_NC and RIGHT_NC, setting NC, using
    5735                 :            : // integer operations.  Return true if this could be done, false if
    5736                 :            : // not.
    5737                 :            : 
    5738                 :            : bool
    5739                 :      35530 : Binary_expression::eval_integer(Operator op, const Numeric_constant* left_nc,
    5740                 :            :                                 const Numeric_constant* right_nc,
    5741                 :            :                                 Location location, Numeric_constant* nc)
    5742                 :            : {
    5743                 :      35530 :   mpz_t left_val;
    5744                 :      35530 :   if (!left_nc->to_int(&left_val))
    5745                 :            :     return false;
    5746                 :      35530 :   mpz_t right_val;
    5747                 :      35530 :   if (!right_nc->to_int(&right_val))
    5748                 :            :     {
    5749                 :          0 :       mpz_clear(left_val);
    5750                 :          0 :       return false;
    5751                 :            :     }
    5752                 :            : 
    5753                 :      35530 :   mpz_t val;
    5754                 :      35530 :   mpz_init(val);
    5755                 :            : 
    5756                 :      35530 :   switch (op)
    5757                 :            :     {
    5758                 :       7500 :     case OPERATOR_PLUS:
    5759                 :       7500 :       mpz_add(val, left_val, right_val);
    5760                 :       7500 :       if (mpz_sizeinbase(val, 2) > 0x100000)
    5761                 :            :         {
    5762                 :          0 :           go_error_at(location, "constant addition overflow");
    5763                 :          0 :           nc->set_invalid();
    5764                 :          0 :           mpz_set_ui(val, 1);
    5765                 :            :         }
    5766                 :            :       break;
    5767                 :       6035 :     case OPERATOR_MINUS:
    5768                 :       6035 :       mpz_sub(val, left_val, right_val);
    5769                 :       6035 :       if (mpz_sizeinbase(val, 2) > 0x100000)
    5770                 :            :         {
    5771                 :          0 :           go_error_at(location, "constant subtraction overflow");
    5772                 :          0 :           nc->set_invalid();
    5773                 :          0 :           mpz_set_ui(val, 1);
    5774                 :            :         }
    5775                 :            :       break;
    5776                 :       4351 :     case OPERATOR_OR:
    5777                 :       4351 :       mpz_ior(val, left_val, right_val);
    5778                 :       4351 :       break;
    5779                 :         10 :     case OPERATOR_XOR:
    5780                 :         10 :       mpz_xor(val, left_val, right_val);
    5781                 :         10 :       break;
    5782                 :       5805 :     case OPERATOR_MULT:
    5783                 :       5805 :       mpz_mul(val, left_val, right_val);
    5784                 :       5805 :       if (mpz_sizeinbase(val, 2) > 0x100000)
    5785                 :            :         {
    5786                 :          0 :           go_error_at(location, "constant multiplication overflow");
    5787                 :          0 :           nc->set_invalid();
    5788                 :          0 :           mpz_set_ui(val, 1);
    5789                 :            :         }
    5790                 :            :       break;
    5791                 :       1172 :     case OPERATOR_DIV:
    5792                 :       1172 :       if (mpz_sgn(right_val) != 0)
    5793                 :       1171 :         mpz_tdiv_q(val, left_val, right_val);
    5794                 :            :       else
    5795                 :            :         {
    5796                 :          1 :           go_error_at(location, "division by zero");
    5797                 :          1 :           nc->set_invalid();
    5798                 :          1 :           mpz_set_ui(val, 0);
    5799                 :            :         }
    5800                 :            :       break;
    5801                 :         52 :     case OPERATOR_MOD:
    5802                 :         52 :       if (mpz_sgn(right_val) != 0)
    5803                 :         52 :         mpz_tdiv_r(val, left_val, right_val);
    5804                 :            :       else
    5805                 :            :         {
    5806                 :          0 :           go_error_at(location, "division by zero");
    5807                 :          0 :           nc->set_invalid();
    5808                 :          0 :           mpz_set_ui(val, 0);
    5809                 :            :         }
    5810                 :            :       break;
    5811                 :       9754 :     case OPERATOR_LSHIFT:
    5812                 :       9754 :       {
    5813                 :       9754 :         unsigned long shift = mpz_get_ui(right_val);
    5814                 :       9754 :         if (mpz_cmp_ui(right_val, shift) == 0 && shift <= 0x100000)
    5815                 :       9754 :           mpz_mul_2exp(val, left_val, shift);
    5816                 :            :         else
    5817                 :            :           {
    5818                 :          0 :             go_error_at(location, "shift count overflow");
    5819                 :          0 :             nc->set_invalid();
    5820                 :          0 :             mpz_set_ui(val, 1);
    5821                 :            :           }
    5822                 :            :         break;
    5823                 :            :       }
    5824                 :            :       break;
    5825                 :        326 :     case OPERATOR_RSHIFT:
    5826                 :        326 :       {
    5827                 :        326 :         unsigned long shift = mpz_get_ui(right_val);
    5828                 :        326 :         if (mpz_cmp_ui(right_val, shift) != 0)
    5829                 :            :           {
    5830                 :          0 :             go_error_at(location, "shift count overflow");
    5831                 :          0 :             nc->set_invalid();
    5832                 :          0 :             mpz_set_ui(val, 1);
    5833                 :            :           }
    5834                 :            :         else
    5835                 :            :           {
    5836                 :        326 :             if (mpz_cmp_ui(left_val, 0) >= 0)
    5837                 :        314 :               mpz_tdiv_q_2exp(val, left_val, shift);
    5838                 :            :             else
    5839                 :         12 :               mpz_fdiv_q_2exp(val, left_val, shift);
    5840                 :            :           }
    5841                 :            :         break;
    5842                 :            :       }
    5843                 :            :       break;
    5844                 :        505 :     case OPERATOR_AND:
    5845                 :        505 :       mpz_and(val, left_val, right_val);
    5846                 :        505 :       break;
    5847                 :         20 :     case OPERATOR_BITCLEAR:
    5848                 :         20 :       {
    5849                 :         20 :         mpz_t tval;
    5850                 :         20 :         mpz_init(tval);
    5851                 :         20 :         mpz_com(tval, right_val);
    5852                 :         20 :         mpz_and(val, left_val, tval);
    5853                 :         20 :         mpz_clear(tval);
    5854                 :            :       }
    5855                 :         20 :       break;
    5856                 :          0 :     default:
    5857                 :          0 :       go_unreachable();
    5858                 :            :     }
    5859                 :            : 
    5860                 :      35530 :   mpz_clear(left_val);
    5861                 :      35530 :   mpz_clear(right_val);
    5862                 :            : 
    5863                 :      35530 :   if (left_nc->is_rune()
    5864                 :      35530 :       || (op != OPERATOR_LSHIFT
    5865                 :      35159 :           && op != OPERATOR_RSHIFT
    5866                 :      25081 :           && right_nc->is_rune()))
    5867                 :        386 :     nc->set_rune(NULL, val);
    5868                 :            :   else
    5869                 :      35144 :     nc->set_int(NULL, val);
    5870                 :            : 
    5871                 :      35530 :   mpz_clear(val);
    5872                 :            : 
    5873                 :      35530 :   return true;
    5874                 :            : }
    5875                 :            : 
    5876                 :            : // Apply binary opcode OP to LEFT_NC and RIGHT_NC, setting NC, using
    5877                 :            : // floating point operations.  Return true if this could be done,
    5878                 :            : // false if not.
    5879                 :            : 
    5880                 :            : bool
    5881                 :        816 : Binary_expression::eval_float(Operator op, const Numeric_constant* left_nc,
    5882                 :            :                               const Numeric_constant* right_nc,
    5883                 :            :                               Location location, Numeric_constant* nc)
    5884                 :            : {
    5885                 :        816 :   mpfr_t left_val;
    5886                 :        816 :   if (!left_nc->to_float(&left_val))
    5887                 :            :     return false;
    5888                 :        816 :   mpfr_t right_val;
    5889                 :        816 :   if (!right_nc->to_float(&right_val))
    5890                 :            :     {
    5891                 :          0 :       mpfr_clear(left_val);
    5892                 :          0 :       return false;
    5893                 :            :     }
    5894                 :            : 
    5895                 :        816 :   mpfr_t val;
    5896                 :        816 :   mpfr_init(val);
    5897                 :            : 
    5898                 :        816 :   bool ret = true;
    5899                 :        816 :   switch (op)
    5900                 :            :     {
    5901                 :         84 :     case OPERATOR_PLUS:
    5902                 :         84 :       mpfr_add(val, left_val, right_val, MPFR_RNDN);
    5903                 :         84 :       break;
    5904                 :        102 :     case OPERATOR_MINUS:
    5905                 :        102 :       mpfr_sub(val, left_val, right_val, MPFR_RNDN);
    5906                 :        102 :       break;
    5907                 :          2 :     case OPERATOR_OR:
    5908                 :          2 :     case OPERATOR_XOR:
    5909                 :          2 :     case OPERATOR_AND:
    5910                 :          2 :     case OPERATOR_BITCLEAR:
    5911                 :          2 :     case OPERATOR_MOD:
    5912                 :          2 :     case OPERATOR_LSHIFT:
    5913                 :          2 :     case OPERATOR_RSHIFT:
    5914                 :          2 :       mpfr_set_ui(val, 0, MPFR_RNDN);
    5915                 :          2 :       ret = false;
    5916                 :          2 :       break;
    5917                 :        117 :     case OPERATOR_MULT:
    5918                 :        117 :       mpfr_mul(val, left_val, right_val, MPFR_RNDN);
    5919                 :        117 :       break;
    5920                 :        511 :     case OPERATOR_DIV:
    5921                 :        511 :       if (!mpfr_zero_p(right_val))
    5922                 :        510 :         mpfr_div(val, left_val, right_val, MPFR_RNDN);
    5923                 :            :       else
    5924                 :            :         {
    5925                 :          1 :           go_error_at(location, "division by zero");
    5926                 :          1 :           nc->set_invalid();
    5927                 :          1 :           mpfr_set_ui(val, 0, MPFR_RNDN);
    5928                 :            :         }
    5929                 :            :       break;
    5930                 :          0 :     default:
    5931                 :          0 :       go_unreachable();
    5932                 :            :     }
    5933                 :            : 
    5934                 :        816 :   mpfr_clear(left_val);
    5935                 :        816 :   mpfr_clear(right_val);
    5936                 :            : 
    5937                 :        816 :   nc->set_float(NULL, val);
    5938                 :        816 :   mpfr_clear(val);
    5939                 :            : 
    5940                 :        816 :   return ret;
    5941                 :            : }
    5942                 :            : 
    5943                 :            : // Apply binary opcode OP to LEFT_NC and RIGHT_NC, setting NC, using
    5944                 :            : // complex operations.  Return true if this could be done, false if
    5945                 :            : // not.
    5946                 :            : 
    5947                 :            : bool
    5948                 :        724 : Binary_expression::eval_complex(Operator op, const Numeric_constant* left_nc,
    5949                 :            :                                 const Numeric_constant* right_nc,
    5950                 :            :                                 Location location, Numeric_constant* nc)
    5951                 :            : {
    5952                 :        724 :   mpc_t left_val;
    5953                 :        724 :   if (!left_nc->to_complex(&left_val))
    5954                 :            :     return false;
    5955                 :        724 :   mpc_t right_val;
    5956                 :        724 :   if (!right_nc->to_complex(&right_val))
    5957                 :            :     {
    5958                 :          0 :       mpc_clear(left_val);
    5959                 :          0 :       return false;
    5960                 :            :     }
    5961                 :            : 
    5962                 :        724 :   mpc_t val;
    5963                 :        724 :   mpc_init2(val, mpc_precision);
    5964                 :            : 
    5965                 :        724 :   bool ret = true;
    5966                 :        724 :   switch (op)
    5967                 :            :     {
    5968                 :        478 :     case OPERATOR_PLUS:
    5969                 :        478 :       mpc_add(val, left_val, right_val, MPC_RNDNN);
    5970                 :        478 :       break;
    5971                 :        240 :     case OPERATOR_MINUS:
    5972                 :        240 :       mpc_sub(val, left_val, right_val, MPC_RNDNN);
    5973                 :        240 :       break;
    5974                 :          0 :     case OPERATOR_OR:
    5975                 :          0 :     case OPERATOR_XOR:
    5976                 :          0 :     case OPERATOR_AND:
    5977                 :          0 :     case OPERATOR_BITCLEAR:
    5978                 :          0 :     case OPERATOR_MOD:
    5979                 :          0 :     case OPERATOR_LSHIFT:
    5980                 :          0 :     case OPERATOR_RSHIFT:
    5981                 :          0 :       mpc_set_ui(val, 0, MPC_RNDNN);
    5982                 :          0 :       ret = false;
    5983                 :          0 :       break;
    5984                 :          5 :     case OPERATOR_MULT:
    5985                 :          5 :       mpc_mul(val, left_val, right_val, MPC_RNDNN);
    5986                 :          5 :       break;
    5987                 :          1 :     case OPERATOR_DIV:
    5988                 :          1 :       if (mpc_cmp_si(right_val, 0) == 0)
    5989                 :            :         {
    5990                 :          0 :           go_error_at(location, "division by zero");
    5991                 :          0 :           nc->set_invalid();
    5992                 :          0 :           mpc_set_ui(val, 0, MPC_RNDNN);
    5993                 :          0 :           break;
    5994                 :            :         }
    5995                 :          1 :       mpc_div(val, left_val, right_val, MPC_RNDNN);
    5996                 :          1 :       break;
    5997                 :          0 :     default:
    5998                 :          0 :       go_unreachable();
    5999                 :            :     }
    6000                 :            : 
    6001                 :        724 :   mpc_clear(left_val);
    6002                 :        724 :   mpc_clear(right_val);
    6003                 :            : 
    6004                 :        724 :   nc->set_complex(NULL, val);
    6005                 :        724 :   mpc_clear(val);
    6006                 :            : 
    6007                 :        724 :   return ret;
    6008                 :            : }
    6009                 :            : 
    6010                 :            : // Lower a binary expression.  We have to evaluate constant
    6011                 :            : // expressions now, in order to implement Go's unlimited precision
    6012                 :            : // constants.
    6013                 :            : 
    6014                 :            : Expression*
    6015                 :    1277760 : Binary_expression::do_lower(Gogo* gogo, Named_object*,
    6016                 :            :                             Statement_inserter* inserter, int)
    6017                 :            : {
    6018                 :    1277760 :   Location location = this->location();
    6019                 :    1277760 :   Operator op = this->op_;
    6020                 :    1277760 :   Expression* left = this->left_;
    6021                 :    1277760 :   Expression* right = this->right_;
    6022                 :            : 
    6023                 :    1277760 :   const bool is_comparison = (op == OPERATOR_EQEQ
    6024                 :            :                               || op == OPERATOR_NOTEQ
    6025                 :            :                               || op == OPERATOR_LT
    6026                 :            :                               || op == OPERATOR_LE
    6027                 :            :                               || op == OPERATOR_GT
    6028                 :    1277760 :                               || op == OPERATOR_GE);
    6029                 :            : 
    6030                 :            :   // Numeric constant expressions.
    6031                 :    1277760 :   {
    6032                 :    2517940 :     Numeric_constant left_nc;
    6033                 :    1240170 :     Numeric_constant right_nc;
    6034                 :    1277760 :     if (left->numeric_constant_value(&left_nc)
    6035                 :    1349380 :         && right->numeric_constant_value(&right_nc))
    6036                 :            :       {
    6037                 :      37590 :         if (is_comparison)
    6038                 :            :           {
    6039                 :        871 :             bool result;
    6040                 :        871 :             if (!Binary_expression::compare_constant(op, &left_nc,
    6041                 :            :                                                      &right_nc, location,
    6042                 :            :                                                      &result))
    6043                 :          2 :               return this;
    6044                 :        869 :             return Expression::make_cast(Type::make_boolean_type(),
    6045                 :            :                                          Expression::make_boolean(result,
    6046                 :            :                                                                   location),
    6047                 :        869 :                                          location);
    6048                 :            :           }
    6049                 :            :         else
    6050                 :            :           {
    6051                 :      73438 :             Numeric_constant nc;
    6052                 :      36719 :             bool issued_error;
    6053                 :      36719 :             if (!Binary_expression::eval_constant(op, &left_nc, &right_nc,
    6054                 :            :                                                   location, &nc,
    6055                 :            :                                                   &issued_error))
    6056                 :            :               {
    6057                 :         23 :                 if (issued_error)
    6058                 :         12 :                   return Expression::make_error(location);
    6059                 :         11 :                 return this;
    6060                 :            :               }
    6061                 :      36696 :             return nc.expression(location);
    6062                 :            :           }
    6063                 :            :       }
    6064                 :            :   }
    6065                 :            : 
    6066                 :            :   // String constant expressions.
    6067                 :            :   //
    6068                 :            :   // Avoid constant folding here if the left and right types are incompatible
    6069                 :            :   // (leave the operation intact so that the type checker can complain about it
    6070                 :            :   // later on). If concatenating an abstract string with a named string type,
    6071                 :            :   // result type needs to be of the named type (see issue 31412).
    6072                 :    1240170 :   if (left->type()->is_string_type()
    6073                 :      89961 :       && right->type()->is_string_type()
    6074                 :    1330120 :       && (left->type()->named_type() == NULL
    6075                 :      75650 :           || right->type()->named_type() == NULL
    6076                 :      32009 :           || left->type()->named_type() == right->type()->named_type()))
    6077                 :            :     {
    6078                 :     169222 :       std::string left_string;
    6079                 :      79277 :       std::string right_string;
    6080                 :      89945 :       if (left->string_constant_value(&left_string)
    6081                 :     105785 :           && right->string_constant_value(&right_string))
    6082                 :            :         {
    6083                 :      10668 :           if (op == OPERATOR_PLUS)
    6084                 :            :             {
    6085                 :       8963 :               Type* result_type = (left->type()->named_type() != NULL
    6086                 :       8963 :                                    ? left->type()
    6087                 :       8877 :                                    : right->type());
    6088                 :      17608 :               return Expression::make_string_typed(left_string + right_string,
    6089                 :            :                                                    result_type, location);
    6090                 :            :             }
    6091                 :       1705 :           else if (is_comparison)
    6092                 :            :             {
    6093                 :       1705 :               int cmp = left_string.compare(right_string);
    6094                 :       1705 :               bool r = Binary_expression::cmp_to_bool(op, cmp);
    6095                 :       1705 :               return Expression::make_boolean(r, location);
    6096                 :            :             }
    6097                 :            :         }
    6098                 :            :     }
    6099                 :            : 
    6100                 :            :   // Lower struct, array, and some interface comparisons.
    6101                 :    1229500 :   if (op == OPERATOR_EQEQ || op == OPERATOR_NOTEQ)
    6102                 :            :     {
    6103                 :     420316 :       if (left->type()->struct_type() != NULL
    6104                 :       5974 :           && right->type()->struct_type() != NULL)
    6105                 :       5959 :         return this->lower_struct_comparison(gogo, inserter);
    6106                 :     422035 :       else if (left->type()->array_type() != NULL
    6107                 :      13652 :                && !left->type()->is_slice_type()
    6108                 :      17648 :                && right->type()->array_type() != NULL
    6109                 :       8817 :                && !right->type()->is_slice_type())
    6110                 :       8817 :         return this->lower_array_comparison(gogo, inserter);
    6111                 :     475847 :       else if ((left->type()->interface_type() != NULL
    6112                 :     408470 :                 && right->type()->interface_type() == NULL)
    6113                 :     655474 :                || (left->type()->interface_type() == NULL
    6114                 :     323285 :                    && right->type()->interface_type() != NULL))
    6115                 :      67529 :         return this->lower_interface_value_comparison(gogo, inserter);
    6116                 :            :     }
    6117                 :            : 
    6118                 :            :   // Lower string concatenation to String_concat_expression, so that
    6119                 :            :   // we can group sequences of string additions.
    6120                 :    1147200 :   if (this->left_->type()->is_string_type() && this->op_ == OPERATOR_PLUS)
    6121                 :            :     {
    6122                 :      14418 :       Expression_list* exprs;
    6123                 :      14418 :       String_concat_expression* left_sce =
    6124                 :      14418 :         this->left_->string_concat_expression();
    6125                 :       4674 :       if (left_sce != NULL)
    6126                 :       4674 :         exprs = left_sce->exprs();
    6127                 :            :       else
    6128                 :            :         {
    6129                 :       9744 :           exprs = new Expression_list();
    6130                 :       9744 :           exprs->push_back(this->left_);
    6131                 :            :         }
    6132                 :            : 
    6133                 :      14418 :       String_concat_expression* right_sce =
    6134                 :      14418 :         this->right_->string_concat_expression();
    6135                 :        361 :       if (right_sce != NULL)
    6136                 :        361 :         exprs->append(right_sce->exprs());
    6137                 :            :       else
    6138                 :      14057 :         exprs->push_back(this->right_);
    6139                 :            : 
    6140                 :      14418 :       return Expression::make_string_concat(exprs);
    6141                 :            :     }
    6142                 :            : 
    6143                 :    1132780 :   return this;
    6144                 :            : }
    6145                 :            : 
    6146                 :            : // Lower a struct comparison.
    6147                 :            : 
    6148                 :            : Expression*
    6149                 :       5959 : Binary_expression::lower_struct_comparison(Gogo* gogo,
    6150                 :            :                                            Statement_inserter* inserter)
    6151                 :            : {
    6152                 :       5959 :   Struct_type* st = this->left_->type()->struct_type();
    6153                 :       5959 :   Struct_type* st2 = this->right_->type()->struct_type();
    6154                 :       5959 :   if (st2 == NULL)
    6155                 :          0 :     return this;
    6156                 :       5959 :   if (st != st2
    6157                 :       5959 :       && !Type::are_identical(st, st2,
    6158                 :            :                               Type::COMPARE_ERRORS | Type::COMPARE_TAGS,
    6159                 :            :                               NULL))
    6160                 :          0 :     return this;
    6161                 :       5959 :   if (!Type::are_compatible_for_comparison(true, this->left_->type(),
    6162                 :       5959 :                                            this->right_->type(), NULL))
    6163                 :          3 :     return this;
    6164                 :            : 
    6165                 :            :   // See if we can compare using memcmp.  As a heuristic, we use
    6166                 :            :   // memcmp rather than field references and comparisons if there are
    6167                 :            :   // more than two fields.
    6168                 :       5956 :   if (st->compare_is_identity(gogo) && st->total_field_count() > 2)
    6169                 :        403 :     return this->lower_compare_to_memcmp(gogo, inserter);
    6170                 :            : 
    6171                 :       5553 :   Location loc = this->location();
    6172                 :            : 
    6173                 :       5553 :   Expression* left = this->left_;
    6174                 :       5553 :   Temporary_statement* left_temp = NULL;
    6175                 :       5553 :   if (left->var_expression() == NULL
    6176                 :       5553 :       && left->temporary_reference_expression() == NULL)
    6177                 :            :     {
    6178                 :       5365 :       left_temp = Statement::make_temporary(left->type(), NULL, loc);
    6179                 :       5365 :       inserter->insert(left_temp);
    6180                 :       5365 :       left = Expression::make_set_and_use_temporary(left_temp, left, loc);
    6181                 :            :     }
    6182                 :            : 
    6183                 :       5553 :   Expression* right = this->right_;
    6184                 :       5553 :   Temporary_statement* right_temp = NULL;
    6185                 :       5553 :   if (right->var_expression() == NULL
    6186                 :       5553 :       && right->temporary_reference_expression() == NULL)
    6187                 :            :     {
    6188                 :       5411 :       right_temp = Statement::make_temporary(right->type(), NULL, loc);
    6189                 :       5411 :       inserter->insert(right_temp);
    6190                 :       5411 :       right = Expression::make_set_and_use_temporary(right_temp, right, loc);
    6191                 :            :     }
    6192                 :            : 
    6193                 :       5553 :   Expression* ret = Expression::make_boolean(true, loc);
    6194                 :       5553 :   const Struct_field_list* fields = st->fields();
    6195                 :       5553 :   unsigned int field_index = 0;
    6196                 :      18325 :   for (Struct_field_list::const_iterator pf = fields->begin();
    6197                 :      18325 :        pf != fields->end();
    6198                 :      12772 :        ++pf, ++field_index)
    6199                 :            :     {
    6200                 :      12772 :       if (Gogo::is_sink_name(pf->field_name()))
    6201                 :         22 :         continue;
    6202                 :            : 
    6203                 :      12750 :       if (field_index > 0)
    6204                 :            :         {
    6205                 :       7340 :           if (left_temp == NULL)
    6206                 :        469 :             left = left->copy();
    6207                 :            :           else
    6208                 :       6871 :             left = Expression::make_temporary_reference(left_temp, loc);
    6209                 :       7340 :           if (right_temp == NULL)
    6210                 :        364 :             right = right->copy();
    6211                 :            :           else
    6212                 :       6976 :             right = Expression::make_temporary_reference(right_temp, loc);
    6213                 :            :         }
    6214                 :      12750 :       Expression* f1 = Expression::make_field_reference(left, field_index,
    6215                 :            :                                                         loc);
    6216                 :      12750 :       Expression* f2 = Expression::make_field_reference(right, field_index,
    6217                 :            :                                                         loc);
    6218                 :      12750 :       Expression* cond = Expression::make_binary(OPERATOR_EQEQ, f1, f2, loc);
    6219                 :      12750 :       ret = Expression::make_binary(OPERATOR_ANDAND, ret, cond, loc);
    6220                 :            :     }
    6221                 :            : 
    6222                 :       5553 :   if (this->op_ == OPERATOR_NOTEQ)
    6223                 :       5026 :     ret = Expression::make_unary(OPERATOR_NOT, ret, loc);
    6224                 :            : 
    6225                 :            :   return ret;
    6226                 :            : }
    6227                 :            : 
    6228                 :            : // Lower an array comparison.
    6229                 :            : 
    6230                 :            : Expression*
    6231                 :       8817 : Binary_expression::lower_array_comparison(Gogo* gogo,
    6232                 :            :                                           Statement_inserter* inserter)
    6233                 :            : {
    6234                 :       8817 :   Array_type* at = this->left_->type()->array_type();
    6235                 :       8817 :   Array_type* at2 = this->right_->type()->array_type();
    6236                 :       8817 :   if (at2 == NULL)
    6237                 :          0 :     return this;
    6238                 :       8817 :   if (at != at2
    6239                 :       8817 :       && !Type::are_identical(at, at2,
    6240                 :            :                               Type::COMPARE_ERRORS | Type::COMPARE_TAGS,
    6241                 :            :                               NULL))
    6242                 :          0 :     return this;
    6243                 :       8817 :   if (!Type::are_compatible_for_comparison(true, this->left_->type(),
    6244                 :       8817 :                                            this->right_->type(), NULL))
    6245                 :          0 :     return this;
    6246                 :            : 
    6247                 :            :   // Call memcmp directly if possible.  This may let the middle-end
    6248                 :            :   // optimize the call.
    6249                 :       8817 :   if (at->compare_is_identity(gogo))
    6250                 :       7872 :     return this->lower_compare_to_memcmp(gogo, inserter);
    6251                 :            : 
    6252                 :            :   // Call the array comparison function.
    6253                 :        945 :   Named_object* equal_fn =
    6254                 :        945 :     at->equal_function(gogo, this->left_->type()->named_type(), NULL);
    6255                 :            : 
    6256                 :        945 :   Location loc = this->location();
    6257                 :            : 
    6258                 :        945 :   Expression* func = Expression::make_func_reference(equal_fn, NULL, loc);
    6259                 :            : 
    6260                 :        945 :   Expression_list* args = new Expression_list();
    6261                 :        945 :   args->push_back(this->operand_address(inserter, this->left_));
    6262                 :        945 :   args->push_back(this->operand_address(inserter, this->right_));
    6263                 :            : 
    6264                 :        945 :   Expression* ret = Expression::make_call(func, args, false, loc);
    6265                 :            : 
    6266                 :        945 :   if (this->op_ == OPERATOR_NOTEQ)
    6267                 :        479 :     ret = Expression::make_unary(OPERATOR_NOT, ret, loc);
    6268                 :            : 
    6269                 :            :   return ret;
    6270                 :            : }
    6271                 :            : 
    6272                 :            : // Lower an interface to value comparison.
    6273                 :            : 
    6274                 :            : Expression*
    6275                 :      67529 : Binary_expression::lower_interface_value_comparison(Gogo*,
    6276                 :            :                                                     Statement_inserter* inserter)
    6277                 :            : {
    6278                 :      67529 :   Type* left_type = this->left_->type();
    6279                 :      67529 :   Type* right_type = this->right_->type();
    6280                 :      67529 :   Interface_type* ift;
    6281                 :      67529 :   if (left_type->interface_type() != NULL)
    6282                 :            :     {
    6283                 :      67377 :       ift = left_type->interface_type();
    6284                 :      67377 :       if (!ift->implements_interface(right_type, NULL))
    6285                 :      64408 :         return this;
    6286                 :            :     }
    6287                 :            :   else
    6288                 :            :     {
    6289                 :        152 :       ift = right_type->interface_type();
    6290                 :        152 :       if (!ift->implements_interface(left_type, NULL))
    6291                 :          1 :         return this;
    6292                 :            :     }
    6293                 :       3120 :   if (!Type::are_compatible_for_comparison(true, left_type, right_type, NULL))
    6294                 :          6 :     return this;
    6295                 :            : 
    6296                 :       3114 :   Location loc = this->location();
    6297                 :            : 
    6298                 :       3114 :   if (left_type->interface_type() == NULL
    6299                 :        148 :       && left_type->points_to() == NULL
    6300                 :         64 :       && !this->left_->is_addressable())
    6301                 :            :     {
    6302                 :          0 :       Temporary_statement* temp =
    6303                 :          0 :           Statement::make_temporary(left_type, NULL, loc);
    6304                 :          0 :       inserter->insert(temp);
    6305                 :          0 :       this->left_ =
    6306                 :          0 :           Expression::make_set_and_use_temporary(temp, this->left_, loc);
    6307                 :            :     }
    6308                 :            : 
    6309                 :       3114 :   if (right_type->interface_type() == NULL
    6310                 :       2966 :       && right_type->points_to() == NULL
    6311                 :       2437 :       && !this->right_->is_addressable())
    6312                 :            :     {
    6313                 :       1753 :       Temporary_statement* temp =
    6314                 :       1753 :           Statement::make_temporary(right_type, NULL, loc);
    6315                 :       1753 :       inserter->insert(temp);
    6316                 :       1753 :       this->right_ =
    6317                 :       1753 :           Expression::make_set_and_use_temporary(temp, this->right_, loc);
    6318                 :            :     }
    6319                 :            : 
    6320                 :       3114 :   return this;
    6321                 :            : }
    6322                 :            : 
    6323                 :            : // Lower a struct or array comparison to a call to memcmp.
    6324                 :            : 
    6325                 :            : Expression*
    6326                 :       8275 : Binary_expression::lower_compare_to_memcmp(Gogo*, Statement_inserter* inserter)
    6327                 :            : {
    6328                 :       8275 :   Location loc = this->location();
    6329                 :            : 
    6330                 :       8275 :   Expression* a1 = this->operand_address(inserter, this->left_);
    6331                 :       8275 :   Expression* a2 = this->operand_address(inserter, this->right_);
    6332                 :       8275 :   Expression* len = Expression::make_type_info(this->left_->type(),
    6333                 :            :                                                TYPE_INFO_SIZE);
    6334                 :            : 
    6335                 :       8275 :   Expression* call = Runtime::make_call(Runtime::MEMCMP, loc, 3, a1, a2, len);
    6336                 :       8275 :   Type* int32_type = Type::lookup_integer_type("int32");
    6337                 :       8275 :   Expression* zero = Expression::make_integer_ul(0, int32_type, loc);
    6338                 :       8275 :   return Expression::make_binary(this->op_, call, zero, loc);
    6339                 :            : }
    6340                 :            : 
    6341                 :            : Expression*
    6342                 :     744301 : Binary_expression::do_flatten(Gogo* gogo, Named_object*,
    6343                 :            :                               Statement_inserter* inserter)
    6344                 :            : {
    6345                 :     744301 :   Location loc = this->location();
    6346                 :     744301 :   if (this->left_->type()->is_error_type()
    6347                 :     744182 :       || this->right_->type()->is_error_type()
    6348                 :     744174 :       || this->left_->is_error_expression()
    6349                 :    1488460 :       || this->right_->is_error_expression())
    6350                 :            :     {
    6351                 :        153 :       go_assert(saw_errors());
    6352                 :        153 :       return Expression::make_error(loc);
    6353                 :            :     }
    6354                 :            : 
    6355                 :     744148 :   Temporary_statement* temp;
    6356                 :            : 
    6357                 :     744148 :   Type* left_type = this->left_->type();
    6358                 :     744148 :   bool is_shift_op = (this->op_ == OPERATOR_LSHIFT
    6359                 :     744148 :                       || this->op_ == OPERATOR_RSHIFT);
    6360                 :     744148 :   bool is_idiv_op = ((this->op_ == OPERATOR_DIV &&
    6361                 :    1482100 :                       left_type->integer_type() != NULL)
    6362                 :     745591 :                      || this->op_ == OPERATOR_MOD);
    6363                 :     744148 :   bool is_string_op = (left_type->is_string_type()
    6364                 :     784564 :                        && this->right_->type()->is_string_type());
    6365                 :            : 
    6366                 :      40416 :   if (is_string_op)
    6367                 :            :     {
    6368                 :            :       // Mark string([]byte) operands to reuse the backing store.
    6369                 :            :       // String comparison does not keep the reference, so it is safe.
    6370                 :      40416 :       Type_conversion_expression* lce =
    6371                 :      40416 :         this->left_->conversion_expression();
    6372                 :        985 :       if (lce != NULL && lce->expr()->type()->is_slice_type())
    6373                 :        976 :         lce->set_no_copy(true);
    6374                 :      40416 :       Type_conversion_expression* rce =
    6375                 :      40416 :         this->right_->conversion_expression();
    6376                 :        394 :       if (rce != NULL && rce->expr()->type()->is_slice_type())
    6377                 :        346 :         rce->set_no_copy(true);
    6378                 :            :     }
    6379                 :            : 
    6380                 :     744148 :   if (is_shift_op
    6381                 :     722023 :       || (is_idiv_op
    6382                 :       9456 :           && (gogo->check_divide_by_zero() || gogo->check_divide_overflow()))
    6383                 :    1456720 :       || is_string_op)
    6384                 :            :     {
    6385                 :      71997 :       if (!this->left_->is_variable() && !this->left_->is_constant())
    6386                 :            :         {
    6387                 :      32793 :           temp = Statement::make_temporary(NULL, this->left_, loc);
    6388                 :      32793 :           inserter->insert(temp);
    6389                 :      32793 :           this->left_ = Expression::make_temporary_reference(temp, loc);
    6390                 :            :         }
    6391                 :      71997 :       if (!this->right_->is_variable() && !this->right_->is_constant())
    6392                 :            :         {
    6393                 :      13963 :           temp =
    6394                 :      13963 :               Statement::make_temporary(NULL, this->right_, loc);
    6395                 :      13963 :           this->right_ = Expression::make_temporary_reference(temp, loc);
    6396                 :      13963 :           inserter->insert(temp);
    6397                 :            :         }
    6398                 :            :     }
    6399                 :     744148 :   return this;
    6400                 :            : }
    6401                 :            : 
    6402                 :            : 
    6403                 :            : // Return the address of EXPR, cast to unsafe.Pointer.
    6404                 :            : 
    6405                 :            : Expression*
    6406                 :      18440 : Binary_expression::operand_address(Statement_inserter* inserter,
    6407                 :            :                                    Expression* expr)
    6408                 :            : {
    6409                 :      18440 :   Location loc = this->location();
    6410                 :            : 
    6411                 :      18440 :   if (!expr->is_addressable())
    6412                 :            :     {
    6413                 :       2135 :       Temporary_statement* temp = Statement::make_temporary(expr->type(), NULL,
    6414                 :            :                                                             loc);
    6415                 :       2135 :       inserter->insert(temp);
    6416                 :       2135 :       expr = Expression::make_set_and_use_temporary(temp, expr, loc);
    6417                 :            :     }
    6418                 :      18440 :   expr = Expression::make_unary(OPERATOR_AND, expr, loc);
    6419                 :      18440 :   static_cast<Unary_expression*>(expr)->set_does_not_escape();
    6420                 :      18440 :   Type* void_type = Type::make_void_type();
    6421                 :      18440 :   Type* unsafe_pointer_type = Type::make_pointer_type(void_type);
    6422                 :      18440 :   return Expression::make_cast(unsafe_pointer_type, expr, loc);
    6423                 :            : }
    6424                 :            : 
    6425                 :            : // Return the numeric constant value, if it has one.
    6426                 :            : 
    6427                 :            : bool
    6428                 :     364872 : Binary_expression::do_numeric_constant_value(Numeric_constant* nc) const
    6429                 :            : {
    6430                 :     729744 :   Numeric_constant left_nc;
    6431                 :     364872 :   if (!this->left_->numeric_constant_value(&left_nc))
    6432                 :            :     return false;
    6433                 :      46030 :   Numeric_constant right_nc;
    6434                 :      23015 :   if (!this->right_->numeric_constant_value(&right_nc))
    6435                 :            :     return false;
    6436                 :        362 :   bool issued_error;
    6437                 :        362 :   return Binary_expression::eval_constant(this->op_, &left_nc, &right_nc,
    6438                 :        362 :                                           this->location(), nc, &issued_error);
    6439                 :            : }
    6440                 :            : 
    6441                 :            : // Return the boolean constant value, if it has one.
    6442                 :            : 
    6443                 :            : bool
    6444                 :     939314 : Binary_expression::do_boolean_constant_value(bool* val) const
    6445                 :            : {
    6446                 :     939314 :   bool is_comparison = false;
    6447                 :     939314 :   switch (this->op_)
    6448                 :            :     {
    6449                 :     575598 :     case OPERATOR_EQEQ:
    6450                 :     575598 :     case OPERATOR_NOTEQ:
    6451                 :     575598 :     case OPERATOR_LT:
    6452                 :     575598 :     case OPERATOR_LE:
    6453                 :     575598 :     case OPERATOR_GT:
    6454                 :     575598 :     case OPERATOR_GE:
    6455                 :     575598 :       is_comparison = true;
    6456                 :     575598 :       break;
    6457                 :            :     case OPERATOR_ANDAND:
    6458                 :            :     case OPERATOR_OROR:
    6459                 :            :       break;
    6460                 :            :     default:
    6461                 :            :       return false;
    6462                 :            :     }
    6463                 :            : 
    6464                 :    1439090 :   Numeric_constant left_nc, right_nc;
    6465                 :     719544 :   if (is_comparison
    6466                 :     575598 :       && this->left_->numeric_constant_value(&left_nc)
    6467                 :     727404 :       && this->right_->numeric_constant_value(&right_nc))
    6468                 :          0 :     return Binary_expression::compare_constant(this->op_, &left_nc,
    6469                 :            :                                                &right_nc,
    6470                 :            :                                                this->location(),
    6471                 :          0 :                                                val);
    6472                 :            : 
    6473                 :    2158630 :   std::string left_str, right_str;
    6474                 :     719544 :   if (is_comparison
    6475                 :     575598 :       && this->left_->string_constant_value(&left_str)
    6476                 :     719572 :       && this->right_->string_constant_value(&right_str))
    6477                 :            :     {
    6478                 :          0 :       *val = Binary_expression::cmp_to_bool(this->op_,
    6479                 :            :                                             left_str.compare(right_str));
    6480                 :          0 :       return true;
    6481                 :            :     }
    6482                 :            : 
    6483                 :     719544 :   bool left_bval;
    6484                 :     719544 :   if (this->left_->boolean_constant_value(&left_bval))
    6485                 :            :     {
    6486                 :       3867 :       if (this->op_ == OPERATOR_ANDAND && !left_bval)
    6487                 :            :         {
    6488                 :       1442 :           *val = false;
    6489                 :       2068 :           return true;
    6490                 :            :         }
    6491                 :       2425 :       else if (this->op_ == OPERATOR_OROR && left_bval)
    6492                 :            :         {
    6493                 :        103 :           *val = true;
    6494                 :        103 :           return true;
    6495                 :            :         }
    6496                 :            : 
    6497                 :       2322 :       bool right_bval;
    6498                 :       2322 :       if (this->right_->boolean_constant_value(&right_bval))
    6499                 :            :         {
    6500                 :        523 :           switch (this->op_)
    6501                 :            :             {
    6502                 :          2 :             case OPERATOR_EQEQ:
    6503                 :          2 :               *val = (left_bval == right_bval);
    6504                 :          2 :               return true;
    6505                 :          0 :             case OPERATOR_NOTEQ:
    6506                 :          0 :               *val = (left_bval != right_bval);
    6507                 :          0 :               return true;
    6508                 :        521 :             case OPERATOR_ANDAND:
    6509                 :        521 :             case OPERATOR_OROR:
    6510                 :        521 :               *val = right_bval;
    6511                 :        521 :               return true;
    6512                 :          0 :             default:
    6513                 :          0 :               go_unreachable();
    6514                 :            :             }
    6515                 :            :         }
    6516                 :            :     }
    6517                 :            : 
    6518                 :            :   return false;
    6519                 :            : }
    6520                 :            : 
    6521                 :            : // Note that the value is being discarded.
    6522                 :            : 
    6523                 :            : bool
    6524                 :          0 : Binary_expression::do_discarding_value()
    6525                 :            : {
    6526                 :          0 :   if (this->op_ == OPERATOR_OROR || this->op_ == OPERATOR_ANDAND)
    6527                 :          0 :     return this->right_->discarding_value();
    6528                 :            :   else
    6529                 :            :     {
    6530                 :          0 :       this->unused_value_error();
    6531                 :          0 :       return false;
    6532                 :            :     }
    6533                 :            : }
    6534                 :            : 
    6535                 :            : // Get type.
    6536                 :            : 
    6537                 :            : Type*
    6538                 :    9548240 : Binary_expression::do_type()
    6539                 :            : {
    6540                 :    9548240 :   if (this->classification() == EXPRESSION_ERROR)
    6541                 :        332 :     return Type::make_error_type();
    6542                 :            : 
    6543                 :    9547900 :   switch (this->op_)
    6544                 :            :     {
    6545                 :    3794580 :     case OPERATOR_EQEQ:
    6546                 :    3794580 :     case OPERATOR_NOTEQ:
    6547                 :    3794580 :     case OPERATOR_LT:
    6548                 :    3794580 :     case OPERATOR_LE:
    6549                 :    3794580 :     case OPERATOR_GT:
    6550                 :    3794580 :     case OPERATOR_GE:
    6551                 :    3794580 :       if (this->type_ == NULL)
    6552                 :     978852 :         this->type_ = Type::make_boolean_type();
    6553                 :    3794580 :       return this->type_;
    6554                 :            : 
    6555                 :    4856990 :     case OPERATOR_PLUS:
    6556                 :    4856990 :     case OPERATOR_MINUS:
    6557                 :    4856990 :     case OPERATOR_OR:
    6558                 :    4856990 :     case OPERATOR_XOR:
    6559                 :    4856990 :     case OPERATOR_MULT:
    6560                 :    4856990 :     case OPERATOR_DIV:
    6561                 :    4856990 :     case OPERATOR_MOD:
    6562                 :    4856990 :     case OPERATOR_AND:
    6563                 :    4856990 :     case OPERATOR_BITCLEAR:
    6564                 :    4856990 :     case OPERATOR_OROR:
    6565                 :    4856990 :     case OPERATOR_ANDAND:
    6566                 :    4856990 :       {
    6567                 :    4856990 :         Type* type;
    6568                 :    4856990 :         if (!Binary_expression::operation_type(this->op_,
    6569                 :    4856990 :                                                this->left_->type(),
    6570                 :    4856990 :                                                this->right_->type(),
    6571                 :            :                                                &type))
    6572                 :         34 :           return Type::make_error_type();
    6573                 :    4856960 :         return type;
    6574                 :            :       }
    6575                 :            : 
    6576                 :     896331 :     case OPERATOR_LSHIFT:
    6577                 :     896331 :     case OPERATOR_RSHIFT:
    6578                 :     896331 :       return this->left_->type();
    6579                 :            : 
    6580                 :          0 :     default:
    6581                 :          0 :       go_unreachable();
    6582                 :            :     }
    6583                 :            : }
    6584                 :            : 
    6585                 :            : // Set type for a binary expression.
    6586                 :            : 
    6587                 :            : void
    6588                 :     594547 : Binary_expression::do_determine_type(const Type_context* context)
    6589                 :            : {
    6590                 :     594547 :   Type* tleft = this->left_->type();
    6591                 :     594547 :   Type* tright = this->right_->type();
    6592                 :            : 
    6593                 :            :   // Both sides should have the same type, except for the shift
    6594                 :            :   // operations.  For a comparison, we should ignore the incoming
    6595                 :            :   // type.
    6596                 :            : 
    6597                 :     594547 :   bool is_shift_op = (this->op_ == OPERATOR_LSHIFT
    6598                 :     594547 :                       || this->op_ == OPERATOR_RSHIFT);
    6599                 :            : 
    6600                 :     594547 :   bool is_comparison = (this->op_ == OPERATOR_EQEQ
    6601                 :            :                         || this->op_ == OPERATOR_NOTEQ
    6602                 :            :                         || this->op_ == OPERATOR_LT
    6603                 :            :                         || this->op_ == OPERATOR_LE
    6604                 :            :                         || this->op_ == OPERATOR_GT
    6605                 :     594547 :                         || this->op_ == OPERATOR_GE);
    6606                 :            : 
    6607                 :            :   // For constant expressions, the context of the result is not useful in
    6608                 :            :   // determining the types of the operands.  It is only legal to use abstract
    6609                 :            :   // boolean, numeric, and string constants as operands where it is legal to
    6610                 :            :   // use non-abstract boolean, numeric, and string constants, respectively.
    6611                 :            :   // Any issues with the operation will be resolved in the check_types pass.
    6612                 :     594547 :   bool is_constant_expr = (this->left_->is_constant()
    6613                 :     594547 :                            && this->right_->is_constant());
    6614                 :            : 
    6615                 :     594547 :   Type_context subcontext(*context);
    6616                 :            : 
    6617                 :     594547 :   if (is_constant_expr && !is_shift_op)
    6618                 :            :     {
    6619                 :        422 :       subcontext.type = NULL;
    6620                 :        422 :       subcontext.may_be_abstract = true;
    6621                 :            :     }
    6622                 :     594125 :   else if (is_comparison)
    6623                 :            :     {
    6624                 :            :       // In a comparison, the context does not determine the types of
    6625                 :            :       // the operands.
    6626                 :     309763 :       subcontext.type = NULL;
    6627                 :            :     }
    6628                 :            : 
    6629                 :            :   // Set the context for the left hand operand.
    6630                 :     594547 :   if (is_shift_op)
    6631                 :            :     {
    6632                 :            :       // The right hand operand of a shift plays no role in
    6633                 :            :       // determining the type of the left hand operand.
    6634                 :            :     }
    6635                 :     570166 :   else if (!tleft->is_abstract())
    6636                 :     508307 :     subcontext.type = tleft;
    6637                 :      61859 :   else if (!tright->is_abstract())
    6638                 :      20701 :     subcontext.type = tright;
    6639                 :      41158 :   else if (subcontext.type == NULL)
    6640                 :            :     {
    6641                 :       1579 :       if ((tleft->integer_type() != NULL && tright->integer_type() != NULL)
    6642                 :       1568 :           || (tleft->float_type() != NULL && tright->float_type() != NULL)
    6643                 :        779 :           || (tleft->complex_type() != NULL && tright->complex_type() != NULL))
    6644                 :            :         {
    6645                 :            :           // Both sides have an abstract integer, abstract float, or
    6646                 :            :           // abstract complex type.  Just let CONTEXT determine
    6647                 :            :           // whether they may remain abstract or not.
    6648                 :            :         }
    6649                 :        742 :       else if (tleft->complex_type() != NULL)
    6650                 :          0 :         subcontext.type = tleft;
    6651                 :        742 :       else if (tright->complex_type() != NULL)
    6652                 :          0 :         subcontext.type = tright;
    6653                 :        742 :       else if (tleft->float_type() != NULL)
    6654                 :         22 :         subcontext.type = tleft;
    6655                 :        720 :       else if (tright->float_type() != NULL)
    6656                 :         20 :         subcontext.type = tright;
    6657                 :            :       else
    6658                 :        700 :         subcontext.type = tleft;
    6659                 :            : 
    6660                 :        779 :       if (subcontext.type != NULL && !context->may_be_abstract)
    6661                 :        589 :         subcontext.type = subcontext.type->make_non_abstract_type();
    6662                 :            :     }
    6663                 :            : 
    6664                 :     594547 :   this->left_->determine_type(&subcontext);
    6665                 :            : 
    6666                 :     594547 :   if (is_shift_op)
    6667                 :            :     {
    6668                 :            :       // We may have inherited an unusable type for the shift operand.
    6669                 :            :       // Give a useful error if that happened.
    6670                 :      24381 :       if (tleft->is_abstract()
    6671                 :       1422 :           && subcontext.type != NULL
    6672                 :       1326 :           && !subcontext.may_be_abstract
    6673                 :       1326 :           && subcontext.type->interface_type() == NULL
    6674                 :      27120 :           && subcontext.type->integer_type() == NULL)
    6675                 :        120 :         this->report_error(("invalid context-determined non-integer type "
    6676                 :            :                             "for left operand of shift"));
    6677                 :            : 
    6678                 :            :       // The context for the right hand operand is the same as for the
    6679                 :            :       // left hand operand, except for a shift operator.
    6680                 :      24381 :       subcontext.type = Type::lookup_integer_type("uint");
    6681                 :      24381 :       subcontext.may_be_abstract = false;
    6682                 :            :     }
    6683                 :            : 
    6684                 :     594547 :   this->right_->determine_type(&subcontext);
    6685                 :            : 
    6686                 :     594547 :   if (is_comparison)
    6687                 :            :     {
    6688                 :     309771 :       if (this->type_ != NULL && !this->type_->is_abstract())
    6689                 :            :         ;
    6690                 :     299266 :       else if (context->type != NULL && context->type->is_boolean_type())
    6691                 :     293000 :         this->type_ = context->type;
    6692                 :       6266 :       else if (!context->may_be_abstract)
    6693                 :       6266 :         this->type_ = Type::lookup_bool_type();
    6694                 :            :     }
    6695                 :     594547 : }
    6696                 :            : 
    6697                 :            : // Report an error if the binary operator OP does not support TYPE.
    6698                 :            : // OTYPE is the type of the other operand.  Return whether the
    6699                 :            : // operation is OK.  This should not be used for shift.
    6700                 :            : 
    6701                 :            : bool
    6702                 :     854914 : Binary_expression::check_operator_type(Operator op, Type* type, Type* otype,
    6703                 :            :                                        Location location)
    6704                 :            : {
    6705                 :     854914 :   switch (op)
    6706                 :            :     {
    6707                 :      62262 :     case OPERATOR_OROR:
    6708                 :      62262 :     case OPERATOR_ANDAND:
    6709                 :      62262 :       if (!type->is_boolean_type()
    6710                 :     124524 :           || !otype->is_boolean_type())
    6711                 :            :         {
    6712                 :          0 :           go_error_at(location, "expected boolean type");
    6713                 :          0 :           return false;
    6714                 :            :         }
    6715                 :            :       break;
    6716                 :            : 
    6717                 :     412137 :     case OPERATOR_EQEQ:
    6718                 :     412137 :     case OPERATOR_NOTEQ:
    6719                 :     412137 :       {
    6720                 :     824259 :         std::string reason;
    6721                 :     412137 :         if (!Type::are_compatible_for_comparison(true, type, otype, &reason))
    6722                 :            :           {
    6723                 :         15 :             go_error_at(location, "%s", reason.c_str());
    6724                 :         30 :             return false;
    6725                 :            :           }
    6726                 :            :       }
    6727                 :            :       break;
    6728                 :            : 
    6729                 :     186240 :     case OPERATOR_LT:
    6730                 :     186240 :     case OPERATOR_LE:
    6731                 :     186240 :     case OPERATOR_GT:
    6732                 :     186240 :     case OPERATOR_GE:
    6733                 :     186240 :       {
    6734                 :     372480 :         std::string reason;
    6735                 :     186240 :         if (!Type::are_compatible_for_comparison(false, type, otype, &reason))
    6736                 :            :           {
    6737                 :          0 :             go_error_at(location, "%s", reason.c_str());
    6738                 :          0 :             return false;
    6739                 :            :           }
    6740                 :            :       }
    6741                 :            :       break;
    6742                 :            : 
    6743                 :     105670 :     case OPERATOR_PLUS:
    6744                 :     105670 :     case OPERATOR_PLUSEQ:
    6745                 :     120103 :       if ((!type->is_numeric_type() && !type->is_string_type())
    6746                 :     225773 :           || (!otype->is_numeric_type() && !otype->is_string_type()))
    6747                 :            :         {
    6748                 :          0 :           go_error_at(location,
    6749                 :            :                    "expected integer, floating, complex, or string type");
    6750                 :          0 :           return false;
    6751                 :            :         }
    6752                 :            :       break;
    6753                 :            : 
    6754                 :      59952 :     case OPERATOR_MINUS:
    6755                 :      59952 :     case OPERATOR_MINUSEQ:
    6756                 :      59952 :     case OPERATOR_MULT:
    6757                 :      59952 :     case OPERATOR_MULTEQ:
    6758                 :      59952 :     case OPERATOR_DIV:
    6759                 :      59952 :     case OPERATOR_DIVEQ:
    6760                 :     119903 :       if (!type->is_numeric_type() || !otype->is_numeric_type())
    6761                 :            :         {
    6762                 :          1 :           go_error_at(location, "expected integer, floating, or complex type");
    6763                 :          1 :           return false;
    6764                 :            :         }
    6765                 :            :       break;
    6766                 :            : 
    6767                 :      28653 :     case OPERATOR_MOD:
    6768                 :      28653 :     case OPERATOR_MODEQ:
    6769                 :      28653 :     case OPERATOR_OR:
    6770                 :      28653 :     case OPERATOR_OREQ:
    6771                 :      28653 :     case OPERATOR_AND:
    6772                 :      28653 :     case OPERATOR_ANDEQ:
    6773                 :      28653 :     case OPERATOR_XOR:
    6774                 :      28653 :     case OPERATOR_XOREQ:
    6775                 :      28653 :     case OPERATOR_BITCLEAR:
    6776                 :      28653 :     case OPERATOR_BITCLEAREQ:
    6777                 :      57304 :       if (type->integer_type() == NULL || otype->integer_type() == NULL)
    6778                 :            :         {
    6779                 :          2 :           go_error_at(location, "expected integer type");
    6780                 :          2 :           return false;
    6781                 :            :         }
    6782                 :            :       break;
    6783                 :            : 
    6784                 :          0 :     default:
    6785                 :          0 :       go_unreachable();
    6786                 :            :     }
    6787                 :            : 
    6788                 :            :   return true;
    6789                 :            : }
    6790                 :            : 
    6791                 :            : // Check types.
    6792                 :            : 
    6793                 :            : void
    6794                 :     563390 : Binary_expression::do_check_types(Gogo*)
    6795                 :            : {
    6796                 :     563390 :   if (this->classification() == EXPRESSION_ERROR)
    6797                 :            :     return;
    6798                 :            : 
    6799                 :     563270 :   Type* left_type = this->left_->type();
    6800                 :     563270 :   Type* right_type = this->right_->type();
    6801                 :    1689740 :   if (left_type->is_error() || right_type->is_error())
    6802                 :            :     {
    6803                 :         76 :       this->set_is_error();
    6804                 :         76 :       return;
    6805                 :            :     }
    6806                 :            : 
    6807                 :     563194 :   if (this->op_ == OPERATOR_EQEQ
    6808                 :            :       || this->op_ == OPERATOR_NOTEQ
    6809                 :            :       || this->op_ == OPERATOR_LT
    6810                 :            :       || this->op_ == OPERATOR_LE
    6811                 :            :       || this->op_ == OPERATOR_GT
    6812                 :     563194 :       || this->op_ == OPERATOR_GE)
    6813                 :            :     {
    6814                 :     299213 :       if (left_type->is_nil_type() && right_type->is_nil_type())
    6815                 :            :         {
    6816                 :          2 :           this->report_error(_("invalid comparison of nil with nil"));
    6817                 :          2 :           return;
    6818                 :            :         }
    6819                 :     299211 :       if (!Type::are_assignable(left_type, right_type, NULL)
    6820                 :     299211 :           && !Type::are_assignable(right_type, left_type, NULL))
    6821                 :            :         {
    6822                 :         15 :           this->report_error(_("incompatible types in binary expression"));
    6823                 :         15 :           return;
    6824                 :            :         }
    6825                 :     299196 :       if (!Binary_expression::check_operator_type(this->op_, left_type,
    6826                 :            :                                                   right_type,
    6827                 :            :                                                   this->location())
    6828                 :     299196 :           || !Binary_expression::check_operator_type(this->op_, right_type,
    6829                 :            :                                                      left_type,
    6830                 :            :                                                      this->location()))
    6831                 :            :         {
    6832                 :         15 :           this->set_is_error();
    6833                 :         15 :           return;
    6834                 :            :         }
    6835                 :            :     }
    6836                 :     263981 :   else if (this->op_ != OPERATOR_LSHIFT && this->op_ != OPERATOR_RSHIFT)
    6837                 :            :     {
    6838                 :     242109 :       if (!Type::are_compatible_for_binop(left_type, right_type))
    6839                 :            :         {
    6840                 :          5 :           this->report_error(_("incompatible types in binary expression"));
    6841                 :          5 :           return;
    6842                 :            :         }
    6843                 :     242104 :       if (!Binary_expression::check_operator_type(this->op_, left_type,
    6844                 :            :                                                   right_type,
    6845                 :            :                                                   this->location()))
    6846                 :            :         {
    6847                 :          3 :           this->set_is_error();
    6848                 :          3 :           return;
    6849                 :            :         }
    6850                 :     242101 :       if (this->op_ == OPERATOR_DIV || this->op_ == OPERATOR_MOD)
    6851                 :            :         {
    6852                 :            :           // Division by a zero integer constant is an error.
    6853                 :      10764 :           Numeric_constant rconst;
    6854                 :      10764 :           unsigned long rval;
    6855                 :      21527 :           if (left_type->integer_type() != NULL
    6856                 :       9329 :               && this->right_->numeric_constant_value(&rconst)
    6857                 :       7553 :               && rconst.to_unsigned_long(&rval) == Numeric_constant::NC_UL_VALID
    6858                 :       7382 :               && rval == 0)
    6859                 :            :             {
    6860                 :          1 :               this->report_error(_("integer division by zero"));
    6861                 :          1 :               return;
    6862                 :            :             }
    6863                 :            :         }
    6864                 :            :     }
    6865                 :            :   else
    6866                 :            :     {
    6867                 :      21872 :       if (left_type->integer_type() == NULL)
    6868                 :         32 :         this->report_error(_("shift of non-integer operand"));
    6869                 :            : 
    6870                 :      21872 :       if (right_type->is_string_type())
    6871                 :          0 :         this->report_error(_("shift count not integer"));
    6872                 :      21872 :       else if (!right_type->is_abstract()
    6873                 :      21872 :                && right_type->integer_type() == NULL)
    6874                 :          0 :         this->report_error(_("shift count not integer"));
    6875                 :            :       else
    6876                 :            :         {
    6877                 :      43744 :           Numeric_constant nc;
    6878                 :      21872 :           if (this->right_->numeric_constant_value(&nc))
    6879                 :            :             {
    6880                 :      17971 :               mpz_t val;
    6881                 :      17971 :               if (!nc.to_int(&val))
    6882                 :          0 :                 this->report_error(_("shift count not integer"));
    6883                 :            :               else
    6884                 :            :                 {
    6885                 :      17971 :                   if (mpz_sgn(val) < 0)
    6886                 :            :                     {
    6887                 :          1 :                       this->report_error(_("negative shift count"));
    6888                 :          1 :                       Location rloc = this->right_->location();
    6889                 :          1 :                       this->right_ = Expression::make_integer_ul(0, right_type,
    6890                 :            :                                                                  rloc);
    6891                 :            :                     }
    6892                 :      17971 :                   mpz_clear(val);
    6893                 :            :                 }
    6894                 :            :             }
    6895                 :            :         }
    6896                 :            :     }
    6897                 :            : }
    6898                 :            : 
    6899                 :            : // Get the backend representation for a binary expression.
    6900                 :            : 
    6901                 :            : Bexpression*
    6902                 :    1755490 : Binary_expression::do_get_backend(Translate_context* context)
    6903                 :            : {
    6904                 :    1755490 :   Gogo* gogo = context->gogo();
    6905                 :    1755490 :   Location loc = this->location();
    6906                 :    1755490 :   Type* left_type = this->left_->type();
    6907                 :    1755490 :   Type* right_type = this->right_->type();
    6908                 :            : 
    6909                 :    1755490 :   bool use_left_type = true;
    6910                 :    1755490 :   bool is_shift_op = false;
    6911                 :    1755490 :   bool is_idiv_op = false;
    6912                 :    1755490 :   switch (this->op_)
    6913                 :            :     {
    6914                 :    1111910 :     case OPERATOR_EQEQ:
    6915                 :    1111910 :     case OPERATOR_NOTEQ:
    6916                 :    1111910 :     case OPERATOR_LT:
    6917                 :    1111910 :     case OPERATOR_LE:
    6918                 :    1111910 :     case OPERATOR_GT:
    6919                 :    1111910 :     case OPERATOR_GE:
    6920                 :    1111910 :       return Expression::comparison(context, this->type_, this->op_,
    6921                 :    1111910 :                                     this->left_, this->right_, loc);
    6922                 :            : 
    6923                 :     201522 :     case OPERATOR_OROR:
    6924                 :     201522 :     case OPERATOR_ANDAND:
    6925                 :     201522 :       use_left_type = false;
    6926                 :     201522 :       break;
    6927                 :            :     case OPERATOR_PLUS:
    6928                 :            :     case OPERATOR_MINUS:
    6929                 :            :     case OPERATOR_OR:
    6930                 :            :     case OPERATOR_XOR:
    6931                 :            :     case OPERATOR_MULT:
    6932                 :            :       break;
    6933                 :       7449 :     case OPERATOR_DIV:
    6934                 :     657078 :       if (left_type->float_type() != NULL || left_type->complex_type() != NULL)
    6935                 :            :         break;
    6936                 :            :       // Fall through.
    6937                 :            :     case OPERATOR_MOD:
    6938                 :            :       is_idiv_op = true;
    6939                 :            :       break;
    6940                 :     124156 :     case OPERATOR_LSHIFT:
    6941                 :     124156 :     case OPERATOR_RSHIFT:
    6942                 :     124156 :       is_shift_op = true;
    6943                 :     124156 :       break;
    6944                 :       1209 :     case OPERATOR_BITCLEAR:
    6945                 :       1209 :       this->right_ = Expression::make_unary(OPERATOR_XOR, this->right_, loc);
    6946                 :            :     case OPERATOR_AND:
    6947                 :            :       break;
    6948                 :          0 :     default:
    6949                 :          0 :       go_unreachable();
    6950                 :            :     }
    6951                 :            : 
    6952                 :            :   // The only binary operation for string is +, and that should have
    6953                 :            :   // been converted to a String_concat_expression in do_lower.
    6954                 :     643586 :   go_assert(!left_type->is_string_type());
    6955                 :            : 
    6956                 :            :   // For complex division Go might want slightly different results than the
    6957                 :            :   // backend implementation provides, so we have our own runtime routine.
    6958                 :     643586 :   if (this->op_ == OPERATOR_DIV && this->left_->type()->complex_type() != NULL)
    6959                 :            :     {
    6960                 :         29 :       Runtime::Function complex_code;
    6961                 :         58 :       switch (this->left_->type()->complex_type()->bits())
    6962                 :            :         {
    6963                 :            :         case 64:
    6964                 :            :           complex_code = Runtime::COMPLEX64_DIV;
    6965                 :            :           break;
    6966                 :         26 :         case 128:
    6967                 :         26 :           complex_code = Runtime::COMPLEX128_DIV;
    6968                 :         26 :           break;
    6969                 :          0 :         default:
    6970                 :          0 :           go_unreachable();
    6971                 :            :         }
    6972                 :         29 :       Expression* complex_div =
    6973                 :         29 :           Runtime::make_call(complex_code, loc, 2, this->left_, this->right_);
    6974                 :         29 :       return complex_div->get_backend(context);
    6975                 :            :     }
    6976                 :            : 
    6977                 :     643557 :   Bexpression* left = this->left_->get_backend(context);
    6978                 :     643557 :   Bexpression* right = this->right_->get_backend(context);
    6979                 :            : 
    6980                 :     643557 :   Type* type = use_left_type ? left_type : right_type;
    6981                 :     643557 :   Btype* btype = type->get_backend(gogo);
    6982                 :            : 
    6983                 :     643557 :   Bexpression* ret =
    6984                 :     643557 :       gogo->backend()->binary_expression(this->op_, left, right, loc);
    6985                 :     643557 :   ret = gogo->backend()->convert_expression(btype, ret, loc);
    6986                 :            : 
    6987                 :            :   // Initialize overflow constants.
    6988                 :     643557 :   Bexpression* overflow;
    6989                 :     643557 :   mpz_t zero;
    6990                 :     643557 :   mpz_init_set_ui(zero, 0UL);
    6991                 :     643557 :   mpz_t one;
    6992                 :     643557 :   mpz_init_set_ui(one, 1UL);
    6993                 :     643557 :   mpz_t neg_one;
    6994                 :     643557 :   mpz_init_set_si(neg_one, -1);
    6995                 :            : 
    6996                 :     643557 :   Btype* left_btype = left_type->get_backend(gogo);
    6997                 :     643557 :   Btype* right_btype = right_type->get_backend(gogo);
    6998                 :            : 
    6999                 :            :   // In Go, a shift larger than the size of the type is well-defined.
    7000                 :            :   // This is not true in C, so we need to insert a conditional.
    7001                 :            :   // We also need to check for a negative shift count.
    7002                 :     643557 :   if (is_shift_op)
    7003                 :            :     {
    7004                 :     124156 :       go_assert(left_type->integer_type() != NULL);
    7005                 :     124156 :       go_assert(right_type->integer_type() != NULL);
    7006                 :            : 
    7007                 :     248312 :       int bits = left_type->integer_type()->bits();
    7008                 :            : 
    7009                 :     248312 :       Numeric_constant nc;
    7010                 :     124156 :       unsigned long ul;
    7011                 :     124156 :       if (!this->right_->numeric_constant_value(&nc)
    7012                 :     120403 :           || nc.to_unsigned_long(&ul) != Numeric_constant::NC_UL_VALID
    7013                 :     244559 :           || ul >= static_cast<unsigned long>(bits))
    7014                 :            :         {
    7015                 :       3814 :           mpz_t bitsval;
    7016                 :       3814 :           mpz_init_set_ui(bitsval, bits);
    7017                 :       3814 :           Bexpression* bits_expr =
    7018                 :       3814 :             gogo->backend()->integer_constant_expression(right_btype, bitsval);
    7019                 :       3814 :           Bexpression* compare =
    7020                 :       3814 :             gogo->backend()->binary_expression(OPERATOR_LT,
    7021                 :       3814 :                                                right, bits_expr, loc);
    7022                 :            : 
    7023                 :       3814 :           Bexpression* zero_expr =
    7024                 :       3814 :             gogo->backend()->integer_constant_expression(left_btype, zero);
    7025                 :       3814 :           overflow = zero_expr;
    7026                 :       3814 :           Bfunction* bfn = context->function()->func_value()->get_decl();
    7027                 :       3814 :           if (this->op_ == OPERATOR_RSHIFT
    7028                 :       5038 :               && !left_type->integer_type()->is_unsigned())
    7029                 :            :             {
    7030                 :        220 :               Bexpression* neg_expr =
    7031                 :        220 :                 gogo->backend()->binary_expression(OPERATOR_LT, left,
    7032                 :        220 :                                                    zero_expr, loc);
    7033                 :        220 :               Bexpression* neg_one_expr =
    7034                 :        220 :                 gogo->backend()->integer_constant_expression(left_btype,
    7035                 :        220 :                                                              neg_one);
    7036                 :        220 :               overflow = gogo->backend()->conditional_expression(bfn,
    7037                 :            :                                                                  btype,
    7038                 :            :                                                                  neg_expr,
    7039                 :            :                                                                  neg_one_expr,
    7040                 :            :                                                                  zero_expr,
    7041                 :        220 :                                                                  loc);
    7042                 :            :             }
    7043                 :       3814 :           ret = gogo->backend()->conditional_expression(bfn, btype, compare,
    7044                 :       3814 :                                                         ret, overflow, loc);
    7045                 :       3814 :           mpz_clear(bitsval);
    7046                 :            :         }
    7047                 :            : 
    7048                 :     248312 :       if (!right_type->integer_type()->is_unsigned()
    7049                 :     124156 :           && (!this->right_->numeric_constant_value(&nc)
    7050                 :          0 :               || nc.to_unsigned_long(&ul) != Numeric_constant::NC_UL_VALID))
    7051                 :            :         {
    7052                 :         22 :           Bexpression* zero_expr =
    7053                 :         22 :             gogo->backend()->integer_constant_expression(right_btype, zero);
    7054                 :         22 :           Bexpression* compare =
    7055                 :         22 :             gogo->backend()->binary_expression(OPERATOR_LT, right, zero_expr,
    7056                 :         22 :                                                loc);
    7057                 :         22 :           Expression* crash = Runtime::make_call(Runtime::PANIC_SHIFT,
    7058                 :            :                                                  loc, 0);
    7059                 :         22 :           Bexpression* bcrash = crash->get_backend(context);
    7060                 :         22 :           Bfunction* bfn = context->function()->func_value()->get_decl();
    7061                 :         22 :           ret = gogo->backend()->conditional_expression(bfn, btype, compare,
    7062                 :         22 :                                                         bcrash, ret, loc);
    7063                 :            :         }
    7064                 :            :     }
    7065                 :            : 
    7066                 :            :   // Add checks for division by zero and division overflow as needed.
    7067                 :     643557 :   if (is_idiv_op)
    7068                 :            :     {
    7069                 :       9201 :       if (gogo->check_divide_by_zero())
    7070                 :            :         {
    7071                 :            :           // right == 0
    7072                 :       9201 :           Bexpression* zero_expr =
    7073                 :       9201 :               gogo->backend()->integer_constant_expression(right_btype, zero);
    7074                 :       9201 :           Bexpression* check =
    7075                 :       9201 :               gogo->backend()->binary_expression(OPERATOR_EQEQ,
    7076                 :       9201 :                                                  right, zero_expr, loc);
    7077                 :            : 
    7078                 :       9201 :           Expression* crash = Runtime::make_call(Runtime::PANIC_DIVIDE,
    7079                 :            :                                                  loc, 0);
    7080                 :       9201 :           Bexpression* bcrash = crash->get_backend(context);
    7081                 :            : 
    7082                 :            :           // right == 0 ? (panicdivide(), 0) : ret
    7083                 :       9201 :           Bfunction* bfn = context->function()->func_value()->get_decl();
    7084                 :       9201 :           ret = gogo->backend()->conditional_expression(bfn, btype,
    7085                 :            :                                                         check, bcrash,
    7086                 :       9201 :                                                         ret, loc);
    7087                 :            :         }
    7088                 :            : 
    7089                 :       9201 :       if (gogo->check_divide_overflow())
    7090                 :            :         {
    7091                 :            :           // right == -1
    7092                 :            :           // FIXME: It would be nice to say that this test is expected
    7093                 :            :           // to return false.
    7094                 :            : 
    7095                 :       9201 :           Bexpression* neg_one_expr =
    7096                 :       9201 :               gogo->backend()->integer_constant_expression(right_btype, neg_one);
    7097                 :       9201 :           Bexpression* check =
    7098                 :       9201 :               gogo->backend()->binary_expression(OPERATOR_EQEQ,
    7099                 :       9201 :                                                  right, neg_one_expr, loc);
    7100                 :            : 
    7101                 :       9201 :           Bexpression* zero_expr =
    7102                 :       9201 :               gogo->backend()->integer_constant_expression(btype, zero);
    7103                 :       9201 :           Bexpression* one_expr =
    7104                 :       9201 :               gogo->backend()->integer_constant_expression(btype, one);
    7105                 :       9201 :           Bfunction* bfn = context->function()->func_value()->get_decl();
    7106                 :            : 
    7107                 :      18402 :           if (type->integer_type()->is_unsigned())
    7108                 :            :             {
    7109                 :            :               // An unsigned -1 is the largest possible number, so
    7110                 :            :               // dividing is always 1 or 0.
    7111                 :            : 
    7112                 :       4284 :               Bexpression* cmp =
    7113                 :       4284 :                   gogo->backend()->binary_expression(OPERATOR_EQEQ,
    7114                 :       4284 :                                                      left, right, loc);
    7115                 :       4284 :               if (this->op_ == OPERATOR_DIV)
    7116                 :       2649 :                 overflow =
    7117                 :       2649 :                     gogo->backend()->conditional_expression(bfn, btype, cmp,
    7118                 :            :                                                             one_expr, zero_expr,
    7119                 :       2649 :                                                             loc);
    7120                 :            :               else
    7121                 :       1635 :                 overflow =
    7122                 :       1635 :                     gogo->backend()->conditional_expression(bfn, btype, cmp,
    7123                 :            :                                                             zero_expr, left,
    7124                 :       1635 :                                                             loc);
    7125                 :            :             }
    7126                 :            :           else
    7127                 :            :             {
    7128                 :            :               // Computing left / -1 is the same as computing - left,
    7129                 :            :               // which does not overflow since Go sets -fwrapv.
    7130                 :       4917 :               if (this->op_ == OPERATOR_DIV)
    7131                 :            :                 {
    7132                 :       3365 :                   Expression* negate_expr =
    7133                 :       3365 :                       Expression::make_unary(OPERATOR_MINUS, this->left_, loc);
    7134                 :       3365 :                   overflow = negate_expr->get_backend(context);
    7135                 :            :                 }
    7136                 :            :               else
    7137                 :            :                 overflow = zero_expr;
    7138                 :            :             }
    7139                 :       9201 :           overflow = gogo->backend()->convert_expression(btype, overflow, loc);
    7140                 :            : 
    7141                 :            :           // right == -1 ? - left : ret
    7142                 :       9201 :           ret = gogo->backend()->conditional_expression(bfn, btype,
    7143                 :            :                                                         check, overflow,
    7144                 :       9201 :                                                         ret, loc);
    7145                 :            :         }
    7146                 :            :     }
    7147                 :            : 
    7148                 :     643557 :   mpz_clear(zero);
    7149                 :     643557 :   mpz_clear(one);
    7150                 :     643557 :   mpz_clear(neg_one);
    7151                 :     643557 :   return ret;
    7152                 :            : }
    7153                 :            : 
    7154                 :            : // Export a binary expression.
    7155                 :            : 
    7156                 :            : void
    7157                 :      14111 : Binary_expression::do_export(Export_function_body* efb) const
    7158                 :            : {
    7159                 :      14111 :   efb->write_c_string("(");
    7160                 :      14111 :   this->left_->export_expression(efb);
    7161                 :      14111 :   switch (this->op_)
    7162                 :            :     {
    7163                 :        465 :     case OPERATOR_OROR:
    7164                 :        465 :       efb->write_c_string(" || ");
    7165                 :        465 :       break;
    7166                 :       1066 :     case OPERATOR_ANDAND:
    7167                 :       1066 :       efb->write_c_string(" && ");
    7168                 :       1066 :       break;
    7169                 :       2183 :     case OPERATOR_EQEQ:
    7170                 :       2183 :       efb->write_c_string(" == ");
    7171                 :       2183 :       break;
    7172                 :        692 :     case OPERATOR_NOTEQ:
    7173                 :        692 :       efb->write_c_string(" != ");
    7174                 :        692 :       break;
    7175                 :       1348 :     case OPERATOR_LT:
    7176                 :       1348 :       efb->write_c_string(" < ");
    7177                 :       1348 :       break;
    7178                 :        708 :     case OPERATOR_LE:
    7179                 :        708 :       efb->write_c_string(" <= ");
    7180                 :        708 :       break;
    7181                 :        308 :     case OPERATOR_GT:
    7182                 :        308 :       efb->write_c_string(" > ");
    7183                 :        308 :       break;
    7184                 :        863 :     case OPERATOR_GE:
    7185                 :        863 :       efb->write_c_string(" >= ");
    7186                 :        863 :       break;
    7187                 :       1556 :     case OPERATOR_PLUS:
    7188                 :       1556 :       efb->write_c_string(" + ");
    7189                 :       1556 :       break;
    7190                 :       1004 :     case OPERATOR_MINUS:
    7191                 :       1004 :       efb->write_c_string(" - ");
    7192                 :       1004 :       break;
    7193                 :        392 :     case OPERATOR_OR:
    7194                 :        392 :       efb->write_c_string(" | ");
    7195                 :        392 :       break;
    7196                 :        145 :     case OPERATOR_XOR:
    7197                 :        145 :       efb->write_c_string(" ^ ");
    7198                 :        145 :       break;
    7199                 :        517 :     case OPERATOR_MULT:
    7200                 :        517 :       efb->write_c_string(" * ");
    7201                 :        517 :       break;
    7202                 :        355 :     case OPERATOR_DIV:
    7203                 :        355 :       efb->write_c_string(" / ");
    7204                 :        355 :       break;
    7205                 :        135 :     case OPERATOR_MOD:
    7206                 :        135 :       efb->write_c_string(" % ");
    7207                 :        135 :       break;
    7208                 :        340 :     case OPERATOR_LSHIFT:
    7209                 :        340 :       efb->write_c_string(" << ");
    7210                 :        340 :       break;
    7211                 :       1042 :     case OPERATOR_RSHIFT:
    7212                 :       1042 :       efb->write_c_string(" >> ");
    7213                 :       1042 :       break;
    7214                 :        931 :     case OPERATOR_AND:
    7215                 :        931 :       efb->write_c_string(" & ");
    7216                 :        931 :       break;
    7217                 :         61 :     case OPERATOR_BITCLEAR:
    7218                 :         61 :       efb->write_c_string(" &^ ");
    7219                 :         61 :       break;
    7220                 :          0 :     default:
    7221                 :          0 :       go_unreachable();
    7222                 :            :     }
    7223                 :      14111 :   this->right_->export_expression(efb);
    7224                 :      14111 :   efb->write_c_string(")");
    7225                 :      14111 : }
    7226                 :            : 
    7227                 :            : // Import a binary expression.
    7228                 :            : 
    7229                 :            : Expression*
    7230                 :      17524 : Binary_expression::do_import(Import_expression* imp, Location loc)
    7231                 :            : {
    7232                 :      17524 :   imp->require_c_string("(");
    7233                 :            : 
    7234                 :      17524 :   Expression* left = Expression::import_expression(imp, loc);
    7235                 :            : 
    7236                 :      17524 :   Operator op;
    7237                 :      17524 :   if (imp->match_c_string(" || "))
    7238                 :            :     {
    7239                 :        625 :       op = OPERATOR_OROR;
    7240                 :        625 :       imp->advance(4);
    7241                 :            :     }
    7242                 :      16899 :   else if (imp->match_c_string(" && "))
    7243                 :            :     {
    7244                 :       1563 :       op = OPERATOR_ANDAND;
    7245                 :       1563 :       imp->advance(4);
    7246                 :            :     }
    7247                 :      15336 :   else if (imp->match_c_string(" == "))
    7248                 :            :     {
    7249                 :       3009 :       op = OPERATOR_EQEQ;
    7250                 :       3009 :       imp->advance(4);
    7251                 :            :     }
    7252                 :      12327 :   else if (imp->match_c_string(" != "))
    7253                 :            :     {
    7254                 :        681 :       op = OPERATOR_NOTEQ;
    7255                 :        681 :       imp->advance(4);
    7256                 :            :     }
    7257                 :      11646 :   else if (imp->match_c_string(" < "))
    7258                 :            :     {
    7259                 :        958 :       op = OPERATOR_LT;
    7260                 :        958 :       imp->advance(3);
    7261                 :            :     }
    7262                 :      10688 :   else if (imp->match_c_string(" <= "))
    7263                 :            :     {
    7264                 :        870 :       op = OPERATOR_LE;
    7265                 :        870 :       imp->advance(4);
    7266                 :            :     }
    7267                 :       9818 :   else if (imp->match_c_string(" > "))
    7268                 :            :     {
    7269                 :        191 :       op = OPERATOR_GT;
    7270                 :        191 :       imp->advance(3);
    7271                 :            :     }
    7272                 :       9627 :   else if (imp->match_c_string(" >= "))
    7273                 :            :     {
    7274                 :       1919 :       op = OPERATOR_GE;
    7275                 :       1919 :       imp->advance(4);
    7276                 :            :     }
    7277                 :       7708 :   else if (imp->match_c_string(" + "))
    7278                 :            :     {
    7279                 :       1096 :       op = OPERATOR_PLUS;
    7280                 :       1096 :       imp->advance(3);
    7281                 :            :     }
    7282                 :       6612 :   else if (imp->match_c_string(" - "))
    7283                 :            :     {
    7284                 :       1287 :       op = OPERATOR_MINUS;
    7285                 :       1287 :       imp->advance(3);
    7286                 :            :     }
    7287                 :       5325 :   else if (imp->match_c_string(" | "))
    7288                 :            :     {
    7289                 :        216 :       op = OPERATOR_OR;
    7290                 :        216 :       imp->advance(3);
    7291                 :            :     }
    7292                 :       5109 :   else if (imp->match_c_string(" ^ "))
    7293                 :            :     {
    7294                 :         88 :       op = OPERATOR_XOR;
    7295                 :         88 :       imp->advance(3);
    7296                 :            :     }
    7297                 :       5021 :   else if (imp->match_c_string(" * "))
    7298                 :            :     {
    7299                 :        334 :       op = OPERATOR_MULT;
    7300                 :        334 :       imp->advance(3);
    7301                 :            :     }
    7302                 :       4687 :   else if (imp->match_c_string(" / "))
    7303                 :            :     {
    7304                 :        197 :       op = OPERATOR_DIV;
    7305                 :        197 :       imp->advance(3);
    7306                 :            :     }
    7307                 :       4490 :   else if (imp->match_c_string(" % "))
    7308                 :            :     {
    7309                 :         31 :       op = OPERATOR_MOD;
    7310                 :         31 :       imp->advance(3);
    7311                 :            :     }
    7312                 :       4459 :   else if (imp->match_c_string(" << "))
    7313                 :            :     {
    7314                 :        113 :       op = OPERATOR_LSHIFT;
    7315                 :        113 :       imp->advance(4);
    7316                 :            :     }
    7317                 :       4346 :   else if (imp->match_c_string(" >> "))
    7318                 :            :     {
    7319                 :        564 :       op = OPERATOR_RSHIFT;
    7320                 :        564 :       imp->advance(4);
    7321                 :            :     }
    7322                 :       3782 :   else if (imp->match_c_string(" & "))
    7323                 :            :     {
    7324                 :        643 :       op = OPERATOR_AND;
    7325                 :        643 :       imp->advance(3);
    7326                 :            :     }
    7327                 :       3139 :   else if (imp->match_c_string(" &^ "))
    7328                 :            :     {
    7329                 :         31 :       op = OPERATOR_BITCLEAR;
    7330                 :         31 :       imp->advance(4);
    7331                 :            :     }
    7332                 :       3108 :   else if (imp->match_c_string(")"))
    7333                 :            :     {
    7334                 :            :       // Not a binary operator after all.
    7335                 :       3108 :       imp->advance(1);
    7336                 :       3108 :       return left;
    7337                 :            :     }
    7338                 :            :   else
    7339                 :            :     {
    7340                 :          0 :       go_error_at(imp->location(), "unrecognized binary operator");
    7341                 :          0 :       return Expression::make_error(loc);
    7342                 :            :     }
    7343                 :            : 
    7344                 :      14416 :   Expression* right = Expression::import_expression(imp, loc);
    7345                 :            : 
    7346                 :      14416 :   imp->require_c_string(")");
    7347                 :            : 
    7348                 :      14416 :   return Expression::make_binary(op, left, right, loc);
    7349                 :            : }
    7350                 :            : 
    7351                 :            : // Dump ast representation of a binary expression.
    7352                 :            : 
    7353                 :            : void
    7354                 :          0 : Binary_expression::do_dump_expression(Ast_dump_context* ast_dump_context) const
    7355                 :            : {
    7356                 :          0 :   ast_dump_context->ostream() << "(";
    7357                 :          0 :   ast_dump_context->dump_expression(this->left_);
    7358                 :          0 :   ast_dump_context->ostream() << " ";
    7359                 :          0 :   ast_dump_context->dump_operator(this->op_);
    7360                 :          0 :   ast_dump_context->ostream() << " ";
    7361                 :          0 :   ast_dump_context->dump_expression(this->right_);
    7362                 :          0 :   ast_dump_context->ostream() << ") ";
    7363                 :          0 : }
    7364                 :            : 
    7365                 :            : // Make a binary expression.
    7366                 :            : 
    7367                 :            : Expression*
    7368                 :    1996680 : Expression::make_binary(Operator op, Expression* left, Expression* right,
    7369                 :            :                         Location location)
    7370                 :            : {
    7371                 :    1996680 :   return new Binary_expression(op, left, right, location);
    7372                 :            : }
    7373                 :            : 
    7374                 :            : // Implement a comparison.
    7375                 :            : 
    7376                 :            : Bexpression*
    7377                 :    1111910 : Expression::comparison(Translate_context* context, Type* result_type,
    7378                 :            :                        Operator op, Expression* left, Expression* right,
    7379                 :            :                        Location location)
    7380                 :            : {
    7381                 :    1111910 :   Type* left_type = left->type();
    7382                 :    1111910 :   Type* right_type = right->type();
    7383                 :            : 
    7384                 :    1111910 :   Expression* zexpr = Expression::make_integer_ul(0, NULL, location);
    7385                 :            : 
    7386                 :    1111910 :   if (left_type->is_string_type() && right_type->is_string_type())
    7387                 :            :     {
    7388                 :      38968 :       go_assert(left->is_variable() || left->is_constant());
    7389                 :      38968 :       go_assert(right->is_variable() || right->is_constant());
    7390                 :            : 
    7391                 :      38968 :       if (op == OPERATOR_EQEQ || op == OPERATOR_NOTEQ)
    7392                 :            :         {
    7393                 :            :           // (l.len == r.len
    7394                 :            :           //  ? (l.ptr == r.ptr ? true : memcmp(l.ptr, r.ptr, r.len) == 0)
    7395                 :            :           //  : false)
    7396                 :      38637 :           Expression* llen = Expression::make_string_info(left,
    7397                 :            :                                                           STRING_INFO_LENGTH,
    7398                 :            :                                                           location);
    7399                 :      38637 :           Expression* rlen = Expression::make_string_info(right,
    7400                 :            :                                                           STRING_INFO_LENGTH,
    7401                 :            :                                                           location);
    7402                 :      38637 :           Expression* leneq = Expression::make_binary(OPERATOR_EQEQ, llen, rlen,
    7403                 :            :                                                       location);
    7404                 :      38637 :           Expression* lptr = Expression::make_string_info(left->copy(),
    7405                 :            :                                                           STRING_INFO_DATA,
    7406                 :            :                                                           location);
    7407                 :      38637 :           Expression* rptr = Expression::make_string_info(right->copy(),
    7408                 :            :                                                           STRING_INFO_DATA,
    7409                 :            :                                                           location);
    7410                 :      38637 :           Expression* ptreq = Expression::make_binary(OPERATOR_EQEQ, lptr, rptr,
    7411                 :            :                                                       location);
    7412                 :      38637 :           Expression* btrue = Expression::make_boolean(true, location);
    7413                 :      38637 :           Expression* call = Runtime::make_call(Runtime::MEMCMP, location, 3,
    7414                 :            :                                                 lptr->copy(), rptr->copy(),
    7415                 :            :                                                 rlen->copy());
    7416                 :      38637 :           Type* int32_type = Type::lookup_integer_type("int32");
    7417                 :      38637 :           Expression* zero = Expression::make_integer_ul(0, int32_type, location);
    7418                 :      38637 :           Expression* cmp = Expression::make_binary(OPERATOR_EQEQ, call, zero,
    7419                 :            :                                                     location);
    7420                 :      38637 :           Expression* cond = Expression::make_conditional(ptreq, btrue, cmp,
    7421                 :            :                                                           location);
    7422                 :      38637 :           Expression* bfalse = Expression::make_boolean(false, location);
    7423                 :      38637 :           left = Expression::make_conditional(leneq, cond, bfalse, location);
    7424                 :      38637 :           right = Expression::make_boolean(true, location);
    7425                 :            :         }
    7426                 :            :       else
    7427                 :            :         {
    7428                 :        331 :           left = Runtime::make_call(Runtime::CMPSTRING, location, 2,
    7429                 :            :                                     left, right);
    7430                 :        331 :           right = zexpr;
    7431                 :            :         }
    7432                 :            :     }
    7433                 :    1072940 :   else if ((left_type->interface_type() != NULL
    7434                 :      51345 :             && right_type->interface_type() == NULL
    7435                 :      44643 :             && !right_type->is_nil_type())
    7436                 :    1071900 :            || (left_type->interface_type() == NULL
    7437                 :    1021590 :                && !left_type->is_nil_type()
    7438                 :    1021590 :                && right_type->interface_type() != NULL))
    7439                 :            :     {
    7440                 :            :       // Comparing an interface value to a non-interface value.
    7441                 :       1117 :       if (left_type->interface_type() == NULL)
    7442                 :            :         {
    7443                 :         82 :           std::swap(left_type, right_type);
    7444                 :         82 :           std::swap(left, right);
    7445                 :            :         }
    7446                 :            : 
    7447                 :            :       // The right operand is not an interface.  We need to take its
    7448                 :            :       // address if it is not a direct interface type.
    7449                 :       1117 :       Expression* pointer_arg = NULL;
    7450                 :       1117 :       if (right_type->is_direct_iface_type())
    7451                 :        346 :         pointer_arg = Expression::unpack_direct_iface(right, location);
    7452                 :            :       else
    7453                 :            :         {
    7454                 :        771 :           go_assert(right->is_addressable());
    7455                 :        771 :           pointer_arg = Expression::make_unary(OPERATOR_AND, right,
    7456                 :            :                                                location);
    7457                 :            :         }
    7458                 :            : 
    7459                 :       1117 :       Expression* descriptor =
    7460                 :       1117 :           Expression::make_type_descriptor(right_type, location);
    7461                 :       2234 :       left =
    7462                 :       3012 :           Runtime::make_call((left_type->interface_type()->is_empty()
    7463                 :            :                               ? Runtime::EFACEVALEQ
    7464                 :            :                               : Runtime::IFACEVALEQ),
    7465                 :            :                              location, 3, left, descriptor,
    7466                 :            :                              pointer_arg);
    7467                 :       1117 :       go_assert(op == OPERATOR_EQEQ || op == OPERATOR_NOTEQ);
    7468                 :       1117 :       right = Expression::make_boolean(true, location);
    7469                 :            :     }
    7470                 :    1071820 :   else if (left_type->interface_type() != NULL
    7471                 :      50310 :            && right_type->interface_type() != NULL)
    7472                 :            :     {
    7473                 :       6702 :       Runtime::Function compare_function;
    7474                 :      13404 :       if (left_type->interface_type()->is_empty()
    7475                 :       7422 :           && right_type->interface_type()->is_empty())
    7476                 :            :         compare_function = Runtime::EFACEEQ;
    7477                 :      12034 :       else if (!left_type->interface_type()->is_empty()
    7478                 :      11999 :                && !right_type->interface_type()->is_empty())
    7479                 :            :         compare_function = Runtime::IFACEEQ;
    7480                 :            :       else
    7481                 :            :         {
    7482                 :         74 :           if (left_type->interface_type()->is_empty())
    7483                 :            :             {
    7484                 :         35 :               std::swap(left_type, right_type);
    7485                 :         35 :               std::swap(left, right);
    7486                 :            :             }
    7487                 :         74 :           go_assert(!left_type->interface_type()->is_empty());
    7488                 :         74 :           go_assert(right_type->interface_type()->is_empty());
    7489                 :            :           compare_function = Runtime::IFACEEFACEEQ;
    7490                 :            :         }
    7491                 :            : 
    7492                 :       6702 :       left = Runtime::make_call(compare_function, location, 2, left, right);
    7493                 :       6702 :       go_assert(op == OPERATOR_EQEQ || op == OPERATOR_NOTEQ);
    7494                 :       6702 :       right = Expression::make_boolean(true, location);
    7495                 :            :     }
    7496                 :            : 
    7497                 :    1111910 :   if (left_type->is_nil_type()
    7498                 :    1111910 :       && (op == OPERATOR_EQEQ || op == OPERATOR_NOTEQ))
    7499                 :            :     {
    7500                 :    1111910 :       std::swap(left_type, right_type);
    7501                 :    1111910 :       std::swap(left, right);
    7502                 :            :     }
    7503                 :            : 
    7504                 :    1111910 :   if (right_type->is_nil_type())
    7505                 :            :     {
    7506                 :     105380 :       right = Expression::make_nil(location);
    7507                 :     105380 :       if (left_type->array_type() != NULL
    7508                 :       5770 :           && left_type->array_type()->length() == NULL)
    7509                 :            :         {
    7510                 :       2885 :           Array_type* at = left_type->array_type();
    7511                 :       2885 :           bool is_lvalue = false;
    7512                 :       2885 :           left = at->get_value_pointer(context->gogo(), left, is_lvalue);
    7513                 :            :         }
    7514                 :     102495 :       else if (left_type->interface_type() != NULL)
    7515                 :            :         {
    7516                 :            :           // An interface is nil if the first field is nil.
    7517                 :      43608 :           left = Expression::make_field_reference(left, 0, location);
    7518                 :            :         }
    7519                 :            :     }
    7520                 :            : 
    7521                 :    1111910 :   Bexpression* left_bexpr = left->get_backend(context);
    7522                 :    1111910 :   Bexpression* right_bexpr = right->get_backend(context);
    7523                 :            : 
    7524                 :    1111910 :   Gogo* gogo = context->gogo();
    7525                 :    1111910 :   Bexpression* ret = gogo->backend()->binary_expression(op, left_bexpr,
    7526                 :    1111910 :                                                         right_bexpr, location);
    7527                 :    1111910 :   if (result_type != NULL)
    7528                 :     978848 :     ret = gogo->backend()->convert_expression(result_type->get_backend(gogo),
    7529                 :     978848 :                                               ret, location);
    7530                 :    1111910 :   return ret;
    7531                 :            : }
    7532                 :            : 
    7533                 :            : // Class String_concat_expression.
    7534                 :            : 
    7535                 :            : bool
    7536                 :        500 : String_concat_expression::do_is_constant() const
    7537                 :            : {
    7538                 :        672 :   for (Expression_list::const_iterator pe = this->exprs_->begin();
    7539                 :        672 :        pe != this->exprs_->end();
    7540                 :        672 :        ++pe)
    7541                 :            :     {
    7542                 :        672 :       if (!(*pe)->is_constant())
    7543                 :        500 :         return false;
    7544                 :            :     }
    7545                 :            :   return true;
    7546                 :            : }
    7547                 :            : 
    7548                 :            : bool
    7549                 :          4 : String_concat_expression::do_is_zero_value() const
    7550                 :            : {
    7551                 :          4 :   for (Expression_list::const_iterator pe = this->exprs_->begin();
    7552                 :          4 :        pe != this->exprs_->end();
    7553                 :          4 :        ++pe)
    7554                 :            :     {
    7555                 :          4 :       if (!(*pe)->is_zero_value())
    7556                 :          4 :         return false;
    7557                 :            :     }
    7558                 :            :   return true;
    7559                 :            : }
    7560                 :            : 
    7561                 :            : bool
    7562                 :         40 : String_concat_expression::do_is_static_initializer() const
    7563                 :            : {
    7564                 :         54 :   for (Expression_list::const_iterator pe = this->exprs_->begin();
    7565                 :         54 :        pe != this->exprs_->end();
    7566                 :         54 :        ++pe)
    7567                 :            :     {
    7568                 :         54 :       if (!(*pe)->is_static_initializer())
    7569                 :         40 :         return false;
    7570                 :            :     }
    7571                 :            :   return true;
    7572                 :            : }
    7573                 :            : 
    7574                 :            : Type*
    7575                 :     115589 : String_concat_expression::do_type()
    7576                 :            : {
    7577                 :     115589 :   Type* t = this->exprs_->front()->type();
    7578                 :     115589 :   Expression_list::iterator pe = this->exprs_->begin();
    7579                 :     115589 :   ++pe;
    7580                 :     307639 :   for (; pe != this->exprs_->end(); ++pe)
    7581                 :            :     {
    7582                 :     192056 :       Type* t1;
    7583                 :     192056 :       if (!Binary_expression::operation_type(OPERATOR_PLUS, t,
    7584                 :     192056 :                                              (*pe)->type(),
    7585                 :            :                                              &t1))
    7586                 :          6 :         return Type::make_error_type();
    7587                 :     192050 :       t = t1;
    7588                 :            :     }
    7589                 :            :   return t;
    7590                 :            : }
    7591                 :            : 
    7592                 :            : void
    7593                 :      10974 : String_concat_expression::do_determine_type(const Type_context* context)
    7594                 :            : {
    7595                 :      10974 :   Type_context subcontext(*context);
    7596                 :      15800 :   for (Expression_list::iterator pe = this->exprs_->begin();
    7597                 :      15800 :        pe != this->exprs_->end();
    7598                 :      15800 :        ++pe)
    7599                 :            :     {
    7600                 :      15796 :       Type* t = (*pe)->type();
    7601                 :      15796 :       if (!t->is_abstract())
    7602                 :            :         {
    7603                 :      10970 :           subcontext.type = t;
    7604                 :      10970 :           break;
    7605                 :            :         }
    7606                 :            :     }
    7607                 :      10974 :   if (subcontext.type == NULL)
    7608                 :          2 :     subcontext.type = this->exprs_->front()->type();
    7609                 :      39519 :   for (Expression_list::iterator pe = this->exprs_->begin();
    7610                 :      39519 :        pe != this->exprs_->end();
    7611                 :      39519 :        ++pe)
    7612                 :      28545 :     (*pe)->determine_type(&subcontext);
    7613                 :      10974 : }
    7614                 :            : 
    7615                 :            : void
    7616                 :       9398 : String_concat_expression::do_check_types(Gogo*)
    7617                 :            : {
    7618                 :       9398 :   if (this->is_error_expression())
    7619                 :            :     return;
    7620                 :       9398 :   Type* t = this->exprs_->front()->type();
    7621                 :      18796 :   if (t->is_error())
    7622                 :            :     {
    7623                 :          0 :       this->set_is_error();
    7624                 :          0 :       return;
    7625                 :            :     }
    7626                 :       9398 :   Expression_list::iterator pe = this->exprs_->begin();
    7627                 :       9398 :   ++pe;
    7628                 :      23831 :   for (; pe != this->exprs_->end(); ++pe)
    7629                 :            :     {
    7630                 :      14439 :       Type* t1 = (*pe)->type();
    7631                 :      14439 :       if (!Type::are_compatible_for_binop(t, t1))
    7632                 :            :         {
    7633                 :          6 :           this->report_error("incompatible types in binary expression");
    7634                 :          6 :           return;
    7635                 :            :         }
    7636                 :      14433 :       if (!Binary_expression::check_operator_type(OPERATOR_PLUS, t, t1,
    7637                 :            :                                                   this->location()))
    7638                 :            :         {
    7639                 :          0 :           this->set_is_error();
    7640                 :          0 :           return;
    7641                 :            :         }
    7642                 :            :     }
    7643                 :            : }
    7644                 :            : 
    7645                 :            : Expression*
    7646                 :       9359 : String_concat_expression::do_flatten(Gogo*, Named_object*,
    7647                 :            :                                      Statement_inserter* inserter)
    7648                 :            : {
    7649                 :       9359 :   if (this->is_error_expression())
    7650                 :         12 :     return this;
    7651                 :       9347 :   Location loc = this->location();
    7652                 :       9347 :   Type* type = this->type();
    7653                 :            : 
    7654                 :            :   // Mark string([]byte) operands to reuse the backing store.
    7655                 :            :   // runtime.concatstrings does not keep the reference.
    7656                 :            :   //
    7657                 :            :   // Note: in the gc runtime, if all but one inputs are empty,
    7658                 :            :   // concatstrings returns the only nonempty input without copy.
    7659                 :            :   // So it is not safe to reuse the backing store if it is a
    7660                 :            :   // string([]byte) conversion. So the gc compiler does the
    7661                 :            :   // no-copy optimization only when there is at least one
    7662                 :            :   // constant nonempty input. Currently the gccgo runtime
    7663                 :            :   // doesn't do this, so we don't do the check.
    7664                 :       9347 :   for (Expression_list::iterator p = this->exprs_->begin();
    7665                 :      33069 :        p != this->exprs_->end();
    7666                 :      33069 :        ++p)
    7667                 :            :     {
    7668                 :      23722 :       Type_conversion_expression* tce = (*p)->conversion_expression();
    7669                 :        398 :       if (tce != NULL)
    7670                 :      23722 :         tce->set_no_copy(true);
    7671                 :            :     }
    7672                 :            : 
    7673                 :       9347 :   Expression* buf = NULL;
    7674                 :       9347 :   Node* n = Node::make_node(this);
    7675                 :       9347 :   if ((n->encoding() & ESCAPE_MASK) == Node::ESCAPE_NONE)
    7676                 :            :     {
    7677                 :        983 :       size_t size = 0;
    7678                 :        983 :       for (Expression_list::iterator p = this->exprs_->begin();
    7679                 :       3388 :            p != this->exprs_->end();
    7680                 :       3388 :            ++p)
    7681                 :            :         {
    7682                 :       4810 :           std::string s;
    7683                 :       2405 :           if ((*p)->string_constant_value(&s))
    7684                 :       1125 :             size += s.length();
    7685                 :            :         }
    7686                 :            :       // Make a buffer on stack if the result does not escape.
    7687                 :            :       // But don't do this if we know it won't fit.
    7688                 :        983 :       if (size < (size_t)tmp_string_buf_size)
    7689                 :            :         {
    7690                 :        891 :           Type* byte_type = Type::lookup_integer_type("uint8");
    7691                 :        891 :           Expression* buflen =
    7692                 :        891 :             Expression::make_integer_ul(tmp_string_buf_size, NULL, loc);
    7693                 :        891 :           Expression::make_integer_ul(tmp_string_buf_size, NULL, loc);
    7694                 :        891 :           Type* array_type = Type::make_array_type(byte_type, buflen);
    7695                 :        891 :           buf = Expression::make_allocation(array_type, loc);
    7696                 :        891 :           buf->allocation_expression()->set_allocate_on_stack();
    7697                 :        891 :           buf->allocation_expression()->set_no_zero();
    7698                 :            :         }
    7699                 :            :     }
    7700                 :        891 :   if (buf == NULL)
    7701                 :       8456 :     buf = Expression::make_nil(loc);
    7702                 :       9347 :   go_assert(this->exprs_->size() > 1);
    7703                 :       9347 :   Expression* len =
    7704                 :       9347 :     Expression::make_integer_ul(this->exprs_->size(), NULL, loc);
    7705                 :       9347 :   Array_type* array_type = Type::make_array_type(type, len);
    7706                 :       9347 :   array_type->set_is_array_incomparable();
    7707                 :       9347 :   Expression* array =
    7708                 :       9347 :     Expression::make_array_composite_literal(array_type, this->exprs_,
    7709                 :            :                                              loc);
    7710                 :       9347 :   Temporary_statement* ts =
    7711                 :       9347 :     Statement::make_temporary(array_type, array, loc);
    7712                 :       9347 :   inserter->insert(ts);
    7713                 :       9347 :   Expression* ref = Expression::make_temporary_reference(ts, loc);
    7714                 :       9347 :   ref = Expression::make_unary(OPERATOR_AND, ref, loc);
    7715                 :       9347 :         Expression* call =
    7716                 :       9347 :     Runtime::make_call(Runtime::CONCATSTRINGS, loc, 3, buf,
    7717                 :            :                        ref, len->copy());
    7718                 :       9347 :   return Expression::make_cast(type, call, loc);
    7719                 :            : }
    7720                 :            : 
    7721                 :            : void
    7722                 :          0 : String_concat_expression::do_dump_expression(
    7723                 :            :     Ast_dump_context* ast_dump_context) const
    7724                 :            : {
    7725                 :          0 :   ast_dump_context->ostream() << "concat(";
    7726                 :          0 :   ast_dump_context->dump_expression_list(this->exprs_, false);
    7727                 :          0 :   ast_dump_context->ostream() << ")";
    7728                 :          0 : }
    7729                 :            : 
    7730                 :            : Expression*
    7731                 :      14418 : Expression::make_string_concat(Expression_list* exprs)
    7732                 :            : {
    7733                 :      14418 :   return new String_concat_expression(exprs);
    7734                 :            : }
    7735                 :            : 
    7736                 :            : // Class Bound_method_expression.
    7737                 :            : 
    7738                 :            : // Traversal.
    7739                 :            : 
    7740                 :            : int
    7741                 :     248040 : Bound_method_expression::do_traverse(Traverse* traverse)
    7742                 :            : {
    7743                 :     248040 :   return Expression::traverse(&this->expr_, traverse);
    7744                 :            : }
    7745                 :            : 
    7746                 :            : // Return the type of a bound method expression.  The type of this
    7747                 :            : // object is simply the type of the method with no receiver.
    7748                 :            : 
    7749                 :            : Type*
    7750                 :     674481 : Bound_method_expression::do_type()
    7751                 :            : {
    7752                 :     674481 :   Named_object* fn = this->method_->named_object();
    7753                 :     674481 :   Function_type* fntype;
    7754                 :     674481 :   if (fn->is_function())
    7755                 :     384443 :     fntype = fn->func_value()->type();
    7756                 :     290038 :   else if (fn->is_function_declaration())
    7757                 :     290038 :     fntype = fn->func_declaration_value()->type();
    7758                 :            :   else
    7759                 :          0 :     return Type::make_error_type();
    7760                 :     674481 :   return fntype->copy_without_receiver();
    7761                 :            : }
    7762                 :            : 
    7763                 :            : // Determine the types of a method expression.
    7764                 :            : 
    7765                 :            : void
    7766                 :        932 : Bound_method_expression::do_determine_type(const Type_context*)
    7767                 :            : {
    7768                 :        932 :   Named_object* fn = this->method_->named_object();
    7769                 :        932 :   Function_type* fntype;
    7770                 :        932 :   if (fn->is_function())
    7771                 :        821 :     fntype = fn->func_value()->type();
    7772                 :        111 :   else if (fn->is_function_declaration())
    7773                 :        111 :     fntype = fn->func_declaration_value()->type();
    7774                 :            :   else
    7775                 :            :     fntype = NULL;
    7776                 :        932 :   if (fntype == NULL || !fntype->is_method())
    7777                 :          0 :     this->expr_->determine_type_no_context();
    7778                 :            :   else
    7779                 :            :     {
    7780                 :        932 :       Type_context subcontext(fntype->receiver()->type(), false);
    7781                 :        932 :       this->expr_->determine_type(&subcontext);
    7782                 :            :     }
    7783                 :        932 : }
    7784                 :            : 
    7785                 :            : // Check the types of a method expression.
    7786                 :            : 
    7787                 :            : void
    7788                 :        848 : Bound_method_expression::do_check_types(Gogo*)
    7789                 :            : {
    7790                 :        848 :   Named_object* fn = this->method_->named_object();
    7791                 :        848 :   if (!fn->is_function() && !fn->is_function_declaration())
    7792                 :            :     {
    7793                 :          0 :       this->report_error(_("object is not a method"));
    7794                 :          0 :       return;
    7795                 :            :     }
    7796                 :            : 
    7797                 :        848 :   Function_type* fntype;
    7798                 :        848 :   if (fn->is_function())
    7799                 :        737 :     fntype = fn->func_value()->type();
    7800                 :        111 :   else if (fn->is_function_declaration())
    7801                 :        111 :     fntype = fn->func_declaration_value()->type();
    7802                 :            :   else
    7803                 :          0 :     go_unreachable();
    7804                 :        848 :   Type* rtype = fntype->receiver()->type()->deref();
    7805                 :        848 :   Type* etype = (this->expr_type_ != NULL
    7806                 :        848 :                  ? this->expr_type_
    7807                 :        848 :                  : this->expr_->type());
    7808                 :        848 :   etype = etype->deref();
    7809                 :        848 :   if (!Type::are_identical(rtype, etype, Type::COMPARE_TAGS, NULL))
    7810                 :          0 :     this->report_error(_("method type does not match object type"));
    7811                 :            : }
    7812                 :            : 
    7813                 :            : // If a bound method expression is not simply called, then it is
    7814                 :            : // represented as a closure.  The closure will hold a single variable,
    7815                 :            : // the receiver to pass to the method.  The function will be a simple
    7816                 :            : // thunk that pulls that value from the closure and calls the method
    7817                 :            : // with the remaining arguments.
    7818                 :            : //
    7819                 :            : // Because method values are not common, we don't build all thunks for
    7820                 :            : // every methods, but instead only build them as we need them.  In
    7821                 :            : // particular, we even build them on demand for methods defined in
    7822                 :            : // other packages.
    7823                 :            : 
    7824                 :            : Bound_method_expression::Method_value_thunks
    7825                 :            :   Bound_method_expression::method_value_thunks;
    7826                 :            : 
    7827                 :            : // Find or create the thunk for METHOD.
    7828                 :            : 
    7829                 :            : Named_object*
    7830                 :       1692 : Bound_method_expression::create_thunk(Gogo* gogo, const Method* method,
    7831                 :            :                                       Named_object* fn)
    7832                 :            : {
    7833                 :       1692 :   std::pair<Named_object*, Named_object*> val(fn, NULL);
    7834                 :       1692 :   std::pair<Method_value_thunks::iterator, bool> ins =
    7835                 :       1692 :     Bound_method_expression::method_value_thunks.insert(val);
    7836                 :       1692 :   if (!ins.second)
    7837                 :            :     {
    7838                 :            :       // We have seen this method before.
    7839                 :       1116 :       go_assert(ins.first->second != NULL);
    7840                 :            :       return ins.first->second;
    7841                 :            :     }
    7842                 :            : 
    7843                 :        576 :   Location loc = fn->location();
    7844                 :            : 
    7845                 :        576 :   Function_type* orig_fntype;
    7846                 :        576 :   if (fn->is_function())
    7847                 :        481 :     orig_fntype = fn->func_value()->type();
    7848                 :         95 :   else if (fn->is_function_declaration())
    7849                 :         95 :     orig_fntype = fn->func_declaration_value()->type();
    7850                 :            :   else
    7851                 :            :     orig_fntype = NULL;
    7852                 :            : 
    7853                 :        576 :   if (orig_fntype == NULL || !orig_fntype->is_method())
    7854                 :            :     {
    7855                 :          0 :       ins.first->second =
    7856                 :          0 :         Named_object::make_erroneous_name(gogo->thunk_name());
    7857                 :          0 :       return ins.first->second;
    7858                 :            :     }
    7859                 :            : 
    7860                 :        576 :   Struct_field_list* sfl = new Struct_field_list();
    7861                 :            :   // The type here is wrong--it should be the C function type.  But it
    7862                 :            :   // doesn't really matter.
    7863                 :        576 :   Type* vt = Type::make_pointer_type(Type::make_void_type());
    7864                 :        576 :   sfl->push_back(Struct_field(Typed_identifier("fn", vt, loc)));
    7865                 :