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