LCOV - code coverage report
Current view: top level - gcc/go/gofrontend - gogo.cc (source / functions) Hit Total Coverage
Test: gcc.info Lines: 4082 4499 90.7 %
Date: 2020-03-28 11:57:23 Functions: 273 299 91.3 %
Legend: Lines: hit not hit | Branches: + taken - not taken # not executed Branches: 0 0 -

           Branch data     Line data    Source code
       1                 :            : // gogo.cc -- Go frontend parsed representation.
       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 <fstream>
      10                 :            : 
      11                 :            : #include "filenames.h"
      12                 :            : 
      13                 :            : #include "go-c.h"
      14                 :            : #include "go-diagnostics.h"
      15                 :            : #include "go-encode-id.h"
      16                 :            : #include "go-dump.h"
      17                 :            : #include "go-optimize.h"
      18                 :            : #include "lex.h"
      19                 :            : #include "types.h"
      20                 :            : #include "statements.h"
      21                 :            : #include "expressions.h"
      22                 :            : #include "runtime.h"
      23                 :            : #include "import.h"
      24                 :            : #include "export.h"
      25                 :            : #include "backend.h"
      26                 :            : #include "gogo.h"
      27                 :            : 
      28                 :            : // Class Gogo.
      29                 :            : 
      30                 :       3372 : Gogo::Gogo(Backend* backend, Linemap* linemap, int, int pointer_size)
      31                 :            :   : backend_(backend),
      32                 :            :     linemap_(linemap),
      33                 :            :     package_(NULL),
      34                 :            :     functions_(),
      35                 :       3372 :     globals_(new Bindings(NULL)),
      36                 :            :     file_block_names_(),
      37                 :            :     imports_(),
      38                 :            :     imported_unsafe_(false),
      39                 :            :     current_file_imported_unsafe_(false),
      40                 :            :     packages_(),
      41                 :            :     init_functions_(),
      42                 :            :     var_deps_(),
      43                 :            :     need_init_fn_(false),
      44                 :            :     init_fn_name_(),
      45                 :            :     imported_init_fns_(),
      46                 :            :     pkgpath_(),
      47                 :            :     pkgpath_symbol_(),
      48                 :            :     prefix_(),
      49                 :            :     pkgpath_set_(false),
      50                 :            :     pkgpath_from_option_(false),
      51                 :            :     prefix_from_option_(false),
      52                 :            :     relative_import_path_(),
      53                 :            :     c_header_(),
      54                 :            :     check_divide_by_zero_(true),
      55                 :            :     check_divide_overflow_(true),
      56                 :            :     compiling_runtime_(false),
      57                 :            :     debug_escape_level_(0),
      58                 :            :     debug_optimization_(false),
      59                 :            :     nil_check_size_threshold_(4096),
      60                 :            :     verify_types_(),
      61                 :            :     interface_types_(),
      62                 :            :     specific_type_functions_(),
      63                 :            :     specific_type_functions_are_written_(false),
      64                 :            :     named_types_are_converted_(false),
      65                 :            :     analysis_sets_(),
      66                 :            :     gc_roots_(),
      67                 :            :     type_descriptors_(),
      68                 :            :     imported_inlinable_functions_(),
      69                 :       6744 :     imported_inline_functions_()
      70                 :            : {
      71                 :       3372 :   const Location loc = Linemap::predeclared_location();
      72                 :            : 
      73                 :       3372 :   Named_type* uint8_type = Type::make_integer_type("uint8", true, 8,
      74                 :            :                                                    RUNTIME_TYPE_KIND_UINT8);
      75                 :       3372 :   this->add_named_type(uint8_type);
      76                 :       3372 :   this->add_named_type(Type::make_integer_type("uint16", true,  16,
      77                 :            :                                                RUNTIME_TYPE_KIND_UINT16));
      78                 :       3372 :   this->add_named_type(Type::make_integer_type("uint32", true,  32,
      79                 :            :                                                RUNTIME_TYPE_KIND_UINT32));
      80                 :       3372 :   this->add_named_type(Type::make_integer_type("uint64", true,  64,
      81                 :            :                                                RUNTIME_TYPE_KIND_UINT64));
      82                 :            : 
      83                 :       3372 :   this->add_named_type(Type::make_integer_type("int8",  false,   8,
      84                 :            :                                                RUNTIME_TYPE_KIND_INT8));
      85                 :       3372 :   this->add_named_type(Type::make_integer_type("int16", false,  16,
      86                 :            :                                                RUNTIME_TYPE_KIND_INT16));
      87                 :       3372 :   Named_type* int32_type = Type::make_integer_type("int32", false,  32,
      88                 :            :                                                    RUNTIME_TYPE_KIND_INT32);
      89                 :       3372 :   this->add_named_type(int32_type);
      90                 :       3372 :   this->add_named_type(Type::make_integer_type("int64", false,  64,
      91                 :            :                                                RUNTIME_TYPE_KIND_INT64));
      92                 :            : 
      93                 :       3372 :   this->add_named_type(Type::make_float_type("float32", 32,
      94                 :            :                                              RUNTIME_TYPE_KIND_FLOAT32));
      95                 :       3372 :   this->add_named_type(Type::make_float_type("float64", 64,
      96                 :            :                                              RUNTIME_TYPE_KIND_FLOAT64));
      97                 :            : 
      98                 :       3372 :   this->add_named_type(Type::make_complex_type("complex64", 64,
      99                 :            :                                                RUNTIME_TYPE_KIND_COMPLEX64));
     100                 :       3372 :   this->add_named_type(Type::make_complex_type("complex128", 128,
     101                 :            :                                                RUNTIME_TYPE_KIND_COMPLEX128));
     102                 :            : 
     103                 :       3372 :   int int_type_size = pointer_size;
     104                 :       3372 :   if (int_type_size < 32)
     105                 :            :     int_type_size = 32;
     106                 :       3372 :   this->add_named_type(Type::make_integer_type("uint", true,
     107                 :            :                                                int_type_size,
     108                 :            :                                                RUNTIME_TYPE_KIND_UINT));
     109                 :       3372 :   Named_type* int_type = Type::make_integer_type("int", false, int_type_size,
     110                 :            :                                                  RUNTIME_TYPE_KIND_INT);
     111                 :       3372 :   this->add_named_type(int_type);
     112                 :            : 
     113                 :       3372 :   this->add_named_type(Type::make_integer_type("uintptr", true,
     114                 :            :                                                pointer_size,
     115                 :            :                                                RUNTIME_TYPE_KIND_UINTPTR));
     116                 :            : 
     117                 :            :   // "byte" is an alias for "uint8".
     118                 :       6744 :   uint8_type->integer_type()->set_is_byte();
     119                 :       3372 :   Named_object* byte_type = Named_object::make_type("byte", NULL, uint8_type,
     120                 :            :                                                     loc);
     121                 :       3372 :   byte_type->type_value()->set_is_alias();
     122                 :       3372 :   this->add_named_type(byte_type->type_value());
     123                 :            : 
     124                 :            :   // "rune" is an alias for "int32".
     125                 :       6744 :   int32_type->integer_type()->set_is_rune();
     126                 :       3372 :   Named_object* rune_type = Named_object::make_type("rune", NULL, int32_type,
     127                 :            :                                                     loc);
     128                 :       3372 :   rune_type->type_value()->set_is_alias();
     129                 :       3372 :   this->add_named_type(rune_type->type_value());
     130                 :            : 
     131                 :       3372 :   this->add_named_type(Type::make_named_bool_type());
     132                 :            : 
     133                 :       3372 :   this->add_named_type(Type::make_named_string_type());
     134                 :            : 
     135                 :            :   // "error" is interface { Error() string }.
     136                 :       3372 :   {
     137                 :       3372 :     Typed_identifier_list *methods = new Typed_identifier_list;
     138                 :       3372 :     Typed_identifier_list *results = new Typed_identifier_list;
     139                 :       3372 :     results->push_back(Typed_identifier("", Type::lookup_string_type(), loc));
     140                 :       3372 :     Type *method_type = Type::make_function_type(NULL, NULL, results, loc);
     141                 :       3372 :     methods->push_back(Typed_identifier("Error", method_type, loc));
     142                 :       3372 :     Interface_type *error_iface = Type::make_interface_type(methods, loc);
     143                 :       3372 :     error_iface->finalize_methods();
     144                 :       3372 :     Named_type *error_type = Named_object::make_type("error", NULL, error_iface, loc)->type_value();
     145                 :       3372 :     this->add_named_type(error_type);
     146                 :            :   }
     147                 :            : 
     148                 :       3372 :   this->globals_->add_constant(Typed_identifier("true",
     149                 :            :                                                 Type::make_boolean_type(),
     150                 :            :                                                 loc),
     151                 :            :                                NULL,
     152                 :            :                                Expression::make_boolean(true, loc),
     153                 :            :                                0);
     154                 :       3372 :   this->globals_->add_constant(Typed_identifier("false",
     155                 :            :                                                 Type::make_boolean_type(),
     156                 :            :                                                 loc),
     157                 :            :                                NULL,
     158                 :            :                                Expression::make_boolean(false, loc),
     159                 :            :                                0);
     160                 :            : 
     161                 :       3372 :   this->globals_->add_constant(Typed_identifier("nil", Type::make_nil_type(),
     162                 :            :                                                 loc),
     163                 :            :                                NULL,
     164                 :            :                                Expression::make_nil(loc),
     165                 :            :                                0);
     166                 :            : 
     167                 :       3372 :   Type* abstract_int_type = Type::make_abstract_integer_type();
     168                 :       3372 :   this->globals_->add_constant(Typed_identifier("iota", abstract_int_type,
     169                 :            :                                                 loc),
     170                 :            :                                NULL,
     171                 :            :                                Expression::make_iota(),
     172                 :            :                                0);
     173                 :            : 
     174                 :       3372 :   Function_type* new_type = Type::make_function_type(NULL, NULL, NULL, loc);
     175                 :       3372 :   new_type->set_is_varargs();
     176                 :       3372 :   new_type->set_is_builtin();
     177                 :       3372 :   this->globals_->add_function_declaration("new", NULL, new_type, loc);
     178                 :            : 
     179                 :       3372 :   Function_type* make_type = Type::make_function_type(NULL, NULL, NULL, loc);
     180                 :       3372 :   make_type->set_is_varargs();
     181                 :       3372 :   make_type->set_is_builtin();
     182                 :       3372 :   this->globals_->add_function_declaration("make", NULL, make_type, loc);
     183                 :            : 
     184                 :       3372 :   Typed_identifier_list* len_result = new Typed_identifier_list();
     185                 :       3372 :   len_result->push_back(Typed_identifier("", int_type, loc));
     186                 :       3372 :   Function_type* len_type = Type::make_function_type(NULL, NULL, len_result,
     187                 :            :                                                      loc);
     188                 :       3372 :   len_type->set_is_builtin();
     189                 :       3372 :   this->globals_->add_function_declaration("len", NULL, len_type, loc);
     190                 :            : 
     191                 :       3372 :   Typed_identifier_list* cap_result = new Typed_identifier_list();
     192                 :       3372 :   cap_result->push_back(Typed_identifier("", int_type, loc));
     193                 :       3372 :   Function_type* cap_type = Type::make_function_type(NULL, NULL, len_result,
     194                 :            :                                                      loc);
     195                 :       3372 :   cap_type->set_is_builtin();
     196                 :       3372 :   this->globals_->add_function_declaration("cap", NULL, cap_type, loc);
     197                 :            : 
     198                 :       3372 :   Function_type* print_type = Type::make_function_type(NULL, NULL, NULL, loc);
     199                 :       3372 :   print_type->set_is_varargs();
     200                 :       3372 :   print_type->set_is_builtin();
     201                 :       3372 :   this->globals_->add_function_declaration("print", NULL, print_type, loc);
     202                 :            : 
     203                 :       3372 :   print_type = Type::make_function_type(NULL, NULL, NULL, loc);
     204                 :       3372 :   print_type->set_is_varargs();
     205                 :       3372 :   print_type->set_is_builtin();
     206                 :       3372 :   this->globals_->add_function_declaration("println", NULL, print_type, loc);
     207                 :            : 
     208                 :       3372 :   Type *empty = Type::make_empty_interface_type(loc);
     209                 :       3372 :   Typed_identifier_list* panic_parms = new Typed_identifier_list();
     210                 :       3372 :   panic_parms->push_back(Typed_identifier("e", empty, loc));
     211                 :       3372 :   Function_type *panic_type = Type::make_function_type(NULL, panic_parms,
     212                 :            :                                                        NULL, loc);
     213                 :       3372 :   panic_type->set_is_builtin();
     214                 :       3372 :   this->globals_->add_function_declaration("panic", NULL, panic_type, loc);
     215                 :            : 
     216                 :       3372 :   Typed_identifier_list* recover_result = new Typed_identifier_list();
     217                 :       3372 :   recover_result->push_back(Typed_identifier("", empty, loc));
     218                 :       3372 :   Function_type* recover_type = Type::make_function_type(NULL, NULL,
     219                 :            :                                                          recover_result,
     220                 :            :                                                          loc);
     221                 :       3372 :   recover_type->set_is_builtin();
     222                 :       3372 :   this->globals_->add_function_declaration("recover", NULL, recover_type, loc);
     223                 :            : 
     224                 :       3372 :   Function_type* close_type = Type::make_function_type(NULL, NULL, NULL, loc);
     225                 :       3372 :   close_type->set_is_varargs();
     226                 :       3372 :   close_type->set_is_builtin();
     227                 :       3372 :   this->globals_->add_function_declaration("close", NULL, close_type, loc);
     228                 :            : 
     229                 :       3372 :   Typed_identifier_list* copy_result = new Typed_identifier_list();
     230                 :       3372 :   copy_result->push_back(Typed_identifier("", int_type, loc));
     231                 :       3372 :   Function_type* copy_type = Type::make_function_type(NULL, NULL,
     232                 :            :                                                       copy_result, loc);
     233                 :       3372 :   copy_type->set_is_varargs();
     234                 :       3372 :   copy_type->set_is_builtin();
     235                 :       3372 :   this->globals_->add_function_declaration("copy", NULL, copy_type, loc);
     236                 :            : 
     237                 :       3372 :   Function_type* append_type = Type::make_function_type(NULL, NULL, NULL, loc);
     238                 :       3372 :   append_type->set_is_varargs();
     239                 :       3372 :   append_type->set_is_builtin();
     240                 :       3372 :   this->globals_->add_function_declaration("append", NULL, append_type, loc);
     241                 :            : 
     242                 :       3372 :   Function_type* complex_type = Type::make_function_type(NULL, NULL, NULL, loc);
     243                 :       3372 :   complex_type->set_is_varargs();
     244                 :       3372 :   complex_type->set_is_builtin();
     245                 :       3372 :   this->globals_->add_function_declaration("complex", NULL, complex_type, loc);
     246                 :            : 
     247                 :       3372 :   Function_type* real_type = Type::make_function_type(NULL, NULL, NULL, loc);
     248                 :       3372 :   real_type->set_is_varargs();
     249                 :       3372 :   real_type->set_is_builtin();
     250                 :       3372 :   this->globals_->add_function_declaration("real", NULL, real_type, loc);
     251                 :            : 
     252                 :       3372 :   Function_type* imag_type = Type::make_function_type(NULL, NULL, NULL, loc);
     253                 :       3372 :   imag_type->set_is_varargs();
     254                 :       3372 :   imag_type->set_is_builtin();
     255                 :       3372 :   this->globals_->add_function_declaration("imag", NULL, imag_type, loc);
     256                 :            : 
     257                 :       3372 :   Function_type* delete_type = Type::make_function_type(NULL, NULL, NULL, loc);
     258                 :       3372 :   delete_type->set_is_varargs();
     259                 :       3372 :   delete_type->set_is_builtin();
     260                 :       3372 :   this->globals_->add_function_declaration("delete", NULL, delete_type, loc);
     261                 :       3372 : }
     262                 :            : 
     263                 :            : std::string
     264                 :     161514 : Gogo::pkgpath_for_symbol(const std::string& pkgpath)
     265                 :            : {
     266                 :     161514 :   go_assert(!pkgpath.empty());
     267                 :     161514 :   return go_encode_id(pkgpath);
     268                 :            : }
     269                 :            : 
     270                 :            : // Return a hash code for a string, given a starting hash.
     271                 :            : 
     272                 :            : unsigned int
     273                 :    9927700 : Gogo::hash_string(const std::string& s, unsigned int h)
     274                 :            : {
     275                 :    9927700 :   const char* p = s.data();
     276                 :    9927700 :   size_t len = s.length();
     277                 :   87810000 :   for (; len > 0; --len)
     278                 :            :     {
     279                 :   77882300 :       h ^= *p++;
     280                 :   77882300 :       h*= 16777619;
     281                 :            :     }
     282                 :    9927700 :   return h;
     283                 :            : }
     284                 :            : 
     285                 :            : // Get the package path to use for type reflection data.  This should
     286                 :            : // ideally be unique across the entire link.
     287                 :            : 
     288                 :            : const std::string&
     289                 :    6258980 : Gogo::pkgpath() const
     290                 :            : {
     291                 :    6258980 :   go_assert(this->pkgpath_set_);
     292                 :    6258980 :   return this->pkgpath_;
     293                 :            : }
     294                 :            : 
     295                 :            : // Set the package path from the -fgo-pkgpath command line option.
     296                 :            : 
     297                 :            : void
     298                 :       1726 : Gogo::set_pkgpath(const std::string& arg)
     299                 :            : {
     300                 :       1726 :   go_assert(!this->pkgpath_set_);
     301                 :       1726 :   this->pkgpath_ = go_mangle_pkgpath(arg);
     302                 :       1726 :   this->pkgpath_set_ = true;
     303                 :       1726 :   this->pkgpath_from_option_ = true;
     304                 :       1726 : }
     305                 :            : 
     306                 :            : // Get the package path to use for symbol names.
     307                 :            : 
     308                 :            : const std::string&
     309                 :     168605 : Gogo::pkgpath_symbol() const
     310                 :            : {
     311                 :     168605 :   go_assert(this->pkgpath_set_);
     312                 :     168605 :   return this->pkgpath_symbol_;
     313                 :            : }
     314                 :            : 
     315                 :            : // Set the unique prefix to use to determine the package path, from
     316                 :            : // the -fgo-prefix command line option.
     317                 :            : 
     318                 :            : void
     319                 :          4 : Gogo::set_prefix(const std::string& arg)
     320                 :            : {
     321                 :          4 :   go_assert(!this->prefix_from_option_);
     322                 :          4 :   this->prefix_ = arg;
     323                 :          4 :   this->prefix_from_option_ = true;
     324                 :          4 : }
     325                 :            : 
     326                 :            : // Given a name which may or may not have been hidden, append the
     327                 :            : // appropriate version of the name to the result string. Take care
     328                 :            : // to avoid creating a sequence that will be rejected by go_encode_id
     329                 :            : // (avoid ..u, ..U, ..z).
     330                 :            : void
     331                 :    2708660 : Gogo::append_possibly_hidden_name(std::string *result, const std::string& name)
     332                 :            : {
     333                 :            :   // FIXME: This adds in pkgpath twice for hidden symbols, which is
     334                 :            :   // less than ideal.
     335                 :    2708660 :   if (!Gogo::is_hidden_name(name))
     336                 :    1364920 :     (*result) += name;
     337                 :            :   else
     338                 :            :     {
     339                 :    2687470 :       std::string n = ".";
     340                 :    2687470 :       std::string pkgpath = Gogo::hidden_name_pkgpath(name);
     341                 :    1343730 :       char lastR = result->at(result->length() - 1);
     342                 :    1343730 :       char firstP = pkgpath.at(0);
     343                 :    1343730 :       if (lastR == '.' && (firstP == 'u' || firstP == 'U' || firstP == 'z'))
     344                 :         26 :         n = "_.";
     345                 :    1343730 :       n.append(pkgpath);
     346                 :    1343730 :       n.append(1, '.');
     347                 :    1343730 :       n.append(Gogo::unpack_hidden_name(name));
     348                 :    1343730 :       (*result) += n;
     349                 :            :     }
     350                 :    2708660 : }
     351                 :            : 
     352                 :            : // Munge name for use in an error message.
     353                 :            : 
     354                 :            : std::string
     355                 :     169326 : Gogo::message_name(const std::string& name)
     356                 :            : {
     357                 :     169326 :   return go_localize_identifier(Gogo::unpack_hidden_name(name).c_str());
     358                 :            : }
     359                 :            : 
     360                 :            : // Get the package name.
     361                 :            : 
     362                 :            : const std::string&
     363                 :     576517 : Gogo::package_name() const
     364                 :            : {
     365                 :     576517 :   go_assert(this->package_ != NULL);
     366                 :     576517 :   return this->package_->package_name();
     367                 :            : }
     368                 :            : 
     369                 :            : // Set the package name.
     370                 :            : 
     371                 :            : void
     372                 :      10245 : Gogo::set_package_name(const std::string& package_name,
     373                 :            :                        Location location)
     374                 :            : {
     375                 :      10245 :   if (this->package_ != NULL)
     376                 :            :     {
     377                 :       6873 :       if (this->package_->package_name() != package_name)
     378                 :          0 :         go_error_at(location, "expected package %<%s%>",
     379                 :          0 :                     Gogo::message_name(this->package_->package_name()).c_str());
     380                 :       6873 :       return;
     381                 :            :     }
     382                 :            : 
     383                 :            :   // Now that we know the name of the package we are compiling, set
     384                 :            :   // the package path to use for reflect.Type.PkgPath and global
     385                 :            :   // symbol names.
     386                 :       3372 :   if (this->pkgpath_set_)
     387                 :       1726 :     this->pkgpath_symbol_ = Gogo::pkgpath_for_symbol(this->pkgpath_);
     388                 :            :   else
     389                 :            :     {
     390                 :       3288 :       if (!this->prefix_from_option_ && package_name == "main")
     391                 :            :         {
     392                 :       1414 :           this->pkgpath_ = package_name;
     393                 :       1414 :           this->pkgpath_symbol_ = Gogo::pkgpath_for_symbol(package_name);
     394                 :            :         }
     395                 :            :       else
     396                 :            :         {
     397                 :        232 :           if (!this->prefix_from_option_)
     398                 :        228 :             this->prefix_ = "go";
     399                 :        464 :           this->pkgpath_ = (go_mangle_pkgpath(this->prefix_) + '.'
     400                 :        232 :                             + package_name);
     401                 :        464 :           this->pkgpath_symbol_ = (Gogo::pkgpath_for_symbol(this->prefix_) + '.'
     402                 :        696 :                                    + Gogo::pkgpath_for_symbol(package_name));
     403                 :            :         }
     404                 :       1646 :       this->pkgpath_set_ = true;
     405                 :            :     }
     406                 :            : 
     407                 :       6744 :   this->package_ = this->register_package(this->pkgpath_,
     408                 :       3372 :                                           this->pkgpath_symbol_, location);
     409                 :       3372 :   this->package_->set_package_name(package_name, location);
     410                 :            : 
     411                 :       3372 :   if (this->is_main_package())
     412                 :            :     {
     413                 :            :       // Declare "main" as a function which takes no parameters and
     414                 :            :       // returns no value.
     415                 :       1414 :       Location uloc = Linemap::unknown_location();
     416                 :       1414 :       this->declare_function(Gogo::pack_hidden_name("main", false),
     417                 :            :                              Type::make_function_type (NULL, NULL, NULL, uloc),
     418                 :            :                              uloc);
     419                 :            :     }
     420                 :            : }
     421                 :            : 
     422                 :            : // Return whether this is the "main" package.  This is not true if
     423                 :            : // -fgo-pkgpath or -fgo-prefix was used.
     424                 :            : 
     425                 :            : bool
     426                 :      28207 : Gogo::is_main_package() const
     427                 :            : {
     428                 :      28207 :   return (this->package_name() == "main"
     429                 :      14534 :           && !this->pkgpath_from_option_
     430                 :      42696 :           && !this->prefix_from_option_);
     431                 :            : }
     432                 :            : 
     433                 :            : // Import a package.
     434                 :            : 
     435                 :            : void
     436                 :      35362 : Gogo::import_package(const std::string& filename,
     437                 :            :                      const std::string& local_name,
     438                 :            :                      bool is_local_name_exported,
     439                 :            :                      bool must_exist,
     440                 :            :                      Location location)
     441                 :            : {
     442                 :      35362 :   if (filename.empty())
     443                 :            :     {
     444                 :          2 :       go_error_at(location, "import path is empty");
     445                 :          2 :       return;
     446                 :            :     }
     447                 :            : 
     448                 :      35360 :   const char *pf = filename.data();
     449                 :      35360 :   const char *pend = pf + filename.length();
     450                 :     334532 :   while (pf < pend)
     451                 :            :     {
     452                 :     299189 :       unsigned int c;
     453                 :     299189 :       int adv = Lex::fetch_char(pf, &c);
     454                 :     299189 :       if (adv == 0)
     455                 :            :         {
     456                 :          2 :           go_error_at(location, "import path contains invalid UTF-8 sequence");
     457                 :         19 :           return;
     458                 :            :         }
     459                 :     299187 :       if (c == '\0')
     460                 :            :         {
     461                 :          1 :           go_error_at(location, "import path contains NUL");
     462                 :          1 :           return;
     463                 :            :         }
     464                 :     299186 :       if (c < 0x20 || c == 0x7f)
     465                 :            :         {
     466                 :          1 :           go_error_at(location, "import path contains control character");
     467                 :          1 :           return;
     468                 :            :         }
     469                 :     299185 :       if (c == '\\')
     470                 :            :         {
     471                 :          7 :           go_error_at(location, "import path contains backslash; use slash");
     472                 :          7 :           return;
     473                 :            :         }
     474                 :     299178 :       if (Lex::is_unicode_space(c))
     475                 :            :         {
     476                 :          2 :           go_error_at(location, "import path contains space character");
     477                 :          2 :           return;
     478                 :            :         }
     479                 :     299176 :       if (c < 0x7f && strchr("!\"#$%&'()*,:;<=>?[]^`{|}", c) != NULL)
     480                 :            :         {
     481                 :          4 :           go_error_at(location,
     482                 :            :                       "import path contains invalid character '%c'", c);
     483                 :          4 :           return;
     484                 :            :         }
     485                 :     299172 :       pf += adv;
     486                 :            :     }
     487                 :            : 
     488                 :      35343 :   if (IS_ABSOLUTE_PATH(filename.c_str()))
     489                 :            :     {
     490                 :          1 :       go_error_at(location, "import path cannot be absolute path");
     491                 :          1 :       return;
     492                 :            :     }
     493                 :            : 
     494                 :      35342 :   if (local_name == "init")
     495                 :          1 :     go_error_at(location, "cannot import package as init");
     496                 :            : 
     497                 :      35342 :   if (filename == "unsafe")
     498                 :            :     {
     499                 :       1192 :       this->import_unsafe(local_name, is_local_name_exported, location);
     500                 :       1192 :       this->current_file_imported_unsafe_ = true;
     501                 :       1192 :       return;
     502                 :            :     }
     503                 :            : 
     504                 :      34150 :   Imports::const_iterator p = this->imports_.find(filename);
     505                 :      34150 :   if (p != this->imports_.end())
     506                 :            :     {
     507                 :      15924 :       Package* package = p->second;
     508                 :      15924 :       package->set_location(location);
     509                 :      31848 :       std::string ln = local_name;
     510                 :      15924 :       bool is_ln_exported = is_local_name_exported;
     511                 :      15924 :       if (ln.empty())
     512                 :            :         {
     513                 :      15556 :           ln = package->package_name();
     514                 :      15556 :           go_assert(!ln.empty());
     515                 :      15556 :           is_ln_exported = Lex::is_exported_name(ln);
     516                 :            :         }
     517                 :      15924 :       if (ln == "_")
     518                 :            :         ;
     519                 :      15866 :       else if (ln == ".")
     520                 :            :         {
     521                 :        254 :           Bindings* bindings = package->bindings();
     522                 :      43922 :           for (Bindings::const_declarations_iterator pd =
     523                 :        254 :                  bindings->begin_declarations();
     524                 :      43922 :                pd != bindings->end_declarations();
     525                 :      43922 :                ++pd)
     526                 :      43668 :             this->add_dot_import_object(pd->second);
     527                 :        508 :           std::string dot_alias = "." + package->package_name();
     528                 :        254 :           package->add_alias(dot_alias, location);
     529                 :            :         }
     530                 :            :       else
     531                 :            :         {
     532                 :      15612 :           package->add_alias(ln, location);
     533                 :      15612 :           ln = this->pack_hidden_name(ln, is_ln_exported);
     534                 :      15612 :           this->package_->bindings()->add_package(ln, package);
     535                 :            :         }
     536                 :      15924 :       return;
     537                 :            :     }
     538                 :            : 
     539                 :      36452 :   Import::Stream* stream = Import::open_package(filename, location,
     540                 :      18226 :                                                 this->relative_import_path_);
     541                 :      18226 :   if (stream == NULL)
     542                 :            :     {
     543                 :         10 :       if (must_exist)
     544                 :          0 :         go_error_at(location, "import file %qs not found", filename.c_str());
     545                 :         10 :       return;
     546                 :            :     }
     547                 :            : 
     548                 :      18216 :   Import* imp = new Import(stream, location);
     549                 :      18216 :   imp->register_builtin_types(this);
     550                 :      18216 :   Package* package = imp->import(this, local_name, is_local_name_exported);
     551                 :      18216 :   if (package != NULL)
     552                 :            :     {
     553                 :      18216 :       if (package->pkgpath() == this->pkgpath())
     554                 :          0 :         go_error_at(location,
     555                 :            :                     ("imported package uses same package path as package "
     556                 :            :                      "being compiled (see %<-fgo-pkgpath%> option)"));
     557                 :            : 
     558                 :      18216 :       this->imports_.insert(std::make_pair(filename, package));
     559                 :            :     }
     560                 :            : 
     561                 :      18216 :   imp->clear_stream();
     562                 :      18216 :   delete stream;
     563                 :            : 
     564                 :            :   // FIXME: we never delete imp; we may need it for inlinable functions.
     565                 :            : }
     566                 :            : 
     567                 :            : Import_init *
     568                 :     974757 : Gogo::lookup_init(const std::string& init_name)
     569                 :            : {
     570                 :    1949510 :   Import_init tmp("", init_name, -1);
     571                 :     974757 :   Import_init_set::iterator it = this->imported_init_fns_.find(&tmp);
     572                 :     974757 :   return (it != this->imported_init_fns_.end()) ? *it : NULL;
     573                 :            : }
     574                 :            : 
     575                 :            : // Add an import control function for an imported package to the list.
     576                 :            : 
     577                 :            : void
     578                 :     425044 : Gogo::add_import_init_fn(const std::string& package_name,
     579                 :            :                          const std::string& init_name, int prio)
     580                 :            : {
     581                 :   15618800 :   for (Import_init_set::iterator p =
     582                 :     425044 :          this->imported_init_fns_.begin();
     583                 :   16043900 :        p != this->imported_init_fns_.end();
     584                 :   16043900 :        ++p)
     585                 :            :     {
     586                 :   15938900 :       Import_init *ii = (*p);
     587                 :   15938900 :       if (ii->init_name() == init_name)
     588                 :            :         {
     589                 :            :           // If a test of package P1, built as part of package P1,
     590                 :            :           // imports package P2, and P2 imports P1 (perhaps
     591                 :            :           // indirectly), then we will see the same import name with
     592                 :            :           // different import priorities.  That is OK, so don't give
     593                 :            :           // an error about it.
     594                 :     320078 :           if (ii->package_name() != package_name)
     595                 :            :             {
     596                 :          0 :               go_error_at(Linemap::unknown_location(),
     597                 :            :                        "duplicate package initialization name %qs",
     598                 :          0 :                        Gogo::message_name(init_name).c_str());
     599                 :          0 :               go_inform(Linemap::unknown_location(), "used by package %qs",
     600                 :          0 :                         Gogo::message_name(ii->package_name()).c_str());
     601                 :          0 :               go_inform(Linemap::unknown_location(), " and by package %qs",
     602                 :          0 :                         Gogo::message_name(package_name).c_str());
     603                 :            :             }
     604                 :     320078 :           ii->set_priority(prio);
     605                 :     320078 :           return;
     606                 :            :         }
     607                 :            :     }
     608                 :            : 
     609                 :     104966 :   Import_init* nii = new Import_init(package_name, init_name, prio);
     610                 :     104966 :   this->imported_init_fns_.insert(nii);
     611                 :            : }
     612                 :            : 
     613                 :            : // Return whether we are at the global binding level.
     614                 :            : 
     615                 :            : bool
     616                 :     567883 : Gogo::in_global_scope() const
     617                 :            : {
     618                 :     567883 :   return this->functions_.empty();
     619                 :            : }
     620                 :            : 
     621                 :            : // Return the current binding contour.
     622                 :            : 
     623                 :            : Bindings*
     624                 :     652042 : Gogo::current_bindings()
     625                 :            : {
     626                 :     652042 :   if (!this->functions_.empty())
     627                 :     312952 :     return this->functions_.back().blocks.back()->bindings();
     628                 :     339090 :   else if (this->package_ != NULL)
     629                 :     271650 :     return this->package_->bindings();
     630                 :            :   else
     631                 :      67440 :     return this->globals_;
     632                 :            : }
     633                 :            : 
     634                 :            : const Bindings*
     635                 :          0 : Gogo::current_bindings() const
     636                 :            : {
     637                 :          0 :   if (!this->functions_.empty())
     638                 :          0 :     return this->functions_.back().blocks.back()->bindings();
     639                 :          0 :   else if (this->package_ != NULL)
     640                 :          0 :     return this->package_->bindings();
     641                 :            :   else
     642                 :          0 :     return this->globals_;
     643                 :            : }
     644                 :            : 
     645                 :            : void
     646                 :      34693 : Gogo::update_init_priority(Import_init* ii,
     647                 :            :                            std::set<const Import_init *>* visited)
     648                 :            : {
     649                 :      34693 :   visited->insert(ii);
     650                 :      34693 :   int succ_prior = -1;
     651                 :            : 
     652                 :      34693 :   for (std::set<std::string>::const_iterator pci =
     653                 :      34693 :            ii->precursors().begin();
     654                 :     310156 :        pci != ii->precursors().end();
     655                 :     310156 :        ++pci)
     656                 :            :     {
     657                 :     275463 :       Import_init* succ = this->lookup_init(*pci);
     658                 :     550926 :       if (visited->find(succ) == visited->end())
     659                 :      21646 :         update_init_priority(succ, visited);
     660                 :     324228 :       succ_prior = std::max(succ_prior, succ->priority());
     661                 :            :     }
     662                 :      34693 :   if (ii->priority() <= succ_prior)
     663                 :      34693 :     ii->set_priority(succ_prior + 1);
     664                 :      34693 : }
     665                 :            : 
     666                 :            : void
     667                 :       1404 : Gogo::recompute_init_priorities()
     668                 :            : {
     669                 :       1404 :   std::set<Import_init *> nonroots;
     670                 :            : 
     671                 :      34693 :   for (Import_init_set::const_iterator p =
     672                 :       1404 :            this->imported_init_fns_.begin();
     673                 :      36097 :        p != this->imported_init_fns_.end();
     674                 :      36097 :        ++p)
     675                 :            :     {
     676                 :      34693 :       const Import_init *ii = *p;
     677                 :      34693 :       for (std::set<std::string>::const_iterator pci =
     678                 :      34693 :                ii->precursors().begin();
     679                 :     310156 :            pci != ii->precursors().end();
     680                 :     310156 :            ++pci)
     681                 :            :         {
     682                 :     275463 :           Import_init* ii_init = this->lookup_init(*pci);
     683                 :     275463 :           nonroots.insert(ii_init);
     684                 :            :         }
     685                 :            :     }
     686                 :            : 
     687                 :            :   // Recursively update priorities starting at roots.
     688                 :       2808 :   std::set<const Import_init*> visited;
     689                 :      34693 :   for (Import_init_set::iterator p =
     690                 :       1404 :            this->imported_init_fns_.begin();
     691                 :      36097 :        p != this->imported_init_fns_.end();
     692                 :      36097 :        ++p)
     693                 :            :     {
     694                 :      34693 :       Import_init* ii = *p;
     695                 :      69386 :       if (nonroots.find(ii) != nonroots.end())
     696                 :      21646 :         continue;
     697                 :      13047 :       update_init_priority(ii, &visited);
     698                 :            :     }
     699                 :       1404 : }
     700                 :            : 
     701                 :            : // Add statements to INIT_STMTS which run the initialization
     702                 :            : // functions for imported packages.  This is only used for the "main"
     703                 :            : // package.
     704                 :            : 
     705                 :            : void
     706                 :       1414 : Gogo::init_imports(std::vector<Bstatement*>& init_stmts, Bfunction *bfunction)
     707                 :            : {
     708                 :       1414 :   go_assert(this->is_main_package());
     709                 :            : 
     710                 :       1414 :   if (this->imported_init_fns_.empty())
     711                 :         10 :     return;
     712                 :            : 
     713                 :       1404 :   Location unknown_loc = Linemap::unknown_location();
     714                 :       1404 :   Function_type* func_type =
     715                 :       1404 :       Type::make_function_type(NULL, NULL, NULL, unknown_loc);
     716                 :       1404 :   Btype* fntype = func_type->get_backend_fntype(this);
     717                 :            : 
     718                 :            :   // Recompute init priorities based on a walk of the init graph.
     719                 :       1404 :   recompute_init_priorities();
     720                 :            : 
     721                 :            :   // We must call them in increasing priority order.
     722                 :       2808 :   std::vector<const Import_init*> v;
     723                 :      34693 :   for (Import_init_set::const_iterator p =
     724                 :       1404 :          this->imported_init_fns_.begin();
     725                 :      36097 :        p != this->imported_init_fns_.end();
     726                 :      36097 :        ++p)
     727                 :            :     {
     728                 :            :       // Don't include dummy inits. They are not real functions.
     729                 :      34693 :       if ((*p)->is_dummy())
     730                 :      11059 :         continue;
     731                 :      23634 :       if ((*p)->priority() < 0)
     732                 :          0 :         go_error_at(Linemap::unknown_location(),
     733                 :            :                     "internal error: failed to set init priority for %s",
     734                 :          0 :                     (*p)->package_name().c_str());
     735                 :      23634 :       v.push_back(*p);
     736                 :            :     }
     737                 :       1404 :   std::sort(v.begin(), v.end(), priority_compare);
     738                 :            : 
     739                 :            :   // We build calls to the init functions, which take no arguments.
     740                 :       2808 :   std::vector<Bexpression*> empty_args;
     741                 :       1404 :   for (std::vector<const Import_init*>::const_iterator p = v.begin();
     742                 :      25038 :        p != v.end();
     743                 :      25038 :        ++p)
     744                 :            :     {
     745                 :      23634 :       const Import_init* ii = *p;
     746                 :      47268 :       std::string user_name = ii->package_name() + ".init";
     747                 :      23634 :       const std::string& init_name(ii->init_name());
     748                 :      23634 :       const unsigned int flags =
     749                 :            :         (Backend::function_is_visible
     750                 :            :          | Backend::function_is_declaration
     751                 :            :          | Backend::function_is_inlinable);
     752                 :      23634 :       Bfunction* pfunc = this->backend()->function(fntype, user_name, init_name,
     753                 :      23634 :                                                    flags, unknown_loc);
     754                 :      23634 :       Bexpression* pfunc_code =
     755                 :      23634 :           this->backend()->function_code_expression(pfunc, unknown_loc);
     756                 :      23634 :       Bexpression* pfunc_call =
     757                 :      23634 :           this->backend()->call_expression(bfunction, pfunc_code, empty_args,
     758                 :      23634 :                                            NULL, unknown_loc);
     759                 :      23634 :       init_stmts.push_back(this->backend()->expression_statement(bfunction,
     760                 :      23634 :                                                                  pfunc_call));
     761                 :            :     }
     762                 :            : }
     763                 :            : 
     764                 :            : // Register global variables with the garbage collector.  We need to
     765                 :            : // register all variables which can hold a pointer value.  They become
     766                 :            : // roots during the mark phase.  We build a struct that is easy to
     767                 :            : // hook into a list of roots.
     768                 :            : 
     769                 :            : // type gcRoot struct {
     770                 :            : //      decl    unsafe.Pointer // Pointer to variable.
     771                 :            : //      size    uintptr        // Total size of variable.
     772                 :            : //      ptrdata uintptr        // Length of variable's gcdata.
     773                 :            : //      gcdata  *byte          // Pointer mask.
     774                 :            : // }
     775                 :            : //
     776                 :            : // type gcRootList struct {
     777                 :            : //      next  *gcRootList
     778                 :            : //      count int
     779                 :            : //      roots [...]gcRoot
     780                 :            : // }
     781                 :            : 
     782                 :            : // The last entry in the roots array has a NULL decl field.
     783                 :            : 
     784                 :            : void
     785                 :       3372 : Gogo::register_gc_vars(const std::vector<Named_object*>& var_gc,
     786                 :            :                        std::vector<Bstatement*>& init_stmts,
     787                 :            :                        Bfunction* init_bfn)
     788                 :            : {
     789                 :       3372 :   if (var_gc.empty() && this->gc_roots_.empty())
     790                 :       1610 :     return;
     791                 :            : 
     792                 :       1762 :   Type* pvt = Type::make_pointer_type(Type::make_void_type());
     793                 :       1762 :   Type* uintptr_type = Type::lookup_integer_type("uintptr");
     794                 :       1762 :   Type* byte_type = this->lookup_global("byte")->type_value();
     795                 :       1762 :   Type* pointer_byte_type = Type::make_pointer_type(byte_type);
     796                 :       1762 :   Struct_type* root_type =
     797                 :       1762 :     Type::make_builtin_struct_type(4,
     798                 :            :                                    "decl", pvt,
     799                 :            :                                    "size", uintptr_type,
     800                 :            :                                    "ptrdata", uintptr_type,
     801                 :            :                                    "gcdata", pointer_byte_type);
     802                 :            : 
     803                 :       1762 :   Location builtin_loc = Linemap::predeclared_location();
     804                 :       1762 :   unsigned long roots_len = var_gc.size() + this->gc_roots_.size();
     805                 :       1762 :   Expression* length = Expression::make_integer_ul(roots_len, NULL,
     806                 :            :                                                    builtin_loc);
     807                 :       1762 :   Array_type* root_array_type = Type::make_array_type(root_type, length);
     808                 :       1762 :   root_array_type->set_is_array_incomparable();
     809                 :            : 
     810                 :       1762 :   Type* int_type = Type::lookup_integer_type("int");
     811                 :       1762 :   Struct_type* root_list_type =
     812                 :       1762 :       Type::make_builtin_struct_type(3,
     813                 :            :                                      "next", pvt,
     814                 :            :                                      "count", int_type,
     815                 :            :                                      "roots", root_array_type);
     816                 :            : 
     817                 :            :   // Build an initializer for the roots array.
     818                 :            : 
     819                 :       1762 :   Expression_list* roots_init = new Expression_list();
     820                 :            : 
     821                 :       1762 :   for (std::vector<Named_object*>::const_iterator p = var_gc.begin();
     822                 :      19142 :        p != var_gc.end();
     823                 :      19142 :        ++p)
     824                 :            :     {
     825                 :      17380 :       Expression_list* init = new Expression_list();
     826                 :            : 
     827                 :      17380 :       Location no_loc = (*p)->location();
     828                 :      17380 :       Expression* decl = Expression::make_var_reference(*p, no_loc);
     829                 :      17380 :       Expression* decl_addr =
     830                 :      17380 :           Expression::make_unary(OPERATOR_AND, decl, no_loc);
     831                 :      17380 :       decl_addr->unary_expression()->set_does_not_escape();
     832                 :      17380 :       decl_addr = Expression::make_cast(pvt, decl_addr, no_loc);
     833                 :      17380 :       init->push_back(decl_addr);
     834                 :            : 
     835                 :      17380 :       Expression* size =
     836                 :      17380 :         Expression::make_type_info(decl->type(),
     837                 :            :                                    Expression::TYPE_INFO_SIZE);
     838                 :      17380 :       init->push_back(size);
     839                 :            : 
     840                 :      17380 :       Expression* ptrdata =
     841                 :      17380 :         Expression::make_type_info(decl->type(),
     842                 :            :                                    Expression::TYPE_INFO_BACKEND_PTRDATA);
     843                 :      17380 :       init->push_back(ptrdata);
     844                 :            : 
     845                 :      17380 :       Expression* gcdata = Expression::make_ptrmask_symbol(decl->type());
     846                 :      17380 :       init->push_back(gcdata);
     847                 :            : 
     848                 :      17380 :       Expression* root_ctor =
     849                 :      17380 :           Expression::make_struct_composite_literal(root_type, init, no_loc);
     850                 :      17380 :       roots_init->push_back(root_ctor);
     851                 :            :     }
     852                 :            : 
     853                 :       1762 :   for (std::vector<Expression*>::const_iterator p = this->gc_roots_.begin();
     854                 :       4406 :        p != this->gc_roots_.end();
     855                 :       4406 :        ++p)
     856                 :            :     {
     857                 :       2644 :       Expression_list *init = new Expression_list();
     858                 :            : 
     859                 :       2644 :       Expression* expr = *p;
     860                 :       2644 :       Location eloc = expr->location();
     861                 :       2644 :       init->push_back(Expression::make_cast(pvt, expr, eloc));
     862                 :            : 
     863                 :       2644 :       Type* type = expr->type()->points_to();
     864                 :       2644 :       go_assert(type != NULL);
     865                 :            : 
     866                 :       2644 :       Expression* size =
     867                 :       2644 :         Expression::make_type_info(type,
     868                 :            :                                    Expression::TYPE_INFO_SIZE);
     869                 :       2644 :       init->push_back(size);
     870                 :            : 
     871                 :       2644 :       Expression* ptrdata =
     872                 :       2644 :         Expression::make_type_info(type,
     873                 :            :                                    Expression::TYPE_INFO_BACKEND_PTRDATA);
     874                 :       2644 :       init->push_back(ptrdata);
     875                 :            : 
     876                 :       2644 :       Expression* gcdata = Expression::make_ptrmask_symbol(type);
     877                 :       2644 :       init->push_back(gcdata);
     878                 :            : 
     879                 :       2644 :       Expression* root_ctor =
     880                 :       2644 :         Expression::make_struct_composite_literal(root_type, init, eloc);
     881                 :       2644 :       roots_init->push_back(root_ctor);
     882                 :            :     }
     883                 :            : 
     884                 :            :   // Build a constructor for the struct.
     885                 :            : 
     886                 :       1762 :   Expression_list* root_list_init = new Expression_list();
     887                 :       1762 :   root_list_init->push_back(Expression::make_nil(builtin_loc));
     888                 :       1762 :   root_list_init->push_back(Expression::make_integer_ul(roots_len, int_type,
     889                 :            :                                                         builtin_loc));
     890                 :            : 
     891                 :       1762 :   Expression* roots_ctor =
     892                 :       1762 :       Expression::make_array_composite_literal(root_array_type, roots_init,
     893                 :            :                                                builtin_loc);
     894                 :       1762 :   root_list_init->push_back(roots_ctor);
     895                 :            : 
     896                 :       1762 :   Expression* root_list_ctor =
     897                 :       1762 :       Expression::make_struct_composite_literal(root_list_type, root_list_init,
     898                 :            :                                                 builtin_loc);
     899                 :            : 
     900                 :       1762 :   Expression* root_addr = Expression::make_unary(OPERATOR_AND, root_list_ctor,
     901                 :            :                                                  builtin_loc);
     902                 :       1762 :   root_addr->unary_expression()->set_is_gc_root();
     903                 :       1762 :   Expression* register_roots = Runtime::make_call(Runtime::REGISTER_GC_ROOTS,
     904                 :            :                                                   builtin_loc, 1, root_addr);
     905                 :            : 
     906                 :       1762 :   Translate_context context(this, NULL, NULL, NULL);
     907                 :       1762 :   Bexpression* bcall = register_roots->get_backend(&context);
     908                 :       1762 :   init_stmts.push_back(this->backend()->expression_statement(init_bfn, bcall));
     909                 :            : }
     910                 :            : 
     911                 :            : // Build the list of type descriptors defined in this package. This is to help
     912                 :            : // the reflect package to find compiler-generated types.
     913                 :            : 
     914                 :            : // type typeDescriptorList struct {
     915                 :            : //       count int
     916                 :            : //       types [...]unsafe.Pointer
     917                 :            : // }
     918                 :            : 
     919                 :            : static Struct_type*
     920                 :       4786 : type_descriptor_list_type(unsigned long len)
     921                 :            : {
     922                 :       4786 :   Location builtin_loc = Linemap::predeclared_location();
     923                 :       4786 :   Type* int_type = Type::lookup_integer_type("int");
     924                 :       4786 :   Type* ptr_type = Type::make_pointer_type(Type::make_void_type());
     925                 :            :   // Avoid creating zero-length type.
     926                 :       4786 :   unsigned long nelems = (len != 0 ? len : 1);
     927                 :       4786 :   Expression* len_expr = Expression::make_integer_ul(nelems, NULL,
     928                 :            :                                                      builtin_loc);
     929                 :       4786 :   Array_type* array_type = Type::make_array_type(ptr_type, len_expr);
     930                 :       4786 :   array_type->set_is_array_incomparable();
     931                 :       4786 :   Struct_type* list_type =
     932                 :       4786 :     Type::make_builtin_struct_type(2, "count", int_type,
     933                 :            :                                    "types", array_type);
     934                 :       4786 :   return list_type;
     935                 :            : }
     936                 :            : 
     937                 :            : void
     938                 :       3372 : Gogo::build_type_descriptor_list()
     939                 :            : {
     940                 :            :   // Create the list type
     941                 :       3372 :   Location builtin_loc = Linemap::predeclared_location();
     942                 :       3372 :   unsigned long len = this->type_descriptors_.size();
     943                 :       3372 :   Struct_type* list_type = type_descriptor_list_type(len);
     944                 :       3372 :   Btype* bt = list_type->get_backend(this);
     945                 :       3372 :   Btype* bat = list_type->field(1)->type()->get_backend(this);
     946                 :            : 
     947                 :            :   // Create the variable
     948                 :       3372 :   std::string name = this->type_descriptor_list_symbol(this->pkgpath_symbol());
     949                 :       3372 :   Bvariable* bv = this->backend()->implicit_variable(name, name, bt,
     950                 :            :                                                      false, true, false,
     951                 :       3372 :                                                      0);
     952                 :            : 
     953                 :            :   // Build the initializer
     954                 :       6744 :   std::vector<unsigned long> indexes;
     955                 :       3372 :   std::vector<Bexpression*> vals;
     956                 :       3372 :   std::vector<Type*>::iterator p = this->type_descriptors_.begin();
     957                 :     153937 :   for (unsigned long i = 0; i < len; ++i, ++p)
     958                 :            :     {
     959                 :     150565 :       Bexpression* bexpr = (*p)->type_descriptor_pointer(this,
     960                 :     150565 :                                                          builtin_loc);
     961                 :     150565 :       indexes.push_back(i);
     962                 :     150565 :       vals.push_back(bexpr);
     963                 :            :     }
     964                 :       3372 :   Bexpression* barray =
     965                 :       3372 :     this->backend()->array_constructor_expression(bat, indexes, vals,
     966                 :       3372 :                                                   builtin_loc);
     967                 :            : 
     968                 :       3372 :   Translate_context context(this, NULL, NULL, NULL);
     969                 :       6744 :   std::vector<Bexpression*> fields;
     970                 :       3372 :   Expression* len_expr = Expression::make_integer_ul(len, NULL,
     971                 :            :                                                      builtin_loc);
     972                 :       3372 :   fields.push_back(len_expr->get_backend(&context));
     973                 :       3372 :   fields.push_back(barray);
     974                 :       3372 :   Bexpression* binit =
     975                 :       3372 :     this->backend()->constructor_expression(bt, fields, builtin_loc);
     976                 :            : 
     977                 :       3372 :   this->backend()->implicit_variable_set_init(bv, name, bt, false,
     978                 :       3372 :                                               true, false, binit);
     979                 :       3372 : }
     980                 :            : 
     981                 :            : // Register the type descriptors with the runtime.  This is to help
     982                 :            : // the reflect package to find compiler-generated types.
     983                 :            : 
     984                 :            : void
     985                 :       1414 : Gogo::register_type_descriptors(std::vector<Bstatement*>& init_stmts,
     986                 :            :                                 Bfunction* init_bfn)
     987                 :            : {
     988                 :            :   // Create the list type
     989                 :       1414 :   Location builtin_loc = Linemap::predeclared_location();
     990                 :       1414 :   Struct_type* list_type = type_descriptor_list_type(1);
     991                 :       1414 :   Btype* bt = list_type->get_backend(this);
     992                 :            : 
     993                 :            :   // Collect type lists from transitive imports.
     994                 :       1414 :   std::vector<std::string> list_names;
     995                 :       1414 :   for (Import_init_set::iterator it = this->imported_init_fns_.begin();
     996                 :      36107 :        it != this->imported_init_fns_.end();
     997                 :      36107 :        ++it)
     998                 :            :     {
     999                 :      34693 :       std::string pkgpath =
    1000                 :      69386 :         this->pkgpath_from_init_fn_name((*it)->init_name());
    1001                 :      54092 :       list_names.push_back(this->type_descriptor_list_symbol(pkgpath));
    1002                 :            :     }
    1003                 :            :   // Add the main package itself.
    1004                 :       1414 :   list_names.push_back(this->type_descriptor_list_symbol("main"));
    1005                 :            : 
    1006                 :            :   // Build a list of lists.
    1007                 :       2828 :   std::vector<unsigned long> indexes;
    1008                 :       1414 :   std::vector<Bexpression*> vals;
    1009                 :       1414 :   unsigned long i = 0;
    1010                 :       1414 :   for (std::vector<std::string>::iterator p = list_names.begin();
    1011                 :      37521 :        p != list_names.end();
    1012                 :      37521 :        ++p)
    1013                 :            :     {
    1014                 :      36107 :       Bvariable* bv =
    1015                 :      36107 :         this->backend()->implicit_variable_reference(*p, *p, bt);
    1016                 :      36107 :       Bexpression* bexpr = this->backend()->var_expression(bv, builtin_loc);
    1017                 :      36107 :       bexpr = this->backend()->address_expression(bexpr, builtin_loc);
    1018                 :            : 
    1019                 :      36107 :       indexes.push_back(i);
    1020                 :      36107 :       vals.push_back(bexpr);
    1021                 :      36107 :       i++;
    1022                 :            :     }
    1023                 :       1414 :   Expression* len_expr = Expression::make_integer_ul(i, NULL, builtin_loc);
    1024                 :       1414 :   Type* list_ptr_type = Type::make_pointer_type(list_type);
    1025                 :       1414 :   Type* list_array_type = Type::make_array_type(list_ptr_type, len_expr);
    1026                 :       1414 :   Btype* bat = list_array_type->get_backend(this);
    1027                 :       1414 :   Bexpression* barray =
    1028                 :       1414 :     this->backend()->array_constructor_expression(bat, indexes, vals,
    1029                 :       1414 :                                                   builtin_loc);
    1030                 :            : 
    1031                 :            :   // Create a variable holding the list.
    1032                 :       2828 :   std::string name = this->typelists_symbol();
    1033                 :       1414 :   Bvariable* bv = this->backend()->implicit_variable(name, name, bat,
    1034                 :            :                                                      true, true, false,
    1035                 :       1414 :                                                      0);
    1036                 :       1414 :   this->backend()->implicit_variable_set_init(bv, name, bat, true, true,
    1037                 :       1414 :                                               false, barray);
    1038                 :            : 
    1039                 :            :   // Build the call in main package's init function.
    1040                 :       1414 :   Translate_context context(this, NULL, NULL, NULL);
    1041                 :       1414 :   Bexpression* bexpr = this->backend()->var_expression(bv, builtin_loc);
    1042                 :       1414 :   bexpr = this->backend()->address_expression(bexpr, builtin_loc);
    1043                 :       1414 :   Type* array_ptr_type = Type::make_pointer_type(list_array_type);
    1044                 :       1414 :   Expression* expr = Expression::make_backend(bexpr, array_ptr_type,
    1045                 :            :                                               builtin_loc);
    1046                 :       1414 :   expr = Runtime::make_call(Runtime::REGISTER_TYPE_DESCRIPTORS,
    1047                 :            :                             builtin_loc, 2, len_expr->copy(), expr);
    1048                 :       1414 :   Bexpression* bcall = expr->get_backend(&context);
    1049                 :       1414 :   init_stmts.push_back(this->backend()->expression_statement(init_bfn,
    1050                 :       1414 :                                                              bcall));
    1051                 :       1414 : }
    1052                 :            : 
    1053                 :            : // Build the decl for the initialization function.
    1054                 :            : 
    1055                 :            : Named_object*
    1056                 :       2692 : Gogo::initialization_function_decl()
    1057                 :            : {
    1058                 :       2692 :   std::string name = this->get_init_fn_name();
    1059                 :       2692 :   Location loc = this->package_->location();
    1060                 :            : 
    1061                 :       2692 :   Function_type* fntype = Type::make_function_type(NULL, NULL, NULL, loc);
    1062                 :       2692 :   Function* initfn = new Function(fntype, NULL, NULL, loc);
    1063                 :       2692 :   return Named_object::make_function(name, NULL, initfn);
    1064                 :            : }
    1065                 :            : 
    1066                 :            : // Create the magic initialization function.  CODE_STMT is the
    1067                 :            : // code that it needs to run.
    1068                 :            : 
    1069                 :            : Named_object*
    1070                 :       2692 : Gogo::create_initialization_function(Named_object* initfn,
    1071                 :            :                                      Bstatement* code_stmt)
    1072                 :            : {
    1073                 :            :   // Make sure that we thought we needed an initialization function,
    1074                 :            :   // as otherwise we will not have reported it in the export data.
    1075                 :       2692 :   go_assert(this->is_main_package() || this->need_init_fn_);
    1076                 :            : 
    1077                 :       2692 :   if (initfn == NULL)
    1078                 :        216 :     initfn = this->initialization_function_decl();
    1079                 :            : 
    1080                 :            :   // Bind the initialization function code to a block.
    1081                 :       2692 :   Bfunction* fndecl = initfn->func_value()->get_or_make_decl(this, initfn);
    1082                 :       2692 :   Location pkg_loc = this->package_->location();
    1083                 :       2692 :   std::vector<Bvariable*> vars;
    1084                 :       2692 :   this->backend()->block(fndecl, NULL, vars, pkg_loc, pkg_loc);
    1085                 :            : 
    1086                 :       2692 :   if (!this->backend()->function_set_body(fndecl, code_stmt))
    1087                 :            :     {
    1088                 :         22 :       go_assert(saw_errors());
    1089                 :            :       return NULL;
    1090                 :            :     }
    1091                 :            :   return initfn;
    1092                 :            : }
    1093                 :            : 
    1094                 :            : // Given an expression, collect all the global variables defined in
    1095                 :            : // this package that it references.
    1096                 :            : 
    1097                 :            : class Find_vars : public Traverse
    1098                 :            : {
    1099                 :            :  private:
    1100                 :            :   // The list of variables we accumulate.
    1101                 :            :   typedef Unordered_set(Named_object*) Vars;
    1102                 :            : 
    1103                 :            :   // A hash table we use to avoid looping.  The index is a
    1104                 :            :   // Named_object* or a Temporary_statement*.  We only look through
    1105                 :            :   // objects defined in this package.
    1106                 :            :   typedef Unordered_set(const void*) Seen_objects;
    1107                 :            : 
    1108                 :            :  public:
    1109                 :      28840 :   Find_vars()
    1110                 :      28840 :     : Traverse(traverse_expressions),
    1111                 :      28840 :       vars_(), seen_objects_()
    1112                 :      28840 :   { }
    1113                 :            : 
    1114                 :            :   // An iterator through the variables found, after the traversal.
    1115                 :            :   typedef Vars::const_iterator const_iterator;
    1116                 :            : 
    1117                 :            :   const_iterator
    1118                 :      28840 :   begin() const
    1119                 :      28840 :   { return this->vars_.begin(); }
    1120                 :            : 
    1121                 :            :   const_iterator
    1122                 :      57684 :   end() const
    1123                 :      57684 :   { return this->vars_.end(); }
    1124                 :            : 
    1125                 :            :   int
    1126                 :            :   expression(Expression**);
    1127                 :            : 
    1128                 :            :  private:
    1129                 :            :   // Accumulated variables.
    1130                 :            :   Vars vars_;
    1131                 :            :   // Objects we have already seen.
    1132                 :            :   Seen_objects seen_objects_;
    1133                 :            : };
    1134                 :            : 
    1135                 :            : // Collect global variables referenced by EXPR.  Look through function
    1136                 :            : // calls and variable initializations.
    1137                 :            : 
    1138                 :            : int
    1139                 :    7588750 : Find_vars::expression(Expression** pexpr)
    1140                 :            : {
    1141                 :    7588750 :   Expression* e = *pexpr;
    1142                 :            : 
    1143                 :    7588750 :   Var_expression* ve = e->var_expression();
    1144                 :     808388 :   if (ve != NULL)
    1145                 :            :     {
    1146                 :     808388 :       Named_object* v = ve->named_object();
    1147                 :     808388 :       if (!v->is_variable() || v->package() != NULL)
    1148                 :            :         {
    1149                 :            :           // This is a result parameter or a variable defined in a
    1150                 :            :           // different package.  Either way we don't care about it.
    1151                 :     652809 :           return TRAVERSE_CONTINUE;
    1152                 :            :         }
    1153                 :            : 
    1154                 :     713696 :       std::pair<Seen_objects::iterator, bool> ins =
    1155                 :     713696 :         this->seen_objects_.insert(v);
    1156                 :     713696 :       if (!ins.second)
    1157                 :            :         {
    1158                 :            :           // We've seen this variable before.
    1159                 :            :           return TRAVERSE_CONTINUE;
    1160                 :            :         }
    1161                 :            : 
    1162                 :     155579 :       if (v->var_value()->is_global())
    1163                 :      28847 :         this->vars_.insert(v);
    1164                 :            : 
    1165                 :     155579 :       Expression* init = v->var_value()->init();
    1166                 :     155579 :       if (init != NULL)
    1167                 :            :         {
    1168                 :      61413 :           if (Expression::traverse(&init, this) == TRAVERSE_EXIT)
    1169                 :            :             return TRAVERSE_EXIT;
    1170                 :            :         }
    1171                 :            :     }
    1172                 :            : 
    1173                 :            :   // We traverse the code of any function or bound method we see.  Note that
    1174                 :            :   // this means that we will traverse the code of a function or bound method
    1175                 :            :   // whose address is taken even if it is not called.
    1176                 :    6935940 :   Func_expression* fe = e->func_expression();
    1177                 :    6935940 :   Bound_method_expression* bme = e->bound_method_expression();
    1178                 :    6935940 :   if (fe != NULL || bme != NULL)
    1179                 :            :     {
    1180                 :     386393 :       const Named_object* f = fe != NULL ? fe->named_object() : bme->function();
    1181                 :     386393 :       if (f->is_function() && f->package() == NULL)
    1182                 :            :         {
    1183                 :     135244 :           std::pair<Seen_objects::iterator, bool> ins =
    1184                 :     135244 :             this->seen_objects_.insert(f);
    1185                 :     135244 :           if (ins.second)
    1186                 :            :             {
    1187                 :            :               // This is the first time we have seen this name.
    1188                 :      36272 :               if (f->func_value()->block()->traverse(this) == TRAVERSE_EXIT)
    1189                 :          0 :                 return TRAVERSE_EXIT;
    1190                 :            :             }
    1191                 :            :         }
    1192                 :            :     }
    1193                 :            : 
    1194                 :    6935940 :   Temporary_reference_expression* tre = e->temporary_reference_expression();
    1195                 :     749700 :   if (tre != NULL)
    1196                 :            :     {
    1197                 :     749700 :       Temporary_statement* ts = tre->statement();
    1198                 :     749700 :       Expression* init = ts->init();
    1199                 :     749700 :       if (init != NULL)
    1200                 :            :         {
    1201                 :     699388 :           std::pair<Seen_objects::iterator, bool> ins =
    1202                 :     699388 :             this->seen_objects_.insert(ts);
    1203                 :     699388 :           if (ins.second)
    1204                 :            :             {
    1205                 :            :               // This is the first time we have seen this temporary
    1206                 :            :               // statement.
    1207                 :     354892 :               if (Expression::traverse(&init, this) == TRAVERSE_EXIT)
    1208                 :          0 :                 return TRAVERSE_EXIT;
    1209                 :            :             }
    1210                 :            :         }
    1211                 :            :     }
    1212                 :            : 
    1213                 :            :   return TRAVERSE_CONTINUE;
    1214                 :            : }
    1215                 :            : 
    1216                 :            : // Return true if EXPR, PREINIT, or DEP refers to VAR.
    1217                 :            : 
    1218                 :            : static bool
    1219                 :      17182 : expression_requires(Expression* expr, Block* preinit, Named_object* dep,
    1220                 :            :                     Named_object* var)
    1221                 :            : {
    1222                 :      17182 :   Find_vars find_vars;
    1223                 :      17182 :   if (expr != NULL)
    1224                 :      17182 :     Expression::traverse(&expr, &find_vars);
    1225                 :      17182 :   if (preinit != NULL)
    1226                 :        766 :     preinit->traverse(&find_vars);
    1227                 :      17182 :   if (dep != NULL)
    1228                 :            :     {
    1229                 :          0 :       Expression* init = dep->var_value()->init();
    1230                 :          0 :       if (init != NULL)
    1231                 :          0 :         Expression::traverse(&init, &find_vars);
    1232                 :          0 :       if (dep->var_value()->has_pre_init())
    1233                 :          0 :         dep->var_value()->preinit()->traverse(&find_vars);
    1234                 :            :     }
    1235                 :            : 
    1236                 :      26495 :   for (Find_vars::const_iterator p = find_vars.begin();
    1237                 :      26495 :        p != find_vars.end();
    1238                 :      26495 :        ++p)
    1239                 :            :     {
    1240                 :       9316 :       if (*p == var)
    1241                 :      17182 :         return true;
    1242                 :            :     }
    1243                 :            :   return false;
    1244                 :            : }
    1245                 :            : 
    1246                 :            : // Sort variable initializations.  If the initialization expression
    1247                 :            : // for variable A refers directly or indirectly to the initialization
    1248                 :            : // expression for variable B, then we must initialize B before A.
    1249                 :            : 
    1250                 :            : class Var_init
    1251                 :            : {
    1252                 :            :  public:
    1253                 :            :   Var_init()
    1254                 :            :     : var_(NULL), init_(NULL), refs_(NULL), dep_count_(0)
    1255                 :            :   { }
    1256                 :            : 
    1257                 :      11658 :   Var_init(Named_object* var, Bstatement* init)
    1258                 :      11658 :     : var_(var), init_(init), refs_(NULL), dep_count_(0)
    1259                 :            :   { }
    1260                 :            : 
    1261                 :            :   // Return the variable.
    1262                 :            :   Named_object*
    1263                 :      41331 :   var() const
    1264                 :      41331 :   { return this->var_; }
    1265                 :            : 
    1266                 :            :   // Return the initialization expression.
    1267                 :            :   Bstatement*
    1268                 :      11658 :   init() const
    1269                 :      11658 :   { return this->init_; }
    1270                 :            : 
    1271                 :            :   // Add a reference.
    1272                 :            :   void
    1273                 :            :   add_ref(Named_object* var);
    1274                 :            : 
    1275                 :            :   // The variables which this variable's initializers refer to.
    1276                 :            :   const std::vector<Named_object*>*
    1277                 :      16616 :   refs()
    1278                 :      16616 :   { return this->refs_; }
    1279                 :            : 
    1280                 :            :   // Clear the references, if any.
    1281                 :            :   void
    1282                 :            :   clear_refs();
    1283                 :            : 
    1284                 :            :   // Return the number of remaining dependencies.
    1285                 :            :   size_t
    1286                 :      15508 :   dep_count() const
    1287                 :      15508 :   { return this->dep_count_; }
    1288                 :            : 
    1289                 :            :   // Increment the number of dependencies.
    1290                 :            :   void
    1291                 :       4958 :   add_dependency()
    1292                 :       4958 :   { ++this->dep_count_; }
    1293                 :            : 
    1294                 :            :   // Decrement the number of dependencies.
    1295                 :            :   void
    1296                 :       4958 :   remove_dependency()
    1297                 :       4958 :   { --this->dep_count_; }
    1298                 :            : 
    1299                 :            :  private:
    1300                 :            :   // The variable being initialized.
    1301                 :            :   Named_object* var_;
    1302                 :            :   // The backend initialization statement.
    1303                 :            :   Bstatement* init_;
    1304                 :            :   // Variables this refers to.
    1305                 :            :   std::vector<Named_object*>* refs_;
    1306                 :            :   // The number of initializations this is dependent on.  A variable
    1307                 :            :   // initialization should not be emitted if any of its dependencies
    1308                 :            :   // have not yet been resolved.
    1309                 :            :   size_t dep_count_;
    1310                 :            : };
    1311                 :            : 
    1312                 :            : // Add a reference.
    1313                 :            : 
    1314                 :            : void
    1315                 :      19531 : Var_init::add_ref(Named_object* var)
    1316                 :            : {
    1317                 :      19531 :   if (this->refs_ == NULL)
    1318                 :      11221 :     this->refs_ = new std::vector<Named_object*>;
    1319                 :      19531 :   this->refs_->push_back(var);
    1320                 :      19531 : }
    1321                 :            : 
    1322                 :            : // Clear the references, if any.
    1323                 :            : 
    1324                 :            : void
    1325                 :      11658 : Var_init::clear_refs()
    1326                 :            : {
    1327                 :      11658 :   if (this->refs_ != NULL)
    1328                 :            :     {
    1329                 :      22442 :       delete this->refs_;
    1330                 :      11221 :       this->refs_ = NULL;
    1331                 :            :     }
    1332                 :      11658 : }
    1333                 :            : 
    1334                 :            : // For comparing Var_init keys in a map.
    1335                 :            : 
    1336                 :            : inline bool
    1337                 :      18015 : operator<(const Var_init& v1, const Var_init& v2)
    1338                 :      18015 : { return v1.var()->name() < v2.var()->name(); }
    1339                 :            : 
    1340                 :            : typedef std::list<Var_init> Var_inits;
    1341                 :            : 
    1342                 :            : // Sort the variable initializations.  The rule we follow is that we
    1343                 :            : // emit them in the order they appear in the array, except that if the
    1344                 :            : // initialization expression for a variable V1 depends upon another
    1345                 :            : // variable V2 then we initialize V1 after V2.
    1346                 :            : 
    1347                 :            : static void
    1348                 :       1531 : sort_var_inits(Gogo* gogo, Var_inits* var_inits)
    1349                 :            : {
    1350                 :       1531 :   if (var_inits->empty())
    1351                 :          0 :     return;
    1352                 :            : 
    1353                 :       3062 :   std::map<Named_object*, Var_init*> var_to_init;
    1354                 :            : 
    1355                 :            :   // A mapping from a variable initialization to a set of
    1356                 :            :   // variable initializations that depend on it.
    1357                 :       1531 :   typedef std::map<Var_init, std::set<Var_init*> > Init_deps;
    1358                 :       1531 :   Init_deps init_deps;
    1359                 :       1531 :   bool init_loop = false;
    1360                 :            : 
    1361                 :            :   // Compute all variable references.
    1362                 :      13189 :   for (Var_inits::iterator pvar = var_inits->begin();
    1363                 :      13189 :        pvar != var_inits->end();
    1364                 :      13189 :        ++pvar)
    1365                 :            :     {
    1366                 :      11658 :       Named_object* var = pvar->var();
    1367                 :      11658 :       var_to_init[var] = &*pvar;
    1368                 :            : 
    1369                 :      23316 :       Find_vars find_vars;
    1370                 :      11658 :       Expression* init = var->var_value()->init();
    1371                 :      11658 :       if (init != NULL)
    1372                 :        751 :         Expression::traverse(&init, &find_vars);
    1373                 :      11658 :       if (var->var_value()->has_pre_init())
    1374                 :      11005 :         var->var_value()->preinit()->traverse(&find_vars);
    1375                 :      11658 :       Named_object* dep = gogo->var_depends_on(var->var_value());
    1376                 :         33 :       if (dep != NULL)
    1377                 :            :         {
    1378                 :         33 :           Expression* dinit = dep->var_value()->init();
    1379                 :         33 :           if (dinit != NULL)
    1380                 :          8 :             Expression::traverse(&dinit, &find_vars);
    1381                 :         33 :           if (dep->var_value()->has_pre_init())
    1382                 :         33 :             dep->var_value()->preinit()->traverse(&find_vars);
    1383                 :            :         }
    1384                 :      31189 :       for (Find_vars::const_iterator p = find_vars.begin();
    1385                 :      31189 :            p != find_vars.end();
    1386                 :      31189 :            ++p)
    1387                 :      19531 :         pvar->add_ref(*p);
    1388                 :            :     }
    1389                 :            : 
    1390                 :            :   // Add dependencies to init_deps, and check for cycles.
    1391                 :      13189 :   for (Var_inits::iterator pvar = var_inits->begin();
    1392                 :      13189 :        pvar != var_inits->end();
    1393                 :      13189 :        ++pvar)
    1394                 :            :     {
    1395                 :      11658 :       Named_object* var = pvar->var();
    1396                 :            : 
    1397                 :      11658 :       const std::vector<Named_object*>* refs = pvar->refs();
    1398                 :      11658 :       if (refs == NULL)
    1399                 :        437 :         continue;
    1400                 :      30752 :       for (std::vector<Named_object*>::const_iterator pdep = refs->begin();
    1401                 :      30752 :            pdep != refs->end();
    1402                 :      30752 :            ++pdep)
    1403                 :            :         {
    1404                 :      19531 :           Named_object* dep = *pdep;
    1405                 :      19531 :           if (var == dep)
    1406                 :            :             {
    1407                 :            :               // This is a reference from a variable to itself, which
    1408                 :            :               // may indicate a loop.  We only report an error if
    1409                 :            :               // there is an initializer and there is no dependency.
    1410                 :            :               // When there is no initializer, it means that the
    1411                 :            :               // preinitializer sets the variable, which will appear
    1412                 :            :               // to be a loop here.
    1413                 :      10908 :               if (var->var_value()->init() != NULL
    1414                 :      10908 :                   && gogo->var_depends_on(var->var_value()) == NULL)
    1415                 :          1 :                 go_error_at(var->location(),
    1416                 :            :                             ("initialization expression for %qs "
    1417                 :            :                              "depends upon itself"),
    1418                 :          2 :                             var->message_name().c_str());
    1419                 :            : 
    1420                 :      14615 :               continue;
    1421                 :            :             }
    1422                 :            : 
    1423                 :       8623 :           Var_init* dep_init = var_to_init[dep];
    1424                 :       8623 :           if (dep_init == NULL)
    1425                 :            :             {
    1426                 :            :               // This is a dependency on some variable that doesn't
    1427                 :            :               // have an initializer, so for purposes of
    1428                 :            :               // initialization ordering this is irrelevant.
    1429                 :       3665 :               continue;
    1430                 :            :             }
    1431                 :            : 
    1432                 :       4958 :           init_deps[*dep_init].insert(&(*pvar));
    1433                 :       4958 :           pvar->add_dependency();
    1434                 :            : 
    1435                 :            :           // Check for cycles.
    1436                 :       4958 :           const std::vector<Named_object*>* deprefs = dep_init->refs();
    1437                 :       4958 :           if (deprefs == NULL)
    1438                 :         42 :             continue;
    1439                 :       7605 :           for (std::vector<Named_object*>::const_iterator pdepdep =
    1440                 :       4916 :                  deprefs->begin();
    1441                 :      12521 :                pdepdep != deprefs->end();
    1442                 :      12521 :                ++pdepdep)
    1443                 :            :             {
    1444                 :       7605 :               if (*pdepdep == var)
    1445                 :            :                 {
    1446                 :          0 :                   go_error_at(var->location(),
    1447                 :            :                               ("initialization expressions for %qs and "
    1448                 :            :                                "%qs depend upon each other"),
    1449                 :          0 :                               var->message_name().c_str(),
    1450                 :          0 :                               dep->message_name().c_str());
    1451                 :          0 :                   go_inform(dep->location(), "%qs defined here",
    1452                 :          0 :                             dep->message_name().c_str());
    1453                 :          0 :                   init_loop = true;
    1454                 :          0 :                   break;
    1455                 :            :                 }
    1456                 :            :             }
    1457                 :            :         }
    1458                 :            :     }
    1459                 :            : 
    1460                 :       1531 :   var_to_init.clear();
    1461                 :      13189 :   for (Var_inits::iterator pvar = var_inits->begin();
    1462                 :      13189 :        pvar != var_inits->end();
    1463                 :      13189 :        ++pvar)
    1464                 :      11658 :     pvar->clear_refs();
    1465                 :            : 
    1466                 :            :   // If there are no dependencies then the declaration order is sorted.
    1467                 :       1531 :   if (!init_deps.empty() && !init_loop)
    1468                 :            :     {
    1469                 :            :       // Otherwise, sort variable initializations by emitting all variables with
    1470                 :            :       // no dependencies in declaration order. VAR_INITS is already in
    1471                 :            :       // declaration order.
    1472                 :        514 :       Var_inits ready;
    1473                 :       7048 :       while (!var_inits->empty())
    1474                 :            :         {
    1475                 :      15508 :           Var_inits::iterator v1;;
    1476                 :      15508 :           for (v1 = var_inits->begin(); v1 != var_inits->end(); ++v1)
    1477                 :            :             {
    1478                 :      15508 :               if (v1->dep_count() == 0)
    1479                 :            :                 break;
    1480                 :            :             }
    1481                 :       6791 :           go_assert(v1 != var_inits->end());
    1482                 :            : 
    1483                 :            :           // V1 either has no dependencies or its dependencies have already
    1484                 :            :           // been emitted, add it to READY next.  When V1 is emitted, remove
    1485                 :            :           // a dependency from each V that depends on V1.
    1486                 :       6791 :           ready.splice(ready.end(), *var_inits, v1);
    1487                 :            : 
    1488                 :       6791 :           Init_deps::iterator p1 = init_deps.find(*v1);
    1489                 :       6791 :           if (p1 != init_deps.end())
    1490                 :            :             {
    1491                 :       7500 :               std::set<Var_init*> resolved = p1->second;
    1492                 :       8708 :               for (std::set<Var_init*>::iterator pv = resolved.begin();
    1493                 :       8708 :                    pv != resolved.end();
    1494                 :       8708 :                    ++pv)
    1495                 :       4958 :                 (*pv)->remove_dependency();
    1496                 :       3750 :               init_deps.erase(p1);
    1497                 :            :             }
    1498                 :            :         }
    1499                 :        257 :       var_inits->swap(ready);
    1500                 :        257 :       go_assert(init_deps.empty());
    1501                 :            :     }
    1502                 :            : }
    1503                 :            : 
    1504                 :            : // Give an error if the initialization expression for VAR depends on
    1505                 :            : // itself.  We only check if INIT is not NULL and there is no
    1506                 :            : // dependency; when INIT is NULL, it means that PREINIT sets VAR,
    1507                 :            : // which we will interpret as a loop.
    1508                 :            : 
    1509                 :            : void
    1510                 :      10903 : Gogo::check_self_dep(Named_object* var)
    1511                 :            : {
    1512                 :      10903 :   Expression* init = var->var_value()->init();
    1513                 :      10903 :   Block* preinit = var->var_value()->preinit();
    1514                 :      10903 :   Named_object* dep = this->var_depends_on(var->var_value());
    1515                 :      10903 :   if (init != NULL
    1516                 :      10903 :       && dep == NULL
    1517                 :      10903 :       && expression_requires(init, preinit, NULL, var))
    1518                 :          3 :     go_error_at(var->location(),
    1519                 :            :                 "initialization expression for %qs depends upon itself",
    1520                 :          6 :                 var->message_name().c_str());
    1521                 :      10903 : }
    1522                 :            : 
    1523                 :            : // Write out the global definitions.
    1524                 :            : 
    1525                 :            : void
    1526                 :       3372 : Gogo::write_globals()
    1527                 :            : {
    1528                 :       3372 :   this->build_interface_method_tables();
    1529                 :            : 
    1530                 :       3372 :   Bindings* bindings = this->current_bindings();
    1531                 :            : 
    1532                 :     386910 :   for (Bindings::const_declarations_iterator p = bindings->begin_declarations();
    1533                 :     386910 :        p != bindings->end_declarations();
    1534                 :     386910 :        ++p)
    1535                 :            :     {
    1536                 :            :       // If any function declarations needed a descriptor, make sure
    1537                 :            :       // we build it.
    1538                 :     383538 :       Named_object* no = p->second;
    1539                 :     383538 :       if (no->is_function_declaration())
    1540                 :       3556 :         no->func_declaration_value()->build_backend_descriptor(this);
    1541                 :            :     }
    1542                 :            : 
    1543                 :            :   // Lists of globally declared types, variables, constants, and functions
    1544                 :            :   // that must be defined.
    1545                 :       3372 :   std::vector<Btype*> type_decls;
    1546                 :       3372 :   std::vector<Bvariable*> var_decls;
    1547                 :       3372 :   std::vector<Bexpression*> const_decls;
    1548                 :       3372 :   std::vector<Bfunction*> func_decls;
    1549                 :            : 
    1550                 :            :   // The init function declaration and associated Bfunction, if necessary.
    1551                 :       3372 :   Named_object* init_fndecl = NULL;
    1552                 :       3372 :   Bfunction* init_bfn = NULL;
    1553                 :            : 
    1554                 :       3372 :   std::vector<Bstatement*> init_stmts;
    1555                 :       3372 :   std::vector<Bstatement*> var_init_stmts;
    1556                 :            : 
    1557                 :       3372 :   if (this->is_main_package())
    1558                 :            :     {
    1559                 :       1414 :       init_fndecl = this->initialization_function_decl();
    1560                 :       1414 :       init_bfn = init_fndecl->func_value()->get_or_make_decl(this, init_fndecl);
    1561                 :            :     }
    1562                 :            : 
    1563                 :            :   // A list of variable initializations.
    1564                 :       6744 :   Var_inits var_inits;
    1565                 :            : 
    1566                 :            :   // A list of variables which need to be registered with the garbage
    1567                 :            :   // collector.
    1568                 :       3372 :   size_t count_definitions = bindings->size_definitions();
    1569                 :       6744 :   std::vector<Named_object*> var_gc;
    1570                 :       3372 :   var_gc.reserve(count_definitions);
    1571                 :            : 
    1572                 :     480954 :   for (Bindings::const_definitions_iterator p = bindings->begin_definitions();
    1573                 :     480954 :        p != bindings->end_definitions();
    1574                 :     480954 :        ++p)
    1575                 :            :     {
    1576                 :     477582 :       Named_object* no = *p;
    1577                 :     477582 :       go_assert(!no->is_type_declaration() && !no->is_function_declaration());
    1578                 :            : 
    1579                 :            :       // There is nothing to do for a package.
    1580                 :     477582 :       if (no->is_package())
    1581                 :     170226 :         continue;
    1582                 :            : 
    1583                 :            :       // There is nothing to do for an object which was imported from
    1584                 :            :       // a different package into the global scope.
    1585                 :     444355 :       if (no->package() != NULL)
    1586                 :      23969 :         continue;
    1587                 :            : 
    1588                 :            :       // Skip blank named functions and constants.
    1589                 :     420386 :       if ((no->is_function() && no->func_value()->is_sink())
    1590                 :     657811 :           || (no->is_const() && no->const_value()->is_sink()))
    1591                 :       1342 :         continue;
    1592                 :            : 
    1593                 :            :       // There is nothing useful we can output for constants which
    1594                 :            :       // have ideal or non-integral type.
    1595                 :     419044 :       if (no->is_const())
    1596                 :            :         {
    1597                 :     132345 :           Type* type = no->const_value()->type();
    1598                 :     132345 :           if (type == NULL)
    1599                 :          0 :             type = no->const_value()->expr()->type();
    1600                 :     153179 :           if (type->is_abstract() || !type->is_numeric_type())
    1601                 :     111688 :             continue;
    1602                 :            :         }
    1603                 :            : 
    1604                 :     307356 :       if (!no->is_variable())
    1605                 :     284918 :         no->get_backend(this, const_decls, type_decls, func_decls);
    1606                 :            :       else
    1607                 :            :         {
    1608                 :      22438 :           Variable* var = no->var_value();
    1609                 :      22438 :           Bvariable* bvar = no->get_backend_variable(this, NULL);
    1610                 :      22438 :           var_decls.push_back(bvar);
    1611                 :            : 
    1612                 :            :           // Check for a sink variable, which may be used to run an
    1613                 :            :           // initializer purely for its side effects.
    1614                 :      22438 :           bool is_sink = no->name()[0] == '_' && no->name()[1] == '.';
    1615                 :            : 
    1616                 :      22438 :           Bstatement* var_init_stmt = NULL;
    1617                 :      22438 :           if (!var->has_pre_init())
    1618                 :            :             {
    1619                 :            :               // If the backend representation of the variable initializer is
    1620                 :            :               // constant, we can just set the initial value using
    1621                 :            :               // global_var_set_init instead of during the init() function.
    1622                 :            :               // The initializer is constant if it is the zero-value of the
    1623                 :            :               // variable's type or if the initial value is an immutable value
    1624                 :            :               // that is not copied to the heap.
    1625                 :      11433 :               bool is_static_initializer = false;
    1626                 :      11433 :               if (var->init() == NULL)
    1627                 :            :                 is_static_initializer = true;
    1628                 :            :               else
    1629                 :            :                 {
    1630                 :       6958 :                   Type* var_type = var->type();
    1631                 :       6958 :                   Expression* init = var->init();
    1632                 :       6958 :                   Expression* init_cast =
    1633                 :       6958 :                       Expression::make_cast(var_type, init, var->location());
    1634                 :       6958 :                   is_static_initializer = init_cast->is_static_initializer();
    1635                 :            :                 }
    1636                 :            : 
    1637                 :            :               // Non-constant variable initializations might need to create
    1638                 :            :               // temporary variables, which will need the initialization
    1639                 :            :               // function as context.
    1640                 :       6958 :               Named_object* var_init_fn;
    1641                 :       6958 :               if (is_static_initializer)
    1642                 :            :                 var_init_fn = NULL;
    1643                 :            :               else
    1644                 :            :                 {
    1645                 :        653 :                   if (init_fndecl == NULL)
    1646                 :            :                     {
    1647                 :         23 :                       init_fndecl = this->initialization_function_decl();
    1648                 :         23 :                       Function* func = init_fndecl->func_value();
    1649                 :         23 :                       init_bfn = func->get_or_make_decl(this, init_fndecl);
    1650                 :            :                     }
    1651                 :            :                   var_init_fn = init_fndecl;
    1652                 :            :                 }
    1653                 :      11433 :               Bexpression* var_binit = var->get_init(this, var_init_fn);
    1654                 :            : 
    1655                 :      11433 :               if (var_binit == NULL)
    1656                 :            :                 ;
    1657                 :       6958 :               else if (is_static_initializer)
    1658                 :            :                 {
    1659                 :      12610 :                   if (expression_requires(var->init(), NULL,
    1660                 :            :                                           this->var_depends_on(var), no))
    1661                 :          0 :                     go_error_at(no->location(),
    1662                 :            :                                 "initialization expression for %qs depends "
    1663                 :            :                                 "upon itself",
    1664                 :          0 :                                 no->message_name().c_str());
    1665                 :       6305 :                   this->backend()->global_variable_set_init(bvar, var_binit);
    1666                 :            :                 }
    1667                 :        653 :               else if (is_sink)
    1668                 :        247 :                 var_init_stmt =
    1669                 :        247 :                     this->backend()->expression_statement(init_bfn, var_binit);
    1670                 :            :               else
    1671                 :            :                 {
    1672                 :        406 :                   Location loc = var->location();
    1673                 :        406 :                   Bexpression* var_expr =
    1674                 :        406 :                       this->backend()->var_expression(bvar, loc);
    1675                 :        406 :                   var_init_stmt =
    1676                 :        406 :                       this->backend()->assignment_statement(init_bfn, var_expr,
    1677                 :        406 :                                                             var_binit, loc);
    1678                 :            :                 }
    1679                 :            :             }
    1680                 :            :           else
    1681                 :            :             {
    1682                 :            :               // We are going to create temporary variables which
    1683                 :            :               // means that we need an fndecl.
    1684                 :      11005 :               if (init_fndecl == NULL)
    1685                 :       1039 :                 init_fndecl = this->initialization_function_decl();
    1686                 :            : 
    1687                 :      11005 :               Bvariable* var_decl = is_sink ? NULL : bvar;
    1688                 :      11005 :               var_init_stmt = var->get_init_block(this, init_fndecl, var_decl);
    1689                 :            :             }
    1690                 :            : 
    1691                 :      22438 :           if (var_init_stmt != NULL)
    1692                 :            :             {
    1693                 :      11658 :               if (var->init() == NULL && !var->has_pre_init())
    1694                 :          0 :                 var_init_stmts.push_back(var_init_stmt);
    1695                 :            :               else
    1696                 :      11658 :                 var_inits.push_back(Var_init(no, var_init_stmt));
    1697                 :            :             }
    1698                 :      10780 :           else if (this->var_depends_on(var) != NULL)
    1699                 :            :             {
    1700                 :            :               // This variable is initialized from something that is
    1701                 :            :               // not in its init or preinit.  This variable needs to
    1702                 :            :               // participate in dependency analysis sorting, in case
    1703                 :            :               // some other variable depends on this one.
    1704                 :          0 :               Btype* btype = no->var_value()->type()->get_backend(this);
    1705                 :          0 :               Bexpression* zero = this->backend()->zero_expression(btype);
    1706                 :          0 :               Bstatement* zero_stmt =
    1707                 :          0 :                   this->backend()->expression_statement(init_bfn, zero);
    1708                 :          0 :               var_inits.push_back(Var_init(no, zero_stmt));
    1709                 :            :             }
    1710                 :            : 
    1711                 :            :           // Collect a list of all global variables with pointers,
    1712                 :            :           // to register them for the garbage collector.
    1713                 :      22438 :           if (!is_sink && var->type()->has_pointer())
    1714                 :            :             {
    1715                 :            :               // Avoid putting runtime.gcRoots itself on the list.
    1716                 :      17394 :               if (this->compiling_runtime()
    1717                 :        852 :                   && this->package_name() == "runtime"
    1718                 :      35462 :                   && (Gogo::unpack_hidden_name(no->name()) == "gcRoots"
    1719                 :      18068 :                    || Gogo::unpack_hidden_name(no->name()) == "gcRootsIndex"))
    1720                 :            :                 ;
    1721                 :            :               else
    1722                 :      17380 :                 var_gc.push_back(no);
    1723                 :            :             }
    1724                 :            :         }
    1725                 :            :     }
    1726                 :            : 
    1727                 :            :   // Output inline functions, which are in different packages.
    1728                 :      10536 :   for (std::vector<Named_object*>::const_iterator p =
    1729                 :       3372 :          this->imported_inline_functions_.begin();
    1730                 :      13908 :        p != this->imported_inline_functions_.end();
    1731                 :      13908 :        ++p)
    1732                 :      10536 :     (*p)->get_backend(this, const_decls, type_decls, func_decls);
    1733                 :            : 
    1734                 :            :   // Build the list of type descriptors.
    1735                 :       3372 :   this->build_type_descriptor_list();
    1736                 :            : 
    1737                 :       3372 :   if (this->is_main_package())
    1738                 :            :     {
    1739                 :            :       // Register the type descriptor lists, so that at run time
    1740                 :            :       // the reflect package can find compiler-created types, and
    1741                 :            :       // deduplicate if the same type is created with reflection.
    1742                 :            :       // This needs to be done before calling any package's init
    1743                 :            :       // function, as it may create type through reflection.
    1744                 :       1414 :       this->register_type_descriptors(init_stmts, init_bfn);
    1745                 :            : 
    1746                 :            :       // Initialize imported packages.
    1747                 :       1414 :       this->init_imports(init_stmts, init_bfn);
    1748                 :            :     }
    1749                 :            : 
    1750                 :            :   // Register global variables with the garbage collector.
    1751                 :       3372 :   this->register_gc_vars(var_gc, init_stmts, init_bfn);
    1752                 :            : 
    1753                 :            :   // Simple variable initializations, after all variables are
    1754                 :            :   // registered.
    1755                 :       3372 :   init_stmts.push_back(this->backend()->statement_list(var_init_stmts));
    1756                 :            : 
    1757                 :            :   // Complete variable initializations, first sorting them into a
    1758                 :            :   // workable order.
    1759                 :       3372 :   if (!var_inits.empty())
    1760                 :            :     {
    1761                 :       1531 :       sort_var_inits(this, &var_inits);
    1762                 :       1531 :       for (Var_inits::const_iterator p = var_inits.begin();
    1763                 :      13189 :            p != var_inits.end();
    1764                 :      13189 :            ++p)
    1765                 :      11658 :         init_stmts.push_back(p->init());
    1766                 :            :     }
    1767                 :            : 
    1768                 :            :   // After all the variables are initialized, call the init
    1769                 :            :   // functions if there are any.  Init functions take no arguments, so
    1770                 :            :   // we pass in EMPTY_ARGS to call them.
    1771                 :       6744 :   std::vector<Bexpression*> empty_args;
    1772                 :        625 :   for (std::vector<Named_object*>::const_iterator p =
    1773                 :       3372 :            this->init_functions_.begin();
    1774                 :       3997 :        p != this->init_functions_.end();
    1775                 :       3997 :        ++p)
    1776                 :            :     {
    1777                 :        625 :       Location func_loc = (*p)->location();
    1778                 :        625 :       Function* func = (*p)->func_value();
    1779                 :        625 :       Bfunction* initfn = func->get_or_make_decl(this, *p);
    1780                 :        625 :       Bexpression* func_code =
    1781                 :        625 :           this->backend()->function_code_expression(initfn, func_loc);
    1782                 :        625 :       Bexpression* call = this->backend()->call_expression(init_bfn, func_code,
    1783                 :            :                                                            empty_args,
    1784                 :        625 :                                                            NULL, func_loc);
    1785                 :        625 :       Bstatement* ist = this->backend()->expression_statement(init_bfn, call);
    1786                 :        625 :       init_stmts.push_back(ist);
    1787                 :            :     }
    1788                 :            : 
    1789                 :            :   // Set up a magic function to do all the initialization actions.
    1790                 :            :   // This will be called if this package is imported.
    1791                 :       3372 :   Bstatement* init_fncode = this->backend()->statement_list(init_stmts);
    1792                 :       3372 :   if (this->need_init_fn_ || this->is_main_package())
    1793                 :            :     {
    1794                 :       2692 :       init_fndecl =
    1795                 :       2692 :         this->create_initialization_function(init_fndecl, init_fncode);
    1796                 :       2692 :       if (init_fndecl != NULL)
    1797                 :       2670 :         func_decls.push_back(init_fndecl->func_value()->get_decl());
    1798                 :            :     }
    1799                 :            : 
    1800                 :            :   // We should not have seen any new bindings created during the conversion.
    1801                 :       3372 :   go_assert(count_definitions == this->current_bindings()->size_definitions());
    1802                 :            : 
    1803                 :            :   // Define all globally declared values.
    1804                 :       3372 :   if (!saw_errors())
    1805                 :       3110 :     this->backend()->write_global_definitions(type_decls, const_decls,
    1806                 :       3110 :                                               func_decls, var_decls);
    1807                 :       3372 : }
    1808                 :            : 
    1809                 :            : // Return the current block.
    1810                 :            : 
    1811                 :            : Block*
    1812                 :     784573 : Gogo::current_block()
    1813                 :            : {
    1814                 :     784573 :   if (this->functions_.empty())
    1815                 :            :     return NULL;
    1816                 :            :   else
    1817                 :     784573 :     return this->functions_.back().blocks.back();
    1818                 :            : }
    1819                 :            : 
    1820                 :            : // Look up a name in the current binding contour.  If PFUNCTION is not
    1821                 :            : // NULL, set it to the function in which the name is defined, or NULL
    1822                 :            : // if the name is defined in global scope.
    1823                 :            : 
    1824                 :            : Named_object*
    1825                 :    3405640 : Gogo::lookup(const std::string& name, Named_object** pfunction) const
    1826                 :            : {
    1827                 :    3405640 :   if (pfunction != NULL)
    1828                 :    2697620 :     *pfunction = NULL;
    1829                 :            : 
    1830                 :    3405640 :   if (Gogo::is_sink_name(name))
    1831                 :       5930 :     return Named_object::make_sink();
    1832                 :            : 
    1833                 :    4511690 :   for (Open_functions::const_reverse_iterator p = this->functions_.rbegin();
    1834                 :    4511690 :        p != this->functions_.rend();
    1835                 :    4511690 :        ++p)
    1836                 :            :     {
    1837                 :    2894450 :       Named_object* ret = p->blocks.back()->bindings()->lookup(name);
    1838                 :    2894450 :       if (ret != NULL)
    1839                 :            :         {
    1840                 :    1782480 :           if (pfunction != NULL)
    1841                 :    1569910 :             *pfunction = p->function;
    1842                 :    1782480 :           return ret;
    1843                 :            :         }
    1844                 :            :     }
    1845                 :            : 
    1846                 :    1617240 :   if (this->package_ != NULL)
    1847                 :            :     {
    1848                 :    1617240 :       Named_object* ret = this->package_->bindings()->lookup(name);
    1849                 :    1617240 :       if (ret != NULL)
    1850                 :            :         {
    1851                 :    1443880 :           if (ret->package() != NULL)
    1852                 :            :             {
    1853                 :      44952 :               std::string dot_alias = "." + ret->package()->package_name();
    1854                 :      22476 :               ret->package()->note_usage(dot_alias);
    1855                 :            :             }
    1856                 :    1443880 :           return ret;
    1857                 :            :         }
    1858                 :            :     }
    1859                 :            : 
    1860                 :            :   // We do not look in the global namespace.  If we did, the global
    1861                 :            :   // namespace would effectively hide names which were defined in
    1862                 :            :   // package scope which we have not yet seen.  Instead,
    1863                 :            :   // define_global_names is called after parsing is over to connect
    1864                 :            :   // undefined names at package scope with names defined at global
    1865                 :            :   // scope.
    1866                 :            : 
    1867                 :            :   return NULL;
    1868                 :            : }
    1869                 :            : 
    1870                 :            : // Look up a name in the current block, without searching enclosing
    1871                 :            : // blocks.
    1872                 :            : 
    1873                 :            : Named_object*
    1874                 :     261543 : Gogo::lookup_in_block(const std::string& name) const
    1875                 :            : {
    1876                 :     261543 :   go_assert(!this->functions_.empty());
    1877                 :     261543 :   go_assert(!this->functions_.back().blocks.empty());
    1878                 :     261543 :   return this->functions_.back().blocks.back()->bindings()->lookup_local(name);
    1879                 :            : }
    1880                 :            : 
    1881                 :            : // Look up a name in the global namespace.
    1882                 :            : 
    1883                 :            : Named_object*
    1884                 :     531561 : Gogo::lookup_global(const char* name) const
    1885                 :            : {
    1886                 :     531561 :   return this->globals_->lookup(name);
    1887                 :            : }
    1888                 :            : 
    1889                 :            : // Add an imported package.
    1890                 :            : 
    1891                 :            : Package*
    1892                 :      21541 : Gogo::add_imported_package(const std::string& real_name,
    1893                 :            :                            const std::string& alias_arg,
    1894                 :            :                            bool is_alias_exported,
    1895                 :            :                            const std::string& pkgpath,
    1896                 :            :                            const std::string& pkgpath_symbol,
    1897                 :            :                            Location location,
    1898                 :            :                            bool* padd_to_globals)
    1899                 :            : {
    1900                 :      21541 :   Package* ret = this->register_package(pkgpath, pkgpath_symbol, location);
    1901                 :      21541 :   ret->set_package_name(real_name, location);
    1902                 :            : 
    1903                 :      21541 :   *padd_to_globals = false;
    1904                 :            : 
    1905                 :      21541 :   if (alias_arg == "_")
    1906                 :            :     ;
    1907                 :      17625 :   else if (alias_arg == ".")
    1908                 :            :     {
    1909                 :          8 :       *padd_to_globals = true;
    1910                 :         16 :       std::string dot_alias = "." + real_name;
    1911                 :          8 :       ret->add_alias(dot_alias, location);
    1912                 :            :     }
    1913                 :            :   else
    1914                 :            :     {
    1915                 :      35234 :       std::string alias = alias_arg;
    1916                 :      17617 :       if (alias.empty())
    1917                 :            :         {
    1918                 :      17184 :           alias = real_name;
    1919                 :      17184 :           is_alias_exported = Lex::is_exported_name(alias);
    1920                 :            :         }
    1921                 :      17617 :       ret->add_alias(alias, location);
    1922                 :      17617 :       alias = this->pack_hidden_name(alias, is_alias_exported);
    1923                 :      17617 :       Named_object* no = this->package_->bindings()->add_package(alias, ret);
    1924                 :      17617 :       if (!no->is_package())
    1925                 :          0 :         return NULL;
    1926                 :            :     }
    1927                 :            : 
    1928                 :            :   return ret;
    1929                 :            : }
    1930                 :            : 
    1931                 :            : // Register a package.  This package may or may not be imported.  This
    1932                 :            : // returns the Package structure for the package, creating if it
    1933                 :            : // necessary.  LOCATION is the location of the import statement that
    1934                 :            : // led us to see this package.  PKGPATH_SYMBOL is the symbol to use
    1935                 :            : // for names in the package; it may be the empty string, in which case
    1936                 :            : // we either get it later or make a guess when we need it.
    1937                 :            : 
    1938                 :            : Package*
    1939                 :     519958 : Gogo::register_package(const std::string& pkgpath,
    1940                 :            :                        const std::string& pkgpath_symbol, Location location)
    1941                 :            : {
    1942                 :     519958 :   Package* package = NULL;
    1943                 :     519958 :   std::pair<Packages::iterator, bool> ins =
    1944                 :     519958 :     this->packages_.insert(std::make_pair(pkgpath, package));
    1945                 :     519958 :   if (!ins.second)
    1946                 :            :     {
    1947                 :            :       // We have seen this package name before.
    1948                 :     440975 :       package = ins.first->second;
    1949                 :     440975 :       go_assert(package != NULL && package->pkgpath() == pkgpath);
    1950                 :     440975 :       if (!pkgpath_symbol.empty())
    1951                 :      11834 :         package->set_pkgpath_symbol(pkgpath_symbol);
    1952                 :     440975 :       if (Linemap::is_unknown_location(package->location()))
    1953                 :     229672 :         package->set_location(location);
    1954                 :            :     }
    1955                 :            :   else
    1956                 :            :     {
    1957                 :            :       // First time we have seen this package name.
    1958                 :      78983 :       package = new Package(pkgpath, pkgpath_symbol, location);
    1959                 :      78983 :       go_assert(ins.first->second == NULL);
    1960                 :      78983 :       ins.first->second = package;
    1961                 :            :     }
    1962                 :            : 
    1963                 :     519958 :   return package;
    1964                 :            : }
    1965                 :            : 
    1966                 :            : // Return the pkgpath symbol for a package, given the pkgpath.
    1967                 :            : 
    1968                 :            : std::string
    1969                 :          0 : Gogo::pkgpath_symbol_for_package(const std::string& pkgpath)
    1970                 :            : {
    1971                 :          0 :   Packages::iterator p = this->packages_.find(pkgpath);
    1972                 :          0 :   go_assert(p != this->packages_.end());
    1973                 :          0 :   return p->second->pkgpath_symbol();
    1974                 :            : }
    1975                 :            : 
    1976                 :            : // Start compiling a function.
    1977                 :            : 
    1978                 :            : Named_object*
    1979                 :     237666 : Gogo::start_function(const std::string& name, Function_type* type,
    1980                 :            :                      bool add_method_to_type, Location location)
    1981                 :            : {
    1982                 :     237666 :   bool at_top_level = this->functions_.empty();
    1983                 :            : 
    1984                 :     237666 :   Block* block = new Block(NULL, location);
    1985                 :            : 
    1986                 :     237666 :   Named_object* enclosing = (at_top_level
    1987                 :     237666 :                          ? NULL
    1988                 :      20210 :                          : this->functions_.back().function);
    1989                 :            : 
    1990                 :     237666 :   Function* function = new Function(type, enclosing, block, location);
    1991                 :            : 
    1992                 :     237666 :   if (type->is_method())
    1993                 :            :     {
    1994                 :      65125 :       const Typed_identifier* receiver = type->receiver();
    1995                 :      65125 :       Variable* this_param = new Variable(receiver->type(), NULL, false,
    1996                 :      65125 :                                           true, true, location);
    1997                 :     130250 :       std::string rname = receiver->name();
    1998                 :      65125 :       unsigned rcounter = 0;
    1999                 :            : 
    2000                 :            :       // We need to give a nameless receiver parameter a synthesized name to
    2001                 :            :       // avoid having it clash with some other nameless param. FIXME.
    2002                 :      65125 :       Gogo::rename_if_empty(&rname, "r", &rcounter);
    2003                 :            : 
    2004                 :      65125 :       block->bindings()->add_variable(rname, NULL, this_param);
    2005                 :            :     }
    2006                 :            : 
    2007                 :     237666 :   const Typed_identifier_list* parameters = type->parameters();
    2008                 :     237666 :   bool is_varargs = type->is_varargs();
    2009                 :     237666 :   unsigned pcounter = 0;
    2010                 :     237666 :   if (parameters != NULL)
    2011                 :            :     {
    2012                 :     182079 :       for (Typed_identifier_list::const_iterator p = parameters->begin();
    2013                 :     497631 :            p != parameters->end();
    2014                 :     497631 :            ++p)
    2015                 :            :         {
    2016                 :     315552 :           Variable* param = new Variable(p->type(), NULL, false, true, false,
    2017                 :     315552 :                                          p->location());
    2018                 :     315552 :           if (is_varargs && p + 1 == parameters->end())
    2019                 :       1679 :             param->set_is_varargs_parameter();
    2020                 :            : 
    2021                 :     631104 :           std::string pname = p->name();
    2022                 :            : 
    2023                 :            :           // We need to give each nameless parameter a non-empty name to avoid
    2024                 :            :           // having it clash with some other nameless param. FIXME.
    2025                 :     315552 :           Gogo::rename_if_empty(&pname, "p", &pcounter);
    2026                 :            : 
    2027                 :     315552 :           block->bindings()->add_variable(pname, NULL, param);
    2028                 :            :         }
    2029                 :            :     }
    2030                 :            : 
    2031                 :     237666 :   function->create_result_variables(this);
    2032                 :            : 
    2033                 :     237666 :   const std::string* pname;
    2034                 :     237666 :   std::string nested_name;
    2035                 :     237666 :   bool is_init = false;
    2036                 :     475332 :   if (Gogo::unpack_hidden_name(name) == "init" && !type->is_method())
    2037                 :            :     {
    2038                 :        625 :       if ((type->parameters() != NULL && !type->parameters()->empty())
    2039                 :        625 :           || (type->results() != NULL && !type->results()->empty()))
    2040                 :          0 :         go_error_at(location,
    2041                 :            :                     "func init must have no arguments and no return values");
    2042                 :            :       // There can be multiple "init" functions, so give them each a
    2043                 :            :       // different name.
    2044                 :        625 :       nested_name = this->init_function_name();
    2045                 :        625 :       pname = &nested_name;
    2046                 :        625 :       is_init = true;
    2047                 :            :     }
    2048                 :     237041 :   else if (!name.empty())
    2049                 :            :     pname = &name;
    2050                 :            :   else
    2051                 :            :     {
    2052                 :            :       // Invent a name for a nested function.
    2053                 :      21418 :       nested_name = this->nested_function_name(enclosing);
    2054                 :      21418 :       pname = &nested_name;
    2055                 :            :     }
    2056                 :            : 
    2057                 :     237666 :   Named_object* ret;
    2058                 :     237666 :   if (Gogo::is_sink_name(*pname))
    2059                 :            :     {
    2060                 :        482 :       std::string sname(this->sink_function_name());
    2061                 :        241 :       ret = Named_object::make_function(sname, NULL, function);
    2062                 :        241 :       ret->func_value()->set_is_sink();
    2063                 :            : 
    2064                 :        241 :       if (!type->is_method())
    2065                 :        237 :         ret = this->package_->bindings()->add_named_object(ret);
    2066                 :          4 :       else if (add_method_to_type)
    2067                 :            :         {
    2068                 :            :           // We should report errors even for sink methods.
    2069                 :          4 :           Type* rtype = type->receiver()->type();
    2070                 :            :           // Avoid points_to and deref to avoid getting an error if
    2071                 :            :           // the type is not yet defined.
    2072                 :          4 :           if (rtype->classification() == Type::TYPE_POINTER)
    2073                 :          2 :             rtype = rtype->points_to();
    2074                 :          4 :           while (rtype->named_type() != NULL
    2075                 :          4 :                  && rtype->named_type()->is_alias())
    2076                 :          0 :             rtype = rtype->named_type()->real_type()->forwarded();
    2077                 :          4 :           if (rtype->is_error_type())
    2078                 :            :             ;
    2079                 :          4 :           else if (rtype->named_type() != NULL)
    2080                 :            :             {
    2081                 :          4 :               if (rtype->named_type()->named_object()->package() != NULL)
    2082                 :          0 :                 go_error_at(type->receiver()->location(),
    2083                 :            :                             "may not define methods on non-local type");
    2084                 :            :             }
    2085                 :          0 :           else if (rtype->forward_declaration_type() != NULL)
    2086                 :            :             {
    2087                 :            :               // Go ahead and add the method in case we need to report
    2088                 :            :               // an error when we see the definition.
    2089                 :          0 :               rtype->forward_declaration_type()->add_existing_method(ret);
    2090                 :            :             }
    2091                 :            :           else
    2092                 :          0 :             go_error_at(type->receiver()->location(),
    2093                 :            :                         ("invalid receiver type "
    2094                 :            :                          "(receiver must be a named type)"));
    2095                 :            :         }
    2096                 :            :     }
    2097                 :     237425 :   else if (!type->is_method())
    2098                 :            :     {
    2099                 :     172304 :       ret = this->package_->bindings()->add_function(*pname, NULL, function);
    2100                 :     172304 :       if (!ret->is_function() || ret->func_value() != function)
    2101                 :            :         {
    2102                 :            :           // Redefinition error.  Invent a name to avoid knockon
    2103                 :            :           // errors.
    2104                 :          2 :           std::string rname(this->redefined_function_name());
    2105                 :          1 :           ret = this->package_->bindings()->add_function(rname, NULL, function);
    2106                 :            :         }
    2107                 :            :     }
    2108                 :            :   else
    2109                 :            :     {
    2110                 :      65121 :       if (!add_method_to_type)
    2111                 :      19835 :         ret = Named_object::make_function(name, NULL, function);
    2112                 :            :       else
    2113                 :            :         {
    2114                 :      45286 :           go_assert(at_top_level);
    2115                 :      45286 :           Type* rtype = type->receiver()->type();
    2116                 :            : 
    2117                 :      45286 :           while (rtype->named_type() != NULL
    2118                 :      45286 :                  && rtype->named_type()->is_alias())
    2119                 :          0 :             rtype = rtype->named_type()->real_type()->forwarded();
    2120                 :            : 
    2121                 :            :           // We want to look through the pointer created by the
    2122                 :            :           // parser, without getting an error if the type is not yet
    2123                 :            :           // defined.
    2124                 :      45286 :           if (rtype->classification() == Type::TYPE_POINTER)
    2125                 :      37397 :             rtype = rtype->points_to();
    2126                 :            : 
    2127                 :      45286 :           while (rtype->named_type() != NULL
    2128                 :      45286 :                  && rtype->named_type()->is_alias())
    2129                 :          0 :             rtype = rtype->named_type()->real_type()->forwarded();
    2130                 :            : 
    2131                 :      45286 :           if (rtype->is_error_type())
    2132                 :          0 :             ret = Named_object::make_function(name, NULL, function);
    2133                 :      45286 :           else if (rtype->named_type() != NULL)
    2134                 :            :             {
    2135                 :      42980 :               if (rtype->named_type()->named_object()->package() != NULL)
    2136                 :            :                 {
    2137                 :          1 :                   go_error_at(type->receiver()->location(),
    2138                 :            :                               "may not define methods on non-local type");
    2139                 :          1 :                   ret = Named_object::make_function(name, NULL, function);
    2140                 :            :                 }
    2141                 :            :               else
    2142                 :            :                 {
    2143                 :      42979 :                   ret = rtype->named_type()->add_method(name, function);
    2144                 :      42979 :                   if (!ret->is_function())
    2145                 :            :                     {
    2146                 :            :                       // Redefinition error.
    2147                 :          1 :                       ret = Named_object::make_function(name, NULL, function);
    2148                 :            :                     }
    2149                 :            :                 }
    2150                 :            :             }
    2151                 :       2306 :           else if (rtype->forward_declaration_type() != NULL)
    2152                 :            :             {
    2153                 :       2306 :               Named_object* type_no =
    2154                 :       2306 :                 rtype->forward_declaration_type()->named_object();
    2155                 :       2306 :               if (type_no->is_unknown())
    2156                 :            :                 {
    2157                 :            :                   // If we are seeing methods it really must be a
    2158                 :            :                   // type.  Declare it as such.  An alternative would
    2159                 :            :                   // be to support lists of methods for unknown
    2160                 :            :                   // expressions.  Either way the error messages if
    2161                 :            :                   // this is not a type are going to get confusing.
    2162                 :        488 :                   Named_object* declared =
    2163                 :        488 :                     this->declare_package_type(type_no->name(),
    2164                 :            :                                                type_no->location());
    2165                 :        488 :                   go_assert(declared
    2166                 :            :                              == type_no->unknown_value()->real_named_object());
    2167                 :            :                 }
    2168                 :       2306 :               ret = rtype->forward_declaration_type()->add_method(name,
    2169                 :            :                                                                   function);
    2170                 :            :             }
    2171                 :            :           else
    2172                 :            :             {
    2173                 :          0 :               go_error_at(type->receiver()->location(),
    2174                 :            :                           ("invalid receiver type (receiver must "
    2175                 :            :                            "be a named type)"));
    2176                 :          0 :               ret = Named_object::make_function(name, NULL, function);
    2177                 :            :             }
    2178                 :            :         }
    2179                 :      65121 :       this->package_->bindings()->add_method(ret);
    2180                 :            :     }
    2181                 :            : 
    2182                 :     237666 :   this->functions_.resize(this->functions_.size() + 1);
    2183                 :     237666 :   Open_function& of(this->functions_.back());
    2184                 :     237666 :   of.function = ret;
    2185                 :     237666 :   of.blocks.push_back(block);
    2186                 :            : 
    2187                 :     237666 :   if (is_init)
    2188                 :            :     {
    2189                 :        625 :       this->init_functions_.push_back(ret);
    2190                 :        625 :       this->need_init_fn_ = true;
    2191                 :            :     }
    2192                 :            : 
    2193                 :     237666 :   return ret;
    2194                 :            : }
    2195                 :            : 
    2196                 :            : // Finish compiling a function.
    2197                 :            : 
    2198                 :            : void
    2199                 :     237666 : Gogo::finish_function(Location location)
    2200                 :            : {
    2201                 :     237666 :   this->finish_block(location);
    2202                 :     237666 :   go_assert(this->functions_.back().blocks.empty());
    2203                 :     237666 :   this->functions_.pop_back();
    2204                 :     237666 : }
    2205                 :            : 
    2206                 :            : // Return the current function.
    2207                 :            : 
    2208                 :            : Named_object*
    2209                 :    1637150 : Gogo::current_function() const
    2210                 :            : {
    2211                 :    1637150 :   go_assert(!this->functions_.empty());
    2212                 :    1637150 :   return this->functions_.back().function;
    2213                 :            : }
    2214                 :            : 
    2215                 :            : // Start a new block.
    2216                 :            : 
    2217                 :            : void
    2218                 :     773133 : Gogo::start_block(Location location)
    2219                 :            : {
    2220                 :     773133 :   go_assert(!this->functions_.empty());
    2221                 :     773133 :   Block* block = new Block(this->current_block(), location);
    2222                 :     773133 :   this->functions_.back().blocks.push_back(block);
    2223                 :     773133 : }
    2224                 :            : 
    2225                 :            : // Finish a block.
    2226                 :            : 
    2227                 :            : Block*
    2228                 :    1010800 : Gogo::finish_block(Location location)
    2229                 :            : {
    2230                 :    1010800 :   go_assert(!this->functions_.empty());
    2231                 :    1010800 :   go_assert(!this->functions_.back().blocks.empty());
    2232                 :    1010800 :   Block* block = this->functions_.back().blocks.back();
    2233                 :    1010800 :   this->functions_.back().blocks.pop_back();
    2234                 :    1010800 :   block->set_end_location(location);
    2235                 :    1010800 :   return block;
    2236                 :            : }
    2237                 :            : 
    2238                 :            : // Add an erroneous name.
    2239                 :            : 
    2240                 :            : Named_object*
    2241                 :         10 : Gogo::add_erroneous_name(const std::string& name)
    2242                 :            : {
    2243                 :         10 :   return this->package_->bindings()->add_erroneous_name(name);
    2244                 :            : }
    2245                 :            : 
    2246                 :            : // Add an unknown name.
    2247                 :            : 
    2248                 :            : Named_object*
    2249                 :      74582 : Gogo::add_unknown_name(const std::string& name, Location location)
    2250                 :            : {
    2251                 :      74582 :   return this->package_->bindings()->add_unknown_name(name, location);
    2252                 :            : }
    2253                 :            : 
    2254                 :            : // Declare a function.
    2255                 :            : 
    2256                 :            : Named_object*
    2257                 :       4938 : Gogo::declare_function(const std::string& name, Function_type* type,
    2258                 :            :                        Location location)
    2259                 :            : {
    2260                 :       4938 :   if (!type->is_method())
    2261                 :       4877 :     return this->current_bindings()->add_function_declaration(name, NULL, type,
    2262                 :       4877 :                                                               location);
    2263                 :            :   else
    2264                 :            :     {
    2265                 :            :       // We don't bother to add this to the list of global
    2266                 :            :       // declarations.
    2267                 :         61 :       Type* rtype = type->receiver()->type();
    2268                 :            : 
    2269                 :         61 :       while (rtype->named_type() != NULL
    2270                 :         61 :           && rtype->named_type()->is_alias())
    2271                 :          0 :         rtype = rtype->named_type()->real_type()->forwarded();
    2272                 :            : 
    2273                 :            :       // We want to look through the pointer created by the
    2274                 :            :       // parser, without getting an error if the type is not yet
    2275                 :            :       // defined.
    2276                 :         61 :       if (rtype->classification() == Type::TYPE_POINTER)
    2277                 :          4 :         rtype = rtype->points_to();
    2278                 :            : 
    2279                 :         61 :       while (rtype->named_type() != NULL
    2280                 :         61 :           && rtype->named_type()->is_alias())
    2281                 :          0 :         rtype = rtype->named_type()->real_type()->forwarded();
    2282                 :            : 
    2283                 :         61 :       if (rtype->is_error_type())
    2284                 :            :         return NULL;
    2285                 :         61 :       else if (rtype->named_type() != NULL)
    2286                 :         61 :         return rtype->named_type()->add_method_declaration(name, NULL, type,
    2287                 :         61 :                                                            location);
    2288                 :          0 :       else if (rtype->forward_declaration_type() != NULL)
    2289                 :            :         {
    2290                 :          0 :           Forward_declaration_type* ftype = rtype->forward_declaration_type();
    2291                 :          0 :           return ftype->add_method_declaration(name, NULL, type, location);
    2292                 :            :         }
    2293                 :            :       else
    2294                 :            :         {
    2295                 :          0 :           go_error_at(type->receiver()->location(),
    2296                 :            :                       "invalid receiver type (receiver must be a named type)");
    2297                 :          0 :           return Named_object::make_erroneous_name(name);
    2298                 :            :         }
    2299                 :            :     }
    2300                 :            : }
    2301                 :            : 
    2302                 :            : // Add a label definition.
    2303                 :            : 
    2304                 :            : Label*
    2305                 :       7843 : Gogo::add_label_definition(const std::string& label_name,
    2306                 :            :                            Location location)
    2307                 :            : {
    2308                 :       7843 :   go_assert(!this->functions_.empty());
    2309                 :       7843 :   Function* func = this->functions_.back().function->func_value();
    2310                 :       7843 :   Label* label = func->add_label_definition(this, label_name, location);
    2311                 :       7843 :   this->add_statement(Statement::make_label_statement(label, location));
    2312                 :       7843 :   return label;
    2313                 :            : }
    2314                 :            : 
    2315                 :            : // Add a label reference.
    2316                 :            : 
    2317                 :            : Label*
    2318                 :       8307 : Gogo::add_label_reference(const std::string& label_name,
    2319                 :            :                           Location location, bool issue_goto_errors)
    2320                 :            : {
    2321                 :       8307 :   go_assert(!this->functions_.empty());
    2322                 :       8307 :   Function* func = this->functions_.back().function->func_value();
    2323                 :       8307 :   return func->add_label_reference(this, label_name, location,
    2324                 :       8307 :                                    issue_goto_errors);
    2325                 :            : }
    2326                 :            : 
    2327                 :            : // Return the current binding state.
    2328                 :            : 
    2329                 :            : Bindings_snapshot*
    2330                 :       9382 : Gogo::bindings_snapshot(Location location)
    2331                 :            : {
    2332                 :       9382 :   return new Bindings_snapshot(this->current_block(), location);
    2333                 :            : }
    2334                 :            : 
    2335                 :            : // Add a statement.
    2336                 :            : 
    2337                 :            : void
    2338                 :    1502660 : Gogo::add_statement(Statement* statement)
    2339                 :            : {
    2340                 :    1502660 :   go_assert(!this->functions_.empty()
    2341                 :            :              && !this->functions_.back().blocks.empty());
    2342                 :    1502660 :   this->functions_.back().blocks.back()->add_statement(statement);
    2343                 :    1502660 : }
    2344                 :            : 
    2345                 :            : // Add a block.
    2346                 :            : 
    2347                 :            : void
    2348                 :     374348 : Gogo::add_block(Block* block, Location location)
    2349                 :            : {
    2350                 :     374348 :   go_assert(!this->functions_.empty()
    2351                 :            :              && !this->functions_.back().blocks.empty());
    2352                 :     374348 :   Statement* statement = Statement::make_block_statement(block, location);
    2353                 :     374348 :   this->functions_.back().blocks.back()->add_statement(statement);
    2354                 :     374348 : }
    2355                 :            : 
    2356                 :            : // Add a constant.
    2357                 :            : 
    2358                 :            : Named_object*
    2359                 :     138367 : Gogo::add_constant(const Typed_identifier& tid, Expression* expr,
    2360                 :            :                    int iota_value)
    2361                 :            : {
    2362                 :     138367 :   return this->current_bindings()->add_constant(tid, NULL, expr, iota_value);
    2363                 :            : }
    2364                 :            : 
    2365                 :            : // Add a type.
    2366                 :            : 
    2367                 :            : void
    2368                 :          0 : Gogo::add_type(const std::string& name, Type* type, Location location)
    2369                 :            : {
    2370                 :          0 :   Named_object* no = this->current_bindings()->add_type(name, NULL, type,
    2371                 :            :                                                         location);
    2372                 :          0 :   if (!this->in_global_scope() && no->is_type())
    2373                 :            :     {
    2374                 :          0 :       Named_object* f = this->functions_.back().function;
    2375                 :          0 :       unsigned int index;
    2376                 :          0 :       if (f->is_function())
    2377                 :          0 :         index = f->func_value()->new_local_type_index();
    2378                 :            :       else
    2379                 :            :         index = 0;
    2380                 :          0 :       no->type_value()->set_in_function(f, index);
    2381                 :            :     }
    2382                 :          0 : }
    2383                 :            : 
    2384                 :            : // Add a named type.
    2385                 :            : 
    2386                 :            : void
    2387                 :      67460 : Gogo::add_named_type(Named_type* type)
    2388                 :            : {
    2389                 :      67460 :   go_assert(this->in_global_scope());
    2390                 :      67460 :   this->current_bindings()->add_named_type(type);
    2391                 :      67460 : }
    2392                 :            : 
    2393                 :            : // Declare a type.
    2394                 :            : 
    2395                 :            : Named_object*
    2396                 :      27922 : Gogo::declare_type(const std::string& name, Location location)
    2397                 :            : {
    2398                 :      27922 :   Bindings* bindings = this->current_bindings();
    2399                 :      27922 :   Named_object* no = bindings->add_type_declaration(name, NULL, location);
    2400                 :      27922 :   if (!this->in_global_scope() && no->is_type_declaration())
    2401                 :            :     {
    2402                 :       1095 :       Named_object* f = this->functions_.back().function;
    2403                 :       1095 :       unsigned int index;
    2404                 :       1095 :       if (f->is_function())
    2405                 :       1095 :         index = f->func_value()->new_local_type_index();
    2406                 :            :       else
    2407                 :            :         index = 0;
    2408                 :       1095 :       no->type_declaration_value()->set_in_function(f, index);
    2409                 :            :     }
    2410                 :      27922 :   return no;
    2411                 :            : }
    2412                 :            : 
    2413                 :            : // Declare a type at the package level.
    2414                 :            : 
    2415                 :            : Named_object*
    2416                 :        488 : Gogo::declare_package_type(const std::string& name, Location location)
    2417                 :            : {
    2418                 :        488 :   return this->package_->bindings()->add_type_declaration(name, NULL, location);
    2419                 :            : }
    2420                 :            : 
    2421                 :            : // Declare a function at the package level.
    2422                 :            : 
    2423                 :            : Named_object*
    2424                 :      74966 : Gogo::declare_package_function(const std::string& name, Function_type* type,
    2425                 :            :                                Location location)
    2426                 :            : {
    2427                 :      74966 :   return this->package_->bindings()->add_function_declaration(name, NULL, type,
    2428                 :      74966 :                                                               location);
    2429                 :            : }
    2430                 :            : 
    2431                 :            : // Add a function declaration to the list of functions we may want to
    2432                 :            : // inline.
    2433                 :            : 
    2434                 :            : void
    2435                 :      62534 : Gogo::add_imported_inlinable_function(Named_object* no)
    2436                 :            : {
    2437                 :      62534 :   go_assert(no->is_function_declaration());
    2438                 :      62534 :   Function_declaration* fd = no->func_declaration_value();
    2439                 :      62534 :   if (fd->is_on_inlinable_list())
    2440                 :            :     return;
    2441                 :      10536 :   this->imported_inlinable_functions_.push_back(no);
    2442                 :      10536 :   fd->set_is_on_inlinable_list();
    2443                 :            : }
    2444                 :            : 
    2445                 :            : // Define a type which was already declared.
    2446                 :            : 
    2447                 :            : void
    2448                 :      27922 : Gogo::define_type(Named_object* no, Named_type* type)
    2449                 :            : {
    2450                 :      27922 :   this->current_bindings()->define_type(no, type);
    2451                 :      27922 : }
    2452                 :            : 
    2453                 :            : // Add a variable.
    2454                 :            : 
    2455                 :            : Named_object*
    2456                 :     328285 : Gogo::add_variable(const std::string& name, Variable* variable)
    2457                 :            : {
    2458                 :     328285 :   Named_object* no = this->current_bindings()->add_variable(name, NULL,
    2459                 :            :                                                             variable);
    2460                 :            : 
    2461                 :            :   // In a function the middle-end wants to see a DECL_EXPR node.
    2462                 :     328285 :   if (no != NULL
    2463                 :     328285 :       && no->is_variable()
    2464                 :     328284 :       && !no->var_value()->is_parameter()
    2465                 :     656568 :       && !this->functions_.empty())
    2466                 :     305845 :     this->add_statement(Statement::make_variable_declaration(no));
    2467                 :            : 
    2468                 :     328285 :   return no;
    2469                 :            : }
    2470                 :            : 
    2471                 :            : void
    2472                 :     395781 : Gogo::rename_if_empty(std::string* pname, const char* tag, unsigned* count)
    2473                 :            : {
    2474                 :     395781 :   if (pname->empty() || Gogo::is_sink_name(*pname))
    2475                 :            :     {
    2476                 :       2651 :       char buf[50];
    2477                 :       2651 :       go_assert(strlen(tag) < 10);
    2478                 :       2651 :       snprintf(buf, sizeof buf, "%s.%u", tag, *count);
    2479                 :       2651 :       ++(*count);
    2480                 :       2651 :       *pname = buf;
    2481                 :            :     }
    2482                 :     395781 : }
    2483                 :            : 
    2484                 :            : 
    2485                 :            : // Add a sink--a reference to the blank identifier _.
    2486                 :            : 
    2487                 :            : Named_object*
    2488                 :      15745 : Gogo::add_sink()
    2489                 :            : {
    2490                 :      15745 :   return Named_object::make_sink();
    2491                 :            : }
    2492                 :            : 
    2493                 :            : // Add a named object for a dot import.
    2494                 :            : 
    2495                 :            : void
    2496                 :      43721 : Gogo::add_dot_import_object(Named_object* no)
    2497                 :            : {
    2498                 :            :   // If the name already exists, then it was defined in some file seen
    2499                 :            :   // earlier.  If the earlier name is just a declaration, don't add
    2500                 :            :   // this name, because that will cause the previous declaration to
    2501                 :            :   // merge to this imported name, which should not happen.  Just add
    2502                 :            :   // this name to the list of file block names to get appropriate
    2503                 :            :   // errors if we see a later definition.
    2504                 :      43721 :   Named_object* e = this->package_->bindings()->lookup(no->name());
    2505                 :      43721 :   if (e != NULL && e->package() == NULL)
    2506                 :            :     {
    2507                 :          0 :       if (e->is_unknown())
    2508                 :          0 :         e = e->resolve();
    2509                 :          0 :       if (e->package() == NULL
    2510                 :          0 :           && (e->is_type_declaration()
    2511                 :          0 :               || e->is_function_declaration()
    2512                 :          0 :               || e->is_unknown()))
    2513                 :            :         {
    2514                 :          0 :           this->add_file_block_name(no->name(), no->location());
    2515                 :          0 :           return;
    2516                 :            :         }
    2517                 :            :     }
    2518                 :            : 
    2519                 :      43721 :   this->current_bindings()->add_named_object(no);
    2520                 :            : }
    2521                 :            : 
    2522                 :            : // Add a linkname.  This implements the go:linkname compiler directive.
    2523                 :            : // We only support this for functions and function declarations.
    2524                 :            : 
    2525                 :            : void
    2526                 :       2582 : Gogo::add_linkname(const std::string& go_name, bool is_exported,
    2527                 :            :                    const std::string& ext_name, Location loc)
    2528                 :            : {
    2529                 :       2582 :   Named_object* no =
    2530                 :       2582 :     this->package_->bindings()->lookup(this->pack_hidden_name(go_name,
    2531                 :            :                                                               is_exported));
    2532                 :       2582 :   if (no == NULL)
    2533                 :          0 :     go_error_at(loc, "%s is not defined", go_name.c_str());
    2534                 :       2582 :   else if (no->is_function())
    2535                 :            :     {
    2536                 :       2491 :       if (ext_name.empty())
    2537                 :       1644 :         no->func_value()->set_is_exported_by_linkname();
    2538                 :            :       else
    2539                 :        847 :         no->func_value()->set_asm_name(ext_name);
    2540                 :            :     }
    2541                 :         91 :   else if (no->is_function_declaration())
    2542                 :            :     {
    2543                 :         91 :       if (ext_name.empty())
    2544                 :          0 :         go_error_at(loc,
    2545                 :            :                     ("%<//go:linkname%> missing external name "
    2546                 :            :                      "for declaration of %s"),
    2547                 :            :                     go_name.c_str());
    2548                 :            :       else
    2549                 :         91 :         no->func_declaration_value()->set_asm_name(ext_name);
    2550                 :            :     }
    2551                 :            :   else
    2552                 :          0 :     go_error_at(loc,
    2553                 :            :                 ("%s is not a function; "
    2554                 :            :                  "%<//go:linkname%> is only supported for functions"),
    2555                 :            :                 go_name.c_str());
    2556                 :       2582 : }
    2557                 :            : 
    2558                 :            : // Mark all local variables used.  This is used when some types of
    2559                 :            : // parse error occur.
    2560                 :            : 
    2561                 :            : void
    2562                 :         54 : Gogo::mark_locals_used()
    2563                 :            : {
    2564                 :         82 :   for (Open_functions::iterator pf = this->functions_.begin();
    2565                 :         82 :        pf != this->functions_.end();
    2566                 :         82 :        ++pf)
    2567                 :            :     {
    2568                 :         65 :       for (std::vector<Block*>::iterator pb = pf->blocks.begin();
    2569                 :         65 :            pb != pf->blocks.end();
    2570                 :         65 :            ++pb)
    2571                 :         37 :         (*pb)->bindings()->mark_locals_used();
    2572                 :            :     }
    2573                 :         54 : }
    2574                 :            : 
    2575                 :            : // Record that we've seen an interface type.
    2576                 :            : 
    2577                 :            : void
    2578                 :      58450 : Gogo::record_interface_type(Interface_type* itype)
    2579                 :            : {
    2580                 :      58450 :   this->interface_types_.push_back(itype);
    2581                 :      58450 : }
    2582                 :            : 
    2583                 :            : // Define the global names.  We do this only after parsing all the
    2584                 :            : // input files, because the program might define the global names
    2585                 :            : // itself.
    2586                 :            : 
    2587                 :            : void
    2588                 :       3372 : Gogo::define_global_names()
    2589                 :            : {
    2590                 :       3372 :   if (this->is_main_package())
    2591                 :            :     {
    2592                 :            :       // Every Go program has to import the runtime package, so that
    2593                 :            :       // it is properly initialized.  We can't use
    2594                 :            :       // predeclared_location here as it will cause runtime functions
    2595                 :            :       // to appear to be builtin functions.
    2596                 :       1414 :       this->import_package("runtime", "_", false, false,
    2597                 :       1414 :                            this->package_->location());
    2598                 :            :     }
    2599                 :            : 
    2600                 :     131508 :   for (Bindings::const_declarations_iterator p =
    2601                 :       3372 :          this->globals_->begin_declarations();
    2602                 :     134880 :        p != this->globals_->end_declarations();
    2603                 :     134880 :        ++p)
    2604                 :            :     {
    2605                 :     131508 :       Named_object* global_no = p->second;
    2606                 :     156277 :       std::string name(Gogo::pack_hidden_name(global_no->name(), false));
    2607                 :     131508 :       Named_object* no = this->package_->bindings()->lookup(name);
    2608                 :     131508 :       if (no == NULL)
    2609                 :     149481 :         continue;
    2610                 :      24769 :       no = no->resolve();
    2611                 :      24769 :       if (no->is_type_declaration())
    2612                 :            :         {
    2613                 :          0 :           if (global_no->is_type())
    2614                 :            :             {
    2615                 :          0 :               if (no->type_declaration_value()->has_methods())
    2616                 :            :                 {
    2617                 :          0 :                   for (std::vector<Named_object*>::const_iterator pm =
    2618                 :          0 :                          no->type_declaration_value()->methods()->begin();
    2619                 :          0 :                        pm != no->type_declaration_value()->methods()->end();
    2620                 :          0 :                        pm++)
    2621                 :          0 :                     go_error_at((*pm)->location(),
    2622                 :            :                                 "may not define methods on non-local type");
    2623                 :            :                 }
    2624                 :          0 :               no->set_type_value(global_no->type_value());
    2625                 :            :             }
    2626                 :            :           else
    2627                 :            :             {
    2628                 :          0 :               go_error_at(no->location(), "expected type");
    2629                 :          0 :               Type* errtype = Type::make_error_type();
    2630                 :          0 :               Named_object* err =
    2631                 :          0 :                 Named_object::make_type("erroneous_type", NULL, errtype,
    2632                 :            :                                         Linemap::predeclared_location());
    2633                 :          0 :               no->set_type_value(err->type_value());
    2634                 :            :             }
    2635                 :            :         }
    2636                 :      24769 :       else if (no->is_unknown())
    2637                 :      24674 :         no->unknown_value()->set_real_named_object(global_no);
    2638                 :            :     }
    2639                 :            : 
    2640                 :            :   // Give an error if any name is defined in both the package block
    2641                 :            :   // and the file block.  For example, this can happen if one file
    2642                 :            :   // imports "fmt" and another file defines a global variable fmt.
    2643                 :     294807 :   for (Bindings::const_declarations_iterator p =
    2644                 :       3372 :          this->package_->bindings()->begin_declarations();
    2645                 :     298179 :        p != this->package_->bindings()->end_declarations();
    2646                 :     298179 :        ++p)
    2647                 :            :     {
    2648                 :     294807 :       if (p->second->is_unknown()
    2649                 :     294807 :           && p->second->unknown_value()->real_named_object() == NULL)
    2650                 :            :         {
    2651                 :            :           // No point in warning about an undefined name, as we will
    2652                 :            :           // get other errors later anyhow.
    2653                 :         41 :           continue;
    2654                 :            :         }
    2655                 :     294766 :       File_block_names::const_iterator pf =
    2656                 :     294766 :         this->file_block_names_.find(p->second->name());
    2657                 :     294766 :       if (pf != this->file_block_names_.end())
    2658                 :            :         {
    2659                 :          2 :           std::string n = p->second->message_name();
    2660                 :          1 :           go_error_at(p->second->location(),
    2661                 :            :                       "%qs defined as both imported name and global name",
    2662                 :            :                       n.c_str());
    2663                 :          1 :           go_inform(pf->second, "%qs imported here", n.c_str());
    2664                 :            :         }
    2665                 :            : 
    2666                 :            :       // No package scope identifier may be named "init".
    2667                 :     294766 :       if (!p->second->is_function()
    2668                 :     505722 :           && Gogo::unpack_hidden_name(p->second->name()) == "init")
    2669                 :            :         {
    2670                 :          4 :           go_error_at(p->second->location(),
    2671                 :            :                       "cannot declare init - must be func");
    2672                 :            :         }
    2673                 :            :     }
    2674                 :       3372 : }
    2675                 :            : 
    2676                 :            : // Clear out names in file scope.
    2677                 :            : 
    2678                 :            : void
    2679                 :      10245 : Gogo::clear_file_scope()
    2680                 :            : {
    2681                 :      10245 :   this->package_->bindings()->clear_file_scope(this);
    2682                 :            : 
    2683                 :            :   // Warn about packages which were imported but not used.
    2684                 :      10245 :   bool quiet = saw_errors();
    2685                 :     271272 :   for (Packages::iterator p = this->packages_.begin();
    2686                 :     271272 :        p != this->packages_.end();
    2687                 :     271272 :        ++p)
    2688                 :            :     {
    2689                 :     261027 :       Package* package = p->second;
    2690                 :     261027 :       if (package != this->package_ && !quiet)
    2691                 :            :         {
    2692                 :     284068 :           for (Package::Aliases::const_iterator p1 = package->aliases().begin();
    2693                 :     284068 :                p1 != package->aliases().end();
    2694                 :     284068 :                ++p1)
    2695                 :            :             {
    2696                 :      33468 :               if (!p1->second->used())
    2697                 :            :                 {
    2698                 :            :                   // Give a more refined error message if the alias name is known.
    2699                 :         28 :                   std::string pkg_name = package->package_name();
    2700                 :         14 :                   if (p1->first != pkg_name && p1->first[0] != '.')
    2701                 :            :                     {
    2702                 :          4 :                       go_error_at(p1->second->location(),
    2703                 :            :                                   "imported and not used: %s as %s",
    2704                 :          8 :                                   Gogo::message_name(pkg_name).c_str(),
    2705                 :          8 :                                   Gogo::message_name(p1->first).c_str());
    2706                 :            :                     }
    2707                 :            :                   else
    2708                 :         10 :                     go_error_at(p1->second->location(),
    2709                 :            :                                 "imported and not used: %s",
    2710                 :         20 :                                 Gogo::message_name(pkg_name).c_str());
    2711                 :            :                 }
    2712                 :            :             }
    2713                 :            :         }
    2714                 :     261027 :       package->clear_used();
    2715                 :            :     }
    2716                 :            : 
    2717                 :      10245 :   this->current_file_imported_unsafe_ = false;
    2718                 :      10245 : }
    2719                 :            : 
    2720                 :            : // Queue up a type-specific hash function for later writing.  These
    2721                 :            : // are written out in write_specific_type_functions, called after the
    2722                 :            : // parse tree is lowered.
    2723                 :            : 
    2724                 :            : void
    2725                 :          5 : Gogo::queue_hash_function(Type* type, int64_t size,
    2726                 :            :                           const std::string& hash_name,
    2727                 :            :                           Function_type* hash_fntype)
    2728                 :            : {
    2729                 :          5 :   go_assert(!this->specific_type_functions_are_written_);
    2730                 :          5 :   go_assert(!this->in_global_scope());
    2731                 :          5 :   Specific_type_function::Specific_type_function_kind kind =
    2732                 :            :     Specific_type_function::SPECIFIC_HASH;
    2733                 :          5 :   Specific_type_function* tsf = new Specific_type_function(type, NULL, size,
    2734                 :            :                                                            kind, hash_name,
    2735                 :          5 :                                                            hash_fntype);
    2736                 :          5 :   this->specific_type_functions_.push_back(tsf);
    2737                 :          5 : }
    2738                 :            : 
    2739                 :            : // Queue up a type-specific equal function for later writing.  These
    2740                 :            : // are written out in write_specific_type_functions, called after the
    2741                 :            : // parse tree is lowered.
    2742                 :            : 
    2743                 :            : void
    2744                 :         79 : Gogo::queue_equal_function(Type* type, Named_type* name, int64_t size,
    2745                 :            :                            const std::string& equal_name,
    2746                 :            :                            Function_type* equal_fntype)
    2747                 :            : {
    2748                 :         79 :   go_assert(!this->specific_type_functions_are_written_);
    2749                 :         79 :   go_assert(!this->in_global_scope());
    2750                 :         79 :   Specific_type_function::Specific_type_function_kind kind =
    2751                 :            :     Specific_type_function::SPECIFIC_EQUAL;
    2752                 :         79 :   Specific_type_function* tsf = new Specific_type_function(type, name, size,
    2753                 :            :                                                            kind, equal_name,
    2754                 :         79 :                                                            equal_fntype);
    2755                 :         79 :   this->specific_type_functions_.push_back(tsf);
    2756                 :         79 : }
    2757                 :            : 
    2758                 :            : // Look for types which need specific hash or equality functions.
    2759                 :            : 
    2760                 :       3372 : class Specific_type_functions : public Traverse
    2761                 :            : {
    2762                 :            :  public:
    2763                 :       3372 :   Specific_type_functions(Gogo* gogo)
    2764                 :       3372 :     : Traverse(traverse_types),
    2765                 :       3372 :       gogo_(gogo)
    2766                 :            :   { }
    2767                 :            : 
    2768                 :            :   int
    2769                 :            :   type(Type*);
    2770                 :            : 
    2771                 :            :  private:
    2772                 :            :   Gogo* gogo_;
    2773                 :            : };
    2774                 :            : 
    2775                 :            : int
    2776                 :    9030670 : Specific_type_functions::type(Type* t)
    2777                 :            : {
    2778                 :    9030670 :   switch (t->classification())
    2779                 :            :     {
    2780                 :     504499 :     case Type::TYPE_NAMED:
    2781                 :     504499 :       {
    2782                 :     504499 :         Named_type* nt = t->named_type();
    2783                 :     504499 :         if (nt->is_alias())
    2784                 :            :           return TRAVERSE_CONTINUE;
    2785                 :     494649 :         if (t->needs_specific_type_functions(this->gogo_))
    2786                 :     267101 :           t->equal_function(this->gogo_, nt, NULL);
    2787                 :            : 
    2788                 :            :         // If this is a struct type, we don't want to make functions
    2789                 :            :         // for the unnamed struct.
    2790                 :     494649 :         Type* rt = nt->real_type();
    2791                 :     494649 :         if (rt->struct_type() == NULL)
    2792                 :            :           {
    2793                 :     194356 :             if (Type::traverse(rt, this) == TRAVERSE_EXIT)
    2794                 :          0 :               return TRAVERSE_EXIT;
    2795                 :            :           }
    2796                 :            :         else
    2797                 :            :           {
    2798                 :            :             // If this type is defined in another package, then we don't
    2799                 :            :             // need to worry about the unexported fields.
    2800                 :     300293 :             bool is_defined_elsewhere = nt->named_object()->package() != NULL;
    2801                 :     600586 :             const Struct_field_list* fields = rt->struct_type()->fields();
    2802                 :    2005250 :             for (Struct_field_list::const_iterator p = fields->begin();
    2803                 :    2005250 :                  p != fields->end();
    2804                 :    2005250 :                  ++p)
    2805                 :            :               {
    2806                 :    2850680 :                 if (is_defined_elsewhere
    2807                 :    1704960 :                     && Gogo::is_hidden_name(p->field_name()))
    2808                 :    1145720 :                   continue;
    2809                 :     559238 :                 if (Type::traverse(p->type(), this) == TRAVERSE_EXIT)
    2810                 :    9030670 :                   return TRAVERSE_EXIT;
    2811                 :            :               }
    2812                 :            :           }
    2813                 :            : 
    2814                 :            :         return TRAVERSE_SKIP_COMPONENTS;
    2815                 :            :       }
    2816                 :            : 
    2817                 :     537808 :     case Type::TYPE_STRUCT:
    2818                 :     537808 :     case Type::TYPE_ARRAY:
    2819                 :     537808 :       if (t->needs_specific_type_functions(this->gogo_))
    2820                 :     129709 :         t->equal_function(this->gogo_, NULL, NULL);
    2821                 :            :       break;
    2822                 :            : 
    2823                 :      63584 :     case Type::TYPE_MAP:
    2824                 :      63584 :       {
    2825                 :     127168 :         Type* key_type = t->map_type()->key_type();
    2826                 :      63584 :         if (key_type->needs_specific_type_functions(this->gogo_))
    2827                 :      30490 :           key_type->hash_function(this->gogo_, NULL);
    2828                 :            :       }
    2829                 :            :       break;
    2830                 :            : 
    2831                 :            :     default:
    2832                 :            :       break;
    2833                 :            :     }
    2834                 :            : 
    2835                 :            :   return TRAVERSE_CONTINUE;
    2836                 :            : }
    2837                 :            : 
    2838                 :            : // Write out type specific functions.
    2839                 :            : 
    2840                 :            : void
    2841                 :       3372 : Gogo::write_specific_type_functions()
    2842                 :            : {
    2843                 :       3372 :   Specific_type_functions stf(this);
    2844                 :       3372 :   this->traverse(&stf);
    2845                 :            : 
    2846                 :       3456 :   while (!this->specific_type_functions_.empty())
    2847                 :            :     {
    2848                 :         84 :       Specific_type_function* tsf = this->specific_type_functions_.back();
    2849                 :         84 :       this->specific_type_functions_.pop_back();
    2850                 :         84 :       if (tsf->kind == Specific_type_function::SPECIFIC_HASH)
    2851                 :          5 :         tsf->type->write_hash_function(this, tsf->size, tsf->fnname,
    2852                 :            :                                        tsf->fntype);
    2853                 :            :       else
    2854                 :         79 :         tsf->type->write_equal_function(this, tsf->name, tsf->size,
    2855                 :         79 :                                         tsf->fnname, tsf->fntype);
    2856                 :        148 :       delete tsf;
    2857                 :            :     }
    2858                 :       3372 :   this->specific_type_functions_are_written_ = true;
    2859                 :       3372 : }
    2860                 :            : 
    2861                 :            : // Traverse the tree.
    2862                 :            : 
    2863                 :            : void
    2864                 :      64796 : Gogo::traverse(Traverse* traverse)
    2865                 :            : {
    2866                 :            :   // Traverse the current package first for consistency.  The other
    2867                 :            :   // packages will only contain imported types, constants, and
    2868                 :            :   // declarations.
    2869                 :      64796 :   if (this->package_->bindings()->traverse(traverse, true) == TRAVERSE_EXIT)
    2870                 :            :     return;
    2871                 :    1618840 :   for (Packages::const_iterator p = this->packages_.begin();
    2872                 :    1618840 :        p != this->packages_.end();
    2873                 :    1618840 :        ++p)
    2874                 :            :     {
    2875                 :    1554040 :       if (p->second != this->package_)
    2876                 :            :         {
    2877                 :    1489240 :           if (p->second->bindings()->traverse(traverse, true) == TRAVERSE_EXIT)
    2878                 :            :             break;
    2879                 :            :         }
    2880                 :            :     }
    2881                 :            : }
    2882                 :            : 
    2883                 :            : // Add a type to verify.  This is used for types of sink variables, in
    2884                 :            : // order to give appropriate error messages.
    2885                 :            : 
    2886                 :            : void
    2887                 :       1687 : Gogo::add_type_to_verify(Type* type)
    2888                 :            : {
    2889                 :       1687 :   this->verify_types_.push_back(type);
    2890                 :       1687 : }
    2891                 :            : 
    2892                 :            : // Traversal class used to verify types.
    2893                 :            : 
    2894                 :       3372 : class Verify_types : public Traverse
    2895                 :            : {
    2896                 :            :  public:
    2897                 :       3372 :   Verify_types()
    2898                 :       3372 :     : Traverse(traverse_types)
    2899                 :            :   { }
    2900                 :            : 
    2901                 :            :   int
    2902                 :            :   type(Type*);
    2903                 :            : };
    2904                 :            : 
    2905                 :            : // Verify that a type is correct.
    2906                 :            : 
    2907                 :            : int
    2908                 :    8665240 : Verify_types::type(Type* t)
    2909                 :            : {
    2910                 :    8665240 :   if (!t->verify())
    2911                 :         26 :     return TRAVERSE_SKIP_COMPONENTS;
    2912                 :            :   return TRAVERSE_CONTINUE;
    2913                 :            : }
    2914                 :            : 
    2915                 :            : // Verify that all types are correct.
    2916                 :            : 
    2917                 :            : void
    2918                 :       3372 : Gogo::verify_types()
    2919                 :            : {
    2920                 :       3372 :   Verify_types traverse;
    2921                 :       3372 :   this->traverse(&traverse);
    2922                 :            : 
    2923                 :       3372 :   for (std::vector<Type*>::iterator p = this->verify_types_.begin();
    2924                 :       5059 :        p != this->verify_types_.end();
    2925                 :       5059 :        ++p)
    2926                 :       1687 :     (*p)->verify();
    2927                 :       3711 :   this->verify_types_.clear();
    2928                 :       3372 : }
    2929                 :            : 
    2930                 :            : // Traversal class used to lower parse tree.
    2931                 :            : 
    2932                 :       3372 : class Lower_parse_tree : public Traverse
    2933                 :            : {
    2934                 :            :  public:
    2935                 :    1477770 :   Lower_parse_tree(Gogo* gogo, Named_object* function)
    2936                 :    1477770 :     : Traverse(traverse_variables
    2937                 :            :                | traverse_constants
    2938                 :            :                | traverse_functions
    2939                 :            :                | traverse_statements
    2940                 :            :                | traverse_expressions),
    2941                 :    1477770 :       gogo_(gogo), function_(function), iota_value_(-1), inserter_()
    2942                 :            :   { }
    2943                 :            : 
    2944                 :            :   void
    2945                 :     506078 :   set_inserter(const Statement_inserter* inserter)
    2946                 :     506078 :   { this->inserter_ = *inserter; }
    2947                 :            : 
    2948                 :            :   int
    2949                 :            :   variable(Named_object*);
    2950                 :            : 
    2951                 :            :   int
    2952                 :            :   constant(Named_object*, bool);
    2953                 :            : 
    2954                 :            :   int
    2955                 :            :   function(Named_object*);
    2956                 :            : 
    2957                 :            :   int
    2958                 :            :   statement(Block*, size_t* pindex, Statement*);
    2959                 :            : 
    2960                 :            :   int
    2961                 :            :   expression(Expression**);
    2962                 :            : 
    2963                 :            :  private:
    2964                 :            :   // General IR.
    2965                 :            :   Gogo* gogo_;
    2966                 :            :   // The function we are traversing.
    2967                 :            :   Named_object* function_;
    2968                 :            :   // Value to use for the predeclared constant iota.
    2969                 :            :   int iota_value_;
    2970                 :            :   // Current statement inserter for use by expressions.
    2971                 :            :   Statement_inserter inserter_;
    2972                 :            : };
    2973                 :            : 
    2974                 :            : // Lower variables.
    2975                 :            : 
    2976                 :            : int
    2977                 :    1072320 : Lower_parse_tree::variable(Named_object* no)
    2978                 :            : {
    2979                 :    1072320 :   if (!no->is_variable())
    2980                 :            :     return TRAVERSE_CONTINUE;
    2981                 :            : 
    2982                 :     950548 :   if (no->is_variable() && no->var_value()->is_global())
    2983                 :            :     {
    2984                 :            :       // Global variables can have loops in their initialization
    2985                 :            :       // expressions.  This is handled in lower_init_expression.
    2986                 :     273147 :       no->var_value()->lower_init_expression(this->gogo_, this->function_,
    2987                 :            :                                              &this->inserter_);
    2988                 :     273147 :       return TRAVERSE_CONTINUE;
    2989                 :            :     }
    2990                 :            : 
    2991                 :            :   // This is a local variable.  We are going to return
    2992                 :            :   // TRAVERSE_SKIP_COMPONENTS here because we want to traverse the
    2993                 :            :   // initialization expression when we reach the variable declaration
    2994                 :            :   // statement.  However, that means that we need to traverse the type
    2995                 :            :   // ourselves.
    2996                 :     677401 :   if (no->var_value()->has_type())
    2997                 :            :     {
    2998                 :     321439 :       Type* type = no->var_value()->type();
    2999                 :     321439 :       if (type != NULL)
    3000                 :            :         {
    3001                 :     321439 :           if (Type::traverse(type, this) == TRAVERSE_EXIT)
    3002                 :            :             return TRAVERSE_EXIT;
    3003                 :            :         }
    3004                 :            :     }
    3005                 :     677401 :   go_assert(!no->var_value()->has_pre_init());
    3006                 :            : 
    3007                 :            :   return TRAVERSE_SKIP_COMPONENTS;
    3008                 :            : }
    3009                 :            : 
    3010                 :            : // Lower constants.  We handle constants specially so that we can set
    3011                 :            : // the right value for the predeclared constant iota.  This works in
    3012                 :            : // conjunction with the way we lower Const_expression objects.
    3013                 :            : 
    3014                 :            : int
    3015                 :    1643010 : Lower_parse_tree::constant(Named_object* no, bool)
    3016                 :            : {
    3017                 :    1643010 :   Named_constant* nc = no->const_value();
    3018                 :            : 
    3019                 :            :   // Don't get into trouble if the constant's initializer expression
    3020                 :            :   // refers to the constant itself.
    3021                 :    1643010 :   if (nc->lowering())
    3022                 :            :     return TRAVERSE_CONTINUE;
    3023                 :    1643000 :   nc->set_lowering();
    3024                 :            : 
    3025                 :    1643000 :   go_assert(this->iota_value_ == -1);
    3026                 :    1643000 :   this->iota_value_ = nc->iota_value();
    3027                 :    1643000 :   nc->traverse_expression(this);
    3028                 :    1643000 :   this->iota_value_ = -1;
    3029                 :            : 
    3030                 :    1643000 :   nc->clear_lowering();
    3031                 :            : 
    3032                 :            :   // We will traverse the expression a second time, but that will be
    3033                 :            :   // fast.
    3034                 :            : 
    3035                 :    1643000 :   return TRAVERSE_CONTINUE;
    3036                 :            : }
    3037                 :            : 
    3038                 :            : // Lower the body of a function, and set the closure type.  Record the
    3039                 :            : // function while lowering it, so that we can pass it down when
    3040                 :            : // lowering an expression.
    3041                 :            : 
    3042                 :            : int
    3043                 :     149505 : Lower_parse_tree::function(Named_object* no)
    3044                 :            : {
    3045                 :     149505 :   no->func_value()->set_closure_type();
    3046                 :            : 
    3047                 :     149505 :   go_assert(this->function_ == NULL);
    3048                 :     149505 :   this->function_ = no;
    3049                 :     149505 :   int t = no->func_value()->traverse(this);
    3050                 :     149505 :   this->function_ = NULL;
    3051                 :            : 
    3052                 :     149505 :   if (t == TRAVERSE_EXIT)
    3053                 :          0 :     return t;
    3054                 :            :   return TRAVERSE_SKIP_COMPONENTS;
    3055                 :            : }
    3056                 :            : 
    3057                 :            : // Lower statement parse trees.
    3058                 :            : 
    3059                 :            : int
    3060                 :    5346180 : Lower_parse_tree::statement(Block* block, size_t* pindex, Statement* sorig)
    3061                 :            : {
    3062                 :            :   // Because we explicitly traverse the statement's contents
    3063                 :            :   // ourselves, we want to skip block statements here.  There is
    3064                 :            :   // nothing to lower in a block statement.
    3065                 :    5346180 :   if (sorig->is_block_statement())
    3066                 :            :     return TRAVERSE_CONTINUE;
    3067                 :            : 
    3068                 :    4436700 :   Statement_inserter hold_inserter(this->inserter_);
    3069                 :    4436700 :   this->inserter_ = Statement_inserter(block, pindex);
    3070                 :            : 
    3071                 :            :   // Lower the expressions first.
    3072                 :    4436700 :   int t = sorig->traverse_contents(this);
    3073                 :    4436700 :   if (t == TRAVERSE_EXIT)
    3074                 :            :     {
    3075                 :          0 :       this->inserter_ = hold_inserter;
    3076                 :          0 :       return t;
    3077                 :            :     }
    3078                 :            : 
    3079                 :            :   // Keep lowering until nothing changes.
    3080                 :            :   Statement* s = sorig;
    3081                 :    5033520 :   while (true)
    3082                 :            :     {
    3083                 :    5033520 :       Statement* snew = s->lower(this->gogo_, this->function_, block,
    3084                 :            :                                  &this->inserter_);
    3085                 :    5033520 :       if (snew == s)
    3086                 :            :         break;
    3087                 :     596825 :       s = snew;
    3088                 :     596825 :       t = s->traverse_contents(this);
    3089                 :     596825 :       if (t == TRAVERSE_EXIT)
    3090                 :            :         {
    3091                 :          0 :           this->inserter_ = hold_inserter;
    3092                 :          0 :           return t;
    3093                 :            :         }
    3094                 :            :     }
    3095                 :            : 
    3096                 :    4436700 :   if (s != sorig)
    3097                 :     545572 :     block->replace_statement(*pindex, s);
    3098                 :            : 
    3099                 :    4436700 :   this->inserter_ = hold_inserter;
    3100                 :    4436700 :   return TRAVERSE_SKIP_COMPONENTS;
    3101                 :            : }
    3102                 :            : 
    3103                 :            : // Lower expression parse trees.
    3104                 :            : 
    3105                 :            : int
    3106                 :   25607300 : Lower_parse_tree::expression(Expression** pexpr)
    3107                 :            : {
    3108                 :            :   // We have to lower all subexpressions first, so that we can get
    3109                 :            :   // their type if necessary.  This is awkward, because we don't have
    3110                 :            :   // a postorder traversal pass.
    3111                 :   25607300 :   if ((*pexpr)->traverse_subexpressions(this) == TRAVERSE_EXIT)
    3112                 :            :     return TRAVERSE_EXIT;
    3113                 :            :   // Keep lowering until nothing changes.
    3114                 :   29554900 :   while (true)
    3115                 :            :     {
    3116                 :   27581100 :       Expression* e = *pexpr;
    3117                 :   27581100 :       Expression* enew = e->lower(this->gogo_, this->function_,
    3118                 :            :                                   &this->inserter_, this->iota_value_);
    3119                 :   27581100 :       if (enew == e)
    3120                 :            :         break;
    3121                 :    1973790 :       if (enew->traverse_subexpressions(this) == TRAVERSE_EXIT)
    3122                 :            :         return TRAVERSE_EXIT;
    3123                 :    1973790 :       *pexpr = enew;
    3124                 :    1973790 :     }
    3125                 :            : 
    3126                 :            :   // Lower the type of this expression before the parent looks at it,
    3127                 :            :   // in case the type contains an array that has expressions in its
    3128                 :            :   // length.  Skip an Unknown_expression, as at this point that means
    3129                 :            :   // a composite literal key that does not have a type.
    3130                 :   25607300 :   if ((*pexpr)->unknown_expression() == NULL)
    3131                 :   25607300 :     Type::traverse((*pexpr)->type(), this);
    3132                 :            : 
    3133                 :            :   return TRAVERSE_SKIP_COMPONENTS;
    3134                 :            : }
    3135                 :            : 
    3136                 :            : // Lower the parse tree.  This is called after the parse is complete,
    3137                 :            : // when all names should be resolved.
    3138                 :            : 
    3139                 :            : void
    3140                 :       3372 : Gogo::lower_parse_tree()
    3141                 :            : {
    3142                 :       3372 :   Lower_parse_tree lower_parse_tree(this, NULL);
    3143                 :       3372 :   this->traverse(&lower_parse_tree);
    3144                 :            : 
    3145                 :            :   // If we found any functions defined in other packages that are
    3146                 :            :   // inlinables, import their bodies and turn them into functions.
    3147                 :            :   //
    3148                 :            :   // Note that as we import inlinable functions we may find more
    3149                 :            :   // inlinable functions, so don't use an iterator.
    3150                 :      13908 :   for (size_t i = 0; i < this->imported_inlinable_functions_.size(); i++)
    3151                 :            :     {
    3152                 :      10536 :       Named_object* no = this->imported_inlinable_functions_[i];
    3153                 :      10536 :       no->func_declaration_value()->import_function_body(this, no);
    3154                 :            :     }
    3155                 :            : 
    3156                 :            :   // There might be type definitions that involve expressions such as the
    3157                 :            :   // array length.  Make sure to lower these expressions as well.  Otherwise,
    3158                 :            :   // errors hidden within a type can introduce unexpected errors into later
    3159                 :            :   // passes.
    3160                 :       5059 :   for (std::vector<Type*>::iterator p = this->verify_types_.begin();
    3161                 :       5059 :        p != this->verify_types_.end();
    3162                 :       5059 :        ++p)
    3163                 :       1687 :     Type::traverse(*p, &lower_parse_tree);
    3164                 :       3372 : }
    3165                 :            : 
    3166                 :            : // Lower a block.
    3167                 :            : 
    3168                 :            : void
    3169                 :     100656 : Gogo::lower_block(Named_object* function, Block* block)
    3170                 :            : {
    3171                 :     100656 :   Lower_parse_tree lower_parse_tree(this, function);
    3172                 :     100656 :   block->traverse(&lower_parse_tree);
    3173                 :     100656 : }
    3174                 :            : 
    3175                 :            : // Lower an expression.  INSERTER may be NULL, in which case the
    3176                 :            : // expression had better not need to create any temporaries.
    3177                 :            : 
    3178                 :            : void
    3179                 :     520392 : Gogo::lower_expression(Named_object* function, Statement_inserter* inserter,
    3180                 :            :                        Expression** pexpr)
    3181                 :            : {
    3182                 :     520392 :   Lower_parse_tree lower_parse_tree(this, function);
    3183                 :     520392 :   if (inserter != NULL)
    3184                 :     506078 :     lower_parse_tree.set_inserter(inserter);
    3185                 :     520392 :   lower_parse_tree.expression(pexpr);
    3186                 :     520392 : }
    3187                 :            : 
    3188                 :            : // Lower a constant.  This is called when lowering a reference to a
    3189                 :            : // constant.  We have to make sure that the constant has already been
    3190                 :            : // lowered.
    3191                 :            : 
    3192                 :            : void
    3193                 :     853348 : Gogo::lower_constant(Named_object* no)
    3194                 :            : {
    3195                 :     853348 :   go_assert(no->is_const());
    3196                 :     853348 :   Lower_parse_tree lower(this, NULL);
    3197                 :     853348 :   lower.constant(no, false);
    3198                 :     853348 : }
    3199                 :            : 
    3200                 :            : // Make implicit type conversions explicit.  Currently only does for
    3201                 :            : // interface conversions, so the escape analysis can see them and
    3202                 :            : // optimize.
    3203                 :            : 
    3204                 :      15346 : class Add_conversions : public Traverse
    3205                 :            : {
    3206                 :            :  public:
    3207                 :      15346 :   Add_conversions()
    3208                 :            :     : Traverse(traverse_statements
    3209                 :      15346 :                | traverse_expressions)
    3210                 :            :   { }
    3211                 :            : 
    3212                 :            :   int
    3213                 :            :   statement(Block*, size_t* pindex, Statement*);
    3214                 :            : 
    3215                 :            :   int
    3216                 :            :   expression(Expression**);
    3217                 :            : };
    3218                 :            : 
    3219                 :            : // Add explicit conversions in a statement.
    3220                 :            : 
    3221                 :            : int
    3222                 :    3183980 : Add_conversions::statement(Block*, size_t*, Statement* sorig)
    3223                 :            : {
    3224                 :    3183980 :   sorig->add_conversions();
    3225                 :    3183980 :   return TRAVERSE_CONTINUE;
    3226                 :            : }
    3227                 :            : 
    3228                 :            : // Add explicit conversions in an expression.
    3229                 :            : 
    3230                 :            : int
    3231                 :    9667620 : Add_conversions::expression(Expression** pexpr)
    3232                 :            : {
    3233                 :    9667620 :   (*pexpr)->add_conversions();
    3234                 :    9667620 :   return TRAVERSE_CONTINUE;
    3235                 :            : }
    3236                 :            : 
    3237                 :            : void
    3238                 :       3372 : Gogo::add_conversions()
    3239                 :            : {
    3240                 :       3372 :   Add_conversions add_conversions;
    3241                 :       3372 :   this->traverse(&add_conversions);
    3242                 :       3372 : }
    3243                 :            : 
    3244                 :            : void
    3245                 :      11974 : Gogo::add_conversions_in_block(Block *b)
    3246                 :            : {
    3247                 :      11974 :   Add_conversions add_conversions;
    3248                 :      11974 :   b->traverse(&add_conversions);
    3249                 :      11974 : }
    3250                 :            : 
    3251                 :            : // Traversal class for simple deadcode elimination.
    3252                 :            : 
    3253                 :       3372 : class Remove_deadcode : public Traverse
    3254                 :            : {
    3255                 :            :  public:
    3256                 :       3372 :   Remove_deadcode()
    3257                 :            :     : Traverse(traverse_statements
    3258                 :       3372 :                | traverse_expressions)
    3259                 :            :   { }
    3260                 :            : 
    3261                 :            :   int
    3262                 :            :   statement(Block*, size_t* pindex, Statement*);
    3263                 :            : 
    3264                 :            :   int
    3265                 :            :   expression(Expression**);
    3266                 :            : };
    3267                 :            : 
    3268                 :            : // Remove deadcode in a statement.
    3269                 :            : 
    3270                 :            : int
    3271                 :    3146660 : Remove_deadcode::statement(Block* block, size_t* pindex, Statement* sorig)
    3272                 :            : {
    3273                 :    3146660 :   Location loc = sorig->location();
    3274                 :    3146660 :   If_statement* ifs = sorig->if_statement();
    3275                 :     284466 :   if (ifs != NULL)
    3276                 :            :     {
    3277                 :            :       // Remove the dead branch of an if statement.
    3278                 :     284466 :       bool bval;
    3279                 :     284466 :       if (ifs->condition()->boolean_constant_value(&bval))
    3280                 :            :         {
    3281                 :       3528 :           Statement* s;
    3282                 :       3528 :           if (bval)
    3283                 :        694 :             s = Statement::make_block_statement(ifs->then_block(),
    3284                 :            :                                                 loc);
    3285                 :            :           else
    3286                 :       2834 :             if (ifs->else_block() != NULL)
    3287                 :        169 :               s = Statement::make_block_statement(ifs->else_block(),
    3288                 :            :                                                   loc);
    3289                 :            :             else
    3290                 :            :               // Make a dummy statement.
    3291                 :       2665 :               s = Statement::make_statement(Expression::make_boolean(false, loc),
    3292                 :            :                                             true);
    3293                 :            : 
    3294                 :       3528 :           block->replace_statement(*pindex, s);
    3295                 :            :         }
    3296                 :            :     }
    3297                 :    3146660 :   return TRAVERSE_CONTINUE;
    3298                 :            : }
    3299                 :            : 
    3300                 :            : // Remove deadcode in an expression.
    3301                 :            : 
    3302                 :            : int
    3303                 :    9423110 : Remove_deadcode::expression(Expression** pexpr)
    3304                 :            : {
    3305                 :            :   // Discard the right arm of a shortcut expression of constant value.
    3306                 :    9423110 :   Binary_expression* be = (*pexpr)->binary_expression();
    3307                 :     561467 :   bool bval;
    3308                 :     561467 :   if (be != NULL
    3309                 :     561467 :       && be->boolean_constant_value(&bval)
    3310                 :        979 :       && (be->op() == OPERATOR_ANDAND
    3311                 :        249 :           || be->op() == OPERATOR_OROR))
    3312                 :        977 :     *pexpr = Expression::make_boolean(bval, be->location());
    3313                 :    9423110 :   return TRAVERSE_CONTINUE;
    3314                 :            : }
    3315                 :            : 
    3316                 :            : // Remove deadcode.
    3317                 :            : 
    3318                 :            : void
    3319                 :       3372 : Gogo::remove_deadcode()
    3320                 :            : {
    3321                 :       3372 :   Remove_deadcode remove_deadcode;
    3322                 :       3372 :   this->traverse(&remove_deadcode);
    3323                 :       3372 : }
    3324                 :            : 
    3325                 :            : // Traverse the tree to create function descriptors as needed.
    3326                 :            : 
    3327                 :       6744 : class Create_function_descriptors : public Traverse
    3328                 :            : {
    3329                 :            :  public:
    3330                 :       3372 :   Create_function_descriptors(Gogo* gogo)
    3331                 :       3372 :     : Traverse(traverse_functions | traverse_expressions),
    3332                 :       3372 :       gogo_(gogo)
    3333                 :            :   { }
    3334                 :            : 
    3335                 :            :   int
    3336                 :            :   function(Named_object*);
    3337                 :            : 
    3338                 :            :   int
    3339                 :            :   expression(Expression**);
    3340                 :            : 
    3341                 :            :  private:
    3342                 :            :   Gogo* gogo_;
    3343                 :            : };
    3344                 :            : 
    3345                 :            : // Create a descriptor for every top-level exported function.
    3346                 :            : 
    3347                 :            : int
    3348                 :     160669 : Create_function_descriptors::function(Named_object* no)
    3349                 :            : {
    3350                 :     160669 :   if (no->is_function()
    3351                 :     160669 :       && no->func_value()->enclosing() == NULL
    3352                 :     140459 :       && !no->func_value()->is_method()
    3353                 :      74880 :       && !Gogo::is_hidden_name(no->name())
    3354                 :     198616 :       && !Gogo::is_thunk(no))
    3355                 :      36815 :     no->func_value()->descriptor(this->gogo_, no);
    3356                 :            : 
    3357                 :     160669 :   return TRAVERSE_CONTINUE;
    3358                 :            : }
    3359                 :            : 
    3360                 :            : // If we see a function referenced in any way other than calling it,
    3361                 :            : // create a descriptor for it.
    3362                 :            : 
    3363                 :            : int
    3364                 :    8771710 : Create_function_descriptors::expression(Expression** pexpr)
    3365                 :            : {
    3366                 :    8771710 :   Expression* expr = *pexpr;
    3367                 :            : 
    3368                 :    8771710 :   Func_expression* fe = expr->func_expression();
    3369                 :      42175 :   if (fe != NULL)
    3370                 :            :     {
    3371                 :            :       // We would not get here for a call to this function, so this is
    3372                 :            :       // a reference to a function other than calling it.  We need a
    3373                 :            :       // descriptor.
    3374                 :      42175 :       if (fe->closure() != NULL)
    3375                 :            :         return TRAVERSE_CONTINUE;
    3376                 :      34650 :       Named_object* no = fe->named_object();
    3377                 :      34650 :       if (no->is_function() && !no->func_value()->is_method())
    3378                 :      19958 :         no->func_value()->descriptor(this->gogo_, no);
    3379                 :      14692 :       else if (no->is_function_declaration()
    3380                 :      14692 :                && !no->func_declaration_value()->type()->is_method()
    3381                 :      29384 :                && !Linemap::is_predeclared_location(no->location()))
    3382                 :      13790 :         no->func_declaration_value()->descriptor(this->gogo_, no);
    3383                 :      34650 :       return TRAVERSE_CONTINUE;
    3384                 :            :     }
    3385                 :            : 
    3386                 :    8729530 :   Bound_method_expression* bme = expr->bound_method_expression();
    3387                 :        844 :   if (bme != NULL)
    3388                 :            :     {
    3389                 :            :       // We would not get here for a call to this method, so this is a
    3390                 :            :       // method value.  We need to create a thunk.
    3391                 :        844 :       Bound_method_expression::create_thunk(this->gogo_, bme->method(),
    3392                 :            :                                             bme->function());
    3393                 :        844 :       return TRAVERSE_CONTINUE;
    3394                 :            :     }
    3395                 :            : 
    3396                 :    8728690 :   Interface_field_reference_expression* ifre =
    3397                 :    8728690 :     expr->interface_field_reference_expression();
    3398                 :         78 :   if (ifre != NULL)
    3399                 :            :     {
    3400                 :            :       // We would not get here for a call to this interface method, so
    3401                 :            :       // this is a method value.  We need to create a thunk.
    3402                 :         78 :       Interface_type* type = ifre->expr()->type()->interface_type();
    3403                 :         78 :       if (type != NULL)
    3404                 :         78 :         Interface_field_reference_expression::create_thunk(this->gogo_, type,
    3405                 :            :                                                            ifre->name());
    3406                 :         78 :       return TRAVERSE_CONTINUE;
    3407                 :            :     }
    3408                 :            : 
    3409                 :    8728610 :   Call_expression* ce = expr->call_expression();
    3410                 :     679055 :   if (ce != NULL)
    3411                 :            :     {
    3412                 :     679055 :       Expression* fn = ce->fn();
    3413                 :     679055 :       if (fn->func_expression() != NULL
    3414                 :     679055 :           || fn->bound_method_expression() != NULL
    3415                 :     663065 :           || fn->interface_field_reference_expression() != NULL)
    3416                 :            :         {
    3417                 :            :           // Traverse the arguments but not the function.
    3418                 :     663065 :           Expression_list* args = ce->args();
    3419                 :     663065 :           if (args != NULL)
    3420                 :            :             {
    3421                 :     618454 :               if (args->traverse(this) == TRAVERSE_EXIT)
    3422                 :            :                 return TRAVERSE_EXIT;
    3423                 :            :             }
    3424                 :     663065 :           return TRAVERSE_SKIP_COMPONENTS;
    3425                 :            :         }
    3426                 :            :     }
    3427                 :            : 
    3428                 :            :   return TRAVERSE_CONTINUE;
    3429                 :            : }
    3430                 :            : 
    3431                 :            : // Create function descriptors as needed.  We need a function
    3432                 :            : // descriptor for all exported functions and for all functions that
    3433                 :            : // are referenced without being called.
    3434                 :            : 
    3435                 :            : void
    3436                 :       3372 : Gogo::create_function_descriptors()
    3437                 :            : {
    3438                 :            :   // Create a function descriptor for any exported function that is
    3439                 :            :   // declared in this package.  This is so that we have a descriptor
    3440                 :            :   // for functions written in assembly.  Gather the descriptors first
    3441                 :            :   // so that we don't add declarations while looping over them.
    3442                 :       3372 :   std::vector<Named_object*> fndecls;
    3443                 :       3372 :   Bindings* b = this->package_->bindings();
    3444                 :     298753 :   for (Bindings::const_declarations_iterator p = b->begin_declarations();
    3445                 :     298753 :        p != b->end_declarations();
    3446                 :     298753 :        ++p)
    3447                 :            :     {
    3448                 :     295381 :       Named_object* no = p->second;
    3449                 :     295381 :       if (no->is_function_declaration()
    3450                 :       3556 :           && !no->func_declaration_value()->type()->is_method()
    3451                 :       3556 :           && !Linemap::is_predeclared_location(no->location())
    3452                 :     298937 :           && !Gogo::is_hidden_name(no->name()))
    3453                 :        472 :         fndecls.push_back(no);
    3454                 :            :     }
    3455                 :       3844 :   for (std::vector<Named_object*>::const_iterator p = fndecls.begin();
    3456                 :       3844 :        p != fndecls.end();
    3457                 :       3844 :        ++p)
    3458                 :        472 :     (*p)->func_declaration_value()->descriptor(this, *p);
    3459                 :       3372 :   fndecls.clear();
    3460                 :            : 
    3461                 :       6744 :   Create_function_descriptors cfd(this);
    3462                 :       3372 :   this->traverse(&cfd);
    3463                 :       3372 : }
    3464                 :            : 
    3465                 :            : // Finalize the methods of an interface type.
    3466                 :            : 
    3467                 :            : int
    3468                 :   17807000 : Finalize_methods::type(Type* t)
    3469                 :            : {
    3470                 :            :   // Check the classification so that we don't finalize the methods
    3471                 :            :   // twice for a named interface type.
    3472                 :   17807000 :   switch (t->classification())
    3473                 :            :     {
    3474                 :     233036 :     case Type::TYPE_INTERFACE:
    3475                 :     233036 :       t->interface_type()->finalize_methods();
    3476                 :     233036 :       break;
    3477                 :            : 
    3478                 :    1646660 :     case Type::TYPE_NAMED:
    3479                 :    1646660 :       {
    3480                 :    1646660 :         Named_type* nt = t->named_type();
    3481                 :    1646660 :         Type* rt = nt->real_type();
    3482                 :    1646660 :         if (rt->classification() != Type::TYPE_STRUCT)
    3483                 :            :           {
    3484                 :            :             // Finalize the methods of the real type first.
    3485                 :     733033 :             if (Type::traverse(rt, this) == TRAVERSE_EXIT)
    3486                 :            :               return TRAVERSE_EXIT;
    3487                 :            : 
    3488                 :            :             // Finalize the methods of this type.
    3489                 :     733033 :             nt->finalize_methods(this->gogo_);
    3490                 :            :           }
    3491                 :            :         else
    3492                 :            :           {
    3493                 :            :             // We don't want to finalize the methods of a named struct
    3494                 :            :             // type, as the methods should be attached to the named
    3495                 :            :             // type, not the struct type.  We just want to finalize
    3496                 :            :             // the field types.
    3497                 :            :             //
    3498                 :            :             // It is possible that a field type refers indirectly to
    3499                 :            :             // this type, such as via a field with function type with
    3500                 :            :             // an argument or result whose type is this type.  To
    3501                 :            :             // avoid the cycle, first finalize the methods of any
    3502                 :            :             // embedded types, which are the only types we need to
    3503                 :            :             // know to finalize the methods of this type.
    3504                 :    1827250 :             const Struct_field_list* fields = rt->struct_type()->fields();
    3505                 :     913623 :             if (fields != NULL)
    3506                 :            :               {
    3507                 :    5992880 :                 for (Struct_field_list::const_iterator pf = fields->begin();
    3508                 :    5992880 :                      pf != fields->end();
    3509                 :    5992880 :                      ++pf)
    3510                 :            :                   {
    3511                 :    5079260 :                     if (pf->is_anonymous())
    3512                 :            :                       {
    3513                 :      89379 :                         if (Type::traverse(pf->type(), this) == TRAVERSE_EXIT)
    3514                 :   17807000 :                           return TRAVERSE_EXIT;
    3515                 :            :                       }
    3516                 :            :                   }
    3517                 :            :               }
    3518                 :            : 
    3519                 :            :             // Finalize the methods of this type.
    3520                 :     913623 :             nt->finalize_methods(this->gogo_);
    3521                 :            : 
    3522                 :            :             // Finalize all the struct fields.
    3523                 :    1827250 :             if (rt->struct_type()->traverse_field_types(this) == TRAVERSE_EXIT)
    3524                 :            :               return TRAVERSE_EXIT;
    3525                 :            :           }
    3526                 :            : 
    3527                 :            :         // If this type is defined in a different package, then finalize the
    3528                 :            :         // types of all the methods, since we won't see them otherwise.
    3529                 :    1646660 :         if (nt->named_object()->package() != NULL && nt->has_any_methods())
    3530                 :            :           {
    3531                 :     706092 :             const Methods* methods = nt->methods();
    3532                 :    5758960 :             for (Methods::const_iterator p = methods->begin();
    3533                 :    5758960 :                  p != methods->end();
    3534                 :    5758960 :                  ++p)
    3535                 :            :               {
    3536                 :    5052870 :                 if (Type::traverse(p->second->type(), this) == TRAVERSE_EXIT)
    3537                 :   17807000 :                   return TRAVERSE_EXIT;
    3538                 :            :               }
    3539                 :            :           }
    3540                 :            : 
    3541                 :            :         // Finalize the types of all methods that are declared but not
    3542                 :            :         // defined, since we won't see the declarations otherwise.
    3543                 :    1646660 :         if (nt->named_object()->package() == NULL
    3544                 :    1646660 :             && nt->local_methods() != NULL)
    3545                 :            :           {
    3546                 :      10087 :             const Bindings* methods = nt->local_methods();
    3547                 :      10087 :             for (Bindings::const_declarations_iterator p =
    3548                 :      10087 :                    methods->begin_declarations();
    3549                 :      55450 :                  p != methods->end_declarations();
    3550                 :      55450 :                  p++)
    3551                 :            :               {
    3552                 :      45363 :                 if (p->second->is_function_declaration())
    3553                 :            :                   {
    3554                 :         88 :                     Type* mt = p->second->func_declaration_value()->type();
    3555                 :         88 :                     if (Type::traverse(mt, this) == TRAVERSE_EXIT)
    3556                 :   17807000 :                       return TRAVERSE_EXIT;
    3557                 :            :                   }
    3558                 :            :               }
    3559                 :            :           }
    3560                 :            : 
    3561                 :            :         return TRAVERSE_SKIP_COMPONENTS;
    3562                 :            :       }
    3563                 :            : 
    3564                 :      79296 :     case Type::TYPE_STRUCT:
    3565                 :            :       // Traverse the field types first in case there is an embedded
    3566                 :            :       // field with methods that the struct should inherit.
    3567                 :     158592 :       if (t->struct_type()->traverse_field_types(this) == TRAVERSE_EXIT)
    3568                 :            :           return TRAVERSE_EXIT;
    3569                 :      79296 :       t->struct_type()->finalize_methods(this->gogo_);
    3570                 :      79296 :       return TRAVERSE_SKIP_COMPONENTS;
    3571                 :            : 
    3572                 :            :     default:
    3573                 :            :       break;
    3574                 :            :     }
    3575                 :            : 
    3576                 :            :   return TRAVERSE_CONTINUE;
    3577                 :            : }
    3578                 :            : 
    3579                 :            : // Finalize method lists and build stub methods for types.
    3580                 :            : 
    3581                 :            : void
    3582                 :       3372 : Gogo::finalize_methods()
    3583                 :            : {
    3584                 :       3372 :   Finalize_methods finalize(this);
    3585                 :       3372 :   this->traverse(&finalize);
    3586                 :       3372 : }
    3587                 :            : 
    3588                 :            : // Finalize the method list for a type.  This is called when a type is
    3589                 :            : // parsed for an inlined function body, which happens after the
    3590                 :            : // finalize_methods pass.
    3591                 :            : 
    3592                 :            : void
    3593                 :        478 : Gogo::finalize_methods_for_type(Type* type)
    3594                 :            : {
    3595                 :        478 :   Finalize_methods finalize(this);
    3596                 :        478 :   Type::traverse(type, &finalize);
    3597                 :        478 : }
    3598                 :            : 
    3599                 :            : // Set types for unspecified variables and constants.
    3600                 :            : 
    3601                 :            : void
    3602                 :       3372 : Gogo::determine_types()
    3603                 :            : {
    3604                 :       3372 :   Bindings* bindings = this->current_bindings();
    3605                 :     393425 :   for (Bindings::const_definitions_iterator p = bindings->begin_definitions();
    3606                 :     393425 :        p != bindings->end_definitions();
    3607                 :     393425 :        ++p)
    3608                 :            :     {
    3609                 :     390053 :       if ((*p)->is_function())
    3610                 :     150133 :         (*p)->func_value()->determine_types();
    3611                 :     239920 :       else if ((*p)->is_variable())
    3612                 :      31042 :         (*p)->var_value()->determine_type();
    3613                 :     208878 :       else if ((*p)->is_const())
    3614                 :     139437 :         (*p)->const_value()->determine_type();
    3615                 :            : 
    3616                 :            :       // See if a variable requires us to build an initialization
    3617                 :            :       // function.  We know that we will see all global variables
    3618                 :            :       // here.
    3619                 :     390053 :       if (!this->need_init_fn_ && (*p)->is_variable())
    3620                 :            :         {
    3621                 :       2403 :           Variable* variable = (*p)->var_value();
    3622                 :            : 
    3623                 :            :           // If this is a global variable which requires runtime
    3624                 :            :           // initialization, we need an initialization function.
    3625                 :       2403 :           if (!variable->is_global())
    3626                 :            :             ;
    3627                 :       2403 :           else if (variable->init() == NULL)
    3628                 :            :             ;
    3629                 :       1920 :           else if (variable->type()->interface_type() != NULL)
    3630                 :        189 :             this->need_init_fn_ = true;
    3631                 :       1731 :           else if (variable->init()->is_constant())
    3632                 :            :             ;
    3633                 :       1427 :           else if (!variable->init()->is_composite_literal())
    3634                 :        306 :             this->need_init_fn_ = true;
    3635                 :       1121 :           else if (variable->init()->is_nonconstant_composite_literal())
    3636                 :        493 :             this->need_init_fn_ = true;
    3637                 :            : 
    3638                 :            :           // If this is a global variable which holds a pointer value,
    3639                 :            :           // then we need an initialization function to register it as a
    3640                 :            :           // GC root.
    3641                 :       2403 :           if (variable->is_global() && variable->type()->has_pointer())
    3642                 :       1369 :             this->need_init_fn_ = true;
    3643                 :            :         }
    3644                 :            :     }
    3645                 :            : 
    3646                 :            :   // Determine the types of constants in packages.
    3647                 :      82081 :   for (Packages::const_iterator p = this->packages_.begin();
    3648                 :      82081 :        p != this->packages_.end();
    3649                 :      82081 :        ++p)
    3650                 :      78709 :     p->second->determine_types();
    3651                 :       3372 : }
    3652                 :            : 
    3653                 :            : // Traversal class used for type checking.
    3654                 :            : 
    3655                 :       3372 : class Check_types_traverse : public Traverse
    3656                 :            : {
    3657                 :            :  public:
    3658                 :      15346 :   Check_types_traverse(Gogo* gogo)
    3659                 :      15346 :     : Traverse(traverse_variables
    3660                 :            :                | traverse_constants
    3661                 :            :                | traverse_functions
    3662                 :            :                | traverse_statements
    3663                 :            :                | traverse_expressions),
    3664                 :      15346 :       gogo_(gogo)
    3665                 :            :   { }
    3666                 :            : 
    3667                 :            :   int
    3668                 :            :   variable(Named_object*);
    3669                 :            : 
    3670                 :            :   int
    3671                 :            :   constant(Named_object*, bool);
    3672                 :            : 
    3673                 :            :   int
    3674                 :            :   function(Named_object*);
    3675                 :            : 
    3676                 :            :   int
    3677                 :            :   statement(Block*, size_t* pindex, Statement*);
    3678                 :            : 
    3679                 :            :   int
    3680                 :            :   expression(Expression**);
    3681                 :            : 
    3682                 :            :  private:
    3683                 :            :   // General IR.
    3684                 :            :   Gogo* gogo_;
    3685                 :            : };
    3686                 :            : 
    3687                 :            : // Check that a variable initializer has the right type.
    3688                 :            : 
    3689                 :            : int
    3690                 :     936620 : Check_types_traverse::variable(Named_object* named_object)
    3691                 :            : {
    3692                 :     936620 :   if (named_object->is_variable())
    3693                 :            :     {
    3694                 :     814515 :       Variable* var = named_object->var_value();
    3695                 :            : 
    3696                 :            :       // Give error if variable type is not defined.
    3697                 :     814515 :       var->type()->base();
    3698                 :            : 
    3699                 :     814515 :       Expression* init = var->init();
    3700                 :    1629030 :       std::string reason;
    3701                 :     814515 :       if (init != NULL
    3702                 :    1072540 :           && !Type::are_assignable(var->type(), init->type(), &reason))
    3703                 :            :         {
    3704                 :         34 :           if (reason.empty())
    3705                 :         11 :             go_error_at(var->location(), "incompatible type in initialization");
    3706                 :            :           else
    3707                 :         23 :             go_error_at(var->location(),
    3708                 :            :                         "incompatible type in initialization (%s)",
    3709                 :            :                         reason.c_str());
    3710                 :         34 :           init = Expression::make_error(named_object->location());
    3711                 :         34 :           var->clear_init();
    3712                 :            :         }
    3713                 :     814481 :       else if (init != NULL
    3714                 :     814481 :                && init->func_expression() != NULL)
    3715                 :            :         {
    3716                 :       2899 :           Named_object* no = init->func_expression()->named_object();
    3717                 :       2899 :           Function_type* fntype;
    3718                 :       2899 :           if (no->is_function())
    3719                 :       2722 :             fntype = no->func_value()->type();
    3720                 :        177 :           else if (no->is_function_declaration())
    3721                 :        177 :             fntype = no->func_declaration_value()->type();
    3722                 :            :           else
    3723                 :          0 :             go_unreachable();
    3724                 :            : 
    3725                 :            :           // Builtin functions cannot be used as function values for variable
    3726                 :            :           // initialization.
    3727                 :       2899 :           if (fntype->is_builtin())
    3728                 :            :             {
    3729                 :          1 :               go_error_at(init->location(),
    3730                 :            :                           "invalid use of special built-in function %qs; "
    3731                 :            :                           "must be called",
    3732                 :          2 :                           no->message_name().c_str());
    3733                 :            :             }
    3734                 :            :         }
    3735                 :     814515 :       if (!var->is_used()
    3736                 :     303403 :           && !var->is_global()
    3737                 :      57092 :           && !var->is_parameter()
    3738                 :         15 :           && !var->is_receiver()
    3739                 :         30 :           && !var->type()->is_error()
    3740                 :          6 :           && (init == NULL || !init->is_error_expression())
    3741                 :     814517 :           && !Lex::is_invalid_identifier(named_object->name()))
    3742                 :          1 :         go_error_at(var->location(), "%qs declared and not used",
    3743                 :          2 :                     named_object->message_name().c_str());
    3744                 :            :     }
    3745                 :     936620 :   return TRAVERSE_CONTINUE;
    3746                 :            : }
    3747                 :            : 
    3748                 :            : // Check that a constant initializer has the right type.
    3749                 :            : 
    3750                 :            : int
    3751                 :     789238 : Check_types_traverse::constant(Named_object* named_object, bool)
    3752                 :            : {
    3753                 :     789238 :   Named_constant* constant = named_object->const_value();
    3754                 :     789238 :   Type* ctype = constant->type();
    3755                 :     817340 :   if (ctype->integer_type() == NULL
    3756                 :     811041 :       && ctype->float_type() == NULL
    3757                 :     811015 :       && ctype->complex_type() == NULL
    3758                 :      22693 :       && !ctype->is_boolean_type()
    3759                 :      21921 :       && !ctype->is_string_type())
    3760                 :            :     {
    3761                 :        916 :       if (ctype->is_nil_type())
    3762                 :          1 :         go_error_at(constant->location(), "const initializer cannot be nil");
    3763                 :       1830 :       else if (!ctype->is_error())
    3764                 :          9 :         go_error_at(constant->location(), "invalid constant type");
    3765                 :        916 :       constant->set_error();
    3766                 :            :     }
    3767                 :     788322 :   else if (!constant->expr()->is_constant())
    3768                 :            :     {
    3769                 :          8 :       go_error_at(constant->expr()->location(), "expression is not constant");
    3770                 :          8 :       constant->set_error();
    3771                 :            :     }
    3772                 :     788314 :   else if (!Type::are_assignable(constant->type(), constant->expr()->type(),
    3773                 :            :                                  NULL))
    3774                 :            :     {
    3775                 :          1 :       go_error_at(constant->location(),
    3776                 :            :                   "initialization expression has wrong type");
    3777                 :          1 :       constant->set_error();
    3778                 :            :     }
    3779                 :     789238 :   return TRAVERSE_CONTINUE;
    3780                 :            : }
    3781                 :            : 
    3782                 :            : // There are no types to check in a function, but this is where we
    3783                 :            : // issue warnings about labels which are defined but not referenced.
    3784                 :            : 
    3785                 :            : int
    3786                 :     160669 : Check_types_traverse::function(Named_object* no)
    3787                 :            : {
    3788                 :     160669 :   no->func_value()->check_labels();
    3789                 :     160669 :   return TRAVERSE_CONTINUE;
    3790                 :            : }
    3791                 :            : 
    3792                 :            : // Check that types are valid in a statement.
    3793                 :            : 
    3794                 :            : int
    3795                 :    3162400 : Check_types_traverse::statement(Block*, size_t*, Statement* s)
    3796                 :            : {
    3797                 :    3162400 :   s->check_types(this->gogo_);
    3798                 :    3162400 :   return TRAVERSE_CONTINUE;
    3799                 :            : }
    3800                 :            : 
    3801                 :            : // Check that types are valid in an expression.
    3802                 :            : 
    3803                 :            : int
    3804                 :    9537380 : Check_types_traverse::expression(Expression** expr)
    3805                 :            : {
    3806                 :    9537380 :   (*expr)->check_types(this->gogo_);
    3807                 :    9537380 :   return TRAVERSE_CONTINUE;
    3808                 :            : }
    3809                 :            : 
    3810                 :            : // Check that types are valid.
    3811                 :            : 
    3812                 :            : void
    3813                 :       3372 : Gogo::check_types()
    3814                 :            : {
    3815                 :       3372 :   Check_types_traverse traverse(this);
    3816                 :       3372 :   this->traverse(&traverse);
    3817                 :            : 
    3818                 :       3372 :   Bindings* bindings = this->current_bindings();
    3819                 :     299381 :   for (Bindings::const_declarations_iterator p = bindings->begin_declarations();
    3820                 :     299381 :        p != bindings->end_declarations();
    3821                 :     299381 :        ++p)
    3822                 :            :     {
    3823                 :            :       // Also check the types in a function declaration's signature.
    3824                 :     296009 :       Named_object* no = p->second;
    3825                 :     296009 :       if (no->is_function_declaration())
    3826                 :       3556 :         no->func_declaration_value()->check_types();
    3827                 :            :     }
    3828                 :       3372 : }
    3829                 :            : 
    3830                 :            : // Check the types in a single block.
    3831                 :            : 
    3832                 :            : void
    3833                 :      11974 : Gogo::check_types_in_block(Block* block)
    3834                 :            : {
    3835                 :      11974 :   Check_types_traverse traverse(this);
    3836                 :      11974 :   block->traverse(&traverse);
    3837                 :      11974 : }
    3838                 :            : 
    3839                 :            : // A traversal class which finds all the expressions which must be
    3840                 :            : // evaluated in order within a statement or larger expression.  This
    3841                 :            : // is used to implement the rules about order of evaluation.
    3842                 :            : 
    3843                 :            : class Find_eval_ordering : public Traverse
    3844                 :            : {
    3845                 :            :  private:
    3846                 :            :   typedef std::vector<Expression**> Expression_pointers;
    3847                 :            : 
    3848                 :            :  public:
    3849                 :    3915140 :   Find_eval_ordering()
    3850                 :            :     : Traverse(traverse_blocks
    3851                 :            :                | traverse_statements
    3852                 :            :                | traverse_expressions),
    3853                 :    3915140 :       exprs_()
    3854                 :            :   { }
    3855                 :            : 
    3856                 :            :   size_t
    3857                 :    3847170 :   size() const
    3858                 :    3847170 :   { return this->exprs_.size(); }
    3859                 :            : 
    3860                 :            :   typedef Expression_pointers::const_iterator const_iterator;
    3861                 :            : 
    3862                 :            :   const_iterator
    3863                 :     340476 :   begin() const
    3864                 :     340476 :   { return this->exprs_.begin(); }
    3865                 :            : 
    3866                 :            :   const_iterator
    3867                 :     870130 :   end() const
    3868                 :        737 :   { return this->exprs_.end(); }
    3869                 :            : 
    3870                 :            :  protected:
    3871                 :            :   int
    3872                 :    1411650 :   block(Block*)
    3873                 :    1411650 :   { return TRAVERSE_SKIP_COMPONENTS; }
    3874                 :            : 
    3875                 :            :   int
    3876                 :          0 :   statement(Block*, size_t*, Statement*)
    3877                 :          0 :   { return TRAVERSE_SKIP_COMPONENTS; }
    3878                 :            : 
    3879                 :            :   int
    3880                 :            :   expression(Expression**);
    3881                 :            : 
    3882                 :            :  private:
    3883                 :            :   // A list of pointers to expressions with side-effects.
    3884                 :            :   Expression_pointers exprs_;
    3885                 :            : };
    3886                 :            : 
    3887                 :            : // If an expression must be evaluated in order, put it on the list.
    3888                 :            : 
    3889                 :            : int
    3890                 :   10584500 : Find_eval_ordering::expression(Expression** expression_pointer)
    3891                 :            : {
    3892                 :   10584500 :   Binary_expression* binexp = (*expression_pointer)->binary_expression();
    3893                 :     630955 :   if (binexp != NULL
    3894                 :     630955 :       && (binexp->op() == OPERATOR_ANDAND || binexp->op() == OPERATOR_OROR))
    3895                 :            :     {
    3896                 :            :       // Shortcut expressions may potentially have side effects which need
    3897                 :            :       // to be ordered, so add them to the list.
    3898                 :            :       // We don't order its subexpressions here since they may be evaluated
    3899                 :            :       // conditionally. This is handled in remove_shortcuts.
    3900                 :      72693 :       this->exprs_.push_back(expression_pointer);
    3901                 :      72693 :       return TRAVERSE_SKIP_COMPONENTS;
    3902                 :            :     }
    3903                 :            : 
    3904                 :            :   // We have to look at subexpressions before this one.
    3905                 :   10511800 :   if ((*expression_pointer)->traverse_subexpressions(this) == TRAVERSE_EXIT)
    3906                 :            :     return TRAVERSE_EXIT;
    3907                 :   10511800 :   if ((*expression_pointer)->must_eval_in_order())
    3908                 :     717501 :     this->exprs_.push_back(expression_pointer);
    3909                 :            :   return TRAVERSE_SKIP_COMPONENTS;
    3910                 :            : }
    3911                 :            : 
    3912                 :            : // A traversal class for ordering evaluations.
    3913                 :            : 
    3914                 :     151031 : class Order_eval : public Traverse
    3915                 :            : {
    3916                 :            :  public:
    3917                 :     151031 :   Order_eval(Gogo* gogo)
    3918                 :     151031 :     : Traverse(traverse_variables
    3919                 :            :                | traverse_statements),
    3920                 :     151031 :       gogo_(gogo)
    3921                 :            :   { }
    3922                 :            : 
    3923                 :            :   int
    3924                 :            :   variable(Named_object*);
    3925                 :            : 
    3926                 :            :   int
    3927                 :            :   statement(Block*, size_t*, Statement*);
    3928                 :            : 
    3929                 :            :  private:
    3930                 :            :   // The IR.
    3931                 :            :   Gogo* gogo_;
    3932                 :            : };
    3933                 :            : 
    3934                 :            : // Implement the order of evaluation rules for a statement.
    3935                 :            : 
    3936                 :            : int
    3937                 :    3897180 : Order_eval::statement(Block* block, size_t* pindex, Statement* stmt)
    3938                 :            : {
    3939                 :            :   // FIXME: This approach doesn't work for switch statements, because
    3940                 :            :   // we add the new statements before the whole switch when we need to
    3941                 :            :   // instead add them just before the switch expression.  The right
    3942                 :            :   // fix is probably to lower switch statements with nonconstant cases
    3943                 :            :   // to a series of conditionals.
    3944                 :    3897180 :   if (stmt->switch_statement() != NULL)
    3945                 :            :     return TRAVERSE_CONTINUE;
    3946                 :            : 
    3947                 :    3897180 :   Find_eval_ordering find_eval_ordering;
    3948                 :            : 
    3949                 :            :   // If S is a variable declaration, then ordinary traversal won't do
    3950                 :            :   // anything.  We want to explicitly traverse the initialization
    3951                 :            :   // expression if there is one.
    3952                 :    3897180 :   Variable_declaration_statement* vds = stmt->variable_declaration_statement();
    3953                 :    3897180 :   Expression* init = NULL;
    3954                 :    3897180 :   Expression* orig_init = NULL;
    3955                 :    3897180 :   if (vds == NULL)
    3956                 :    3590010 :     stmt->traverse_contents(&find_eval_ordering);
    3957                 :            :   else
    3958                 :            :     {
    3959                 :     307168 :       init = vds->var()->var_value()->init();
    3960                 :     307168 :       if (init == NULL)
    3961                 :            :         return TRAVERSE_CONTINUE;
    3962                 :     239199 :       orig_init = init;
    3963                 :            : 
    3964                 :            :       // It might seem that this could be
    3965                 :            :       // init->traverse_subexpressions.  Unfortunately that can fail
    3966                 :            :       // in a case like
    3967                 :            :       //   var err os.Error
    3968                 :            :       //   newvar, err := call(arg())
    3969                 :            :       // Here newvar will have an init of call result 0 of
    3970                 :            :       // call(arg()).  If we only traverse subexpressions, we will
    3971                 :            :       // only find arg(), and we won't bother to move anything out.
    3972                 :            :       // Then we get to the assignment to err, we will traverse the
    3973                 :            :       // whole statement, and this time we will find both call() and
    3974                 :            :       // arg(), and so we will move them out.  This will cause them to
    3975                 :            :       // be put into temporary variables before the assignment to err
    3976                 :            :       // but after the declaration of newvar.  To avoid that problem,
    3977                 :            :       // we traverse the entire expression here.
    3978                 :     239199 :       Expression::traverse(&init, &find_eval_ordering);
    3979                 :            :     }
    3980                 :            : 
    3981                 :    3829210 :   size_t c = find_eval_ordering.size();
    3982                 :    3829210 :   if (c == 0)
    3983                 :            :     return TRAVERSE_CONTINUE;
    3984                 :            : 
    3985                 :            :   // If there is only one expression with a side-effect, we can
    3986                 :            :   // usually leave it in place.
    3987                 :     596980 :   if (c == 1)
    3988                 :            :     {
    3989                 :     434541 :       switch (stmt->classification())
    3990                 :            :         {
    3991                 :            :         case Statement::STATEMENT_ASSIGNMENT:
    3992                 :            :           // For an assignment statement, we need to evaluate an
    3993                 :            :           // expression on the right hand side before we evaluate any
    3994                 :            :           // index expression on the left hand side, so for that case
    3995                 :            :           // we always move the expression.  Otherwise we mishandle
    3996                 :            :           // m[0] = len(m) where m is a map.
    3997                 :            :           break;
    3998                 :            : 
    3999                 :      41443 :         case Statement::STATEMENT_EXPRESSION:
    4000                 :      41443 :           {
    4001                 :            :             // If this is a call statement that doesn't return any
    4002                 :            :             // values, it will not have been counted as a value to
    4003                 :            :             // move.  We need to move any subexpressions in case they
    4004                 :            :             // are themselves call statements that require passing a
    4005                 :            :             // closure.
    4006                 :      41443 :             Expression* expr = stmt->expression_statement()->expr();
    4007                 :      41443 :             if (expr->call_expression() != NULL
    4008                 :      40343 :                 && expr->call_expression()->result_count() == 0)
    4009                 :            :               break;
    4010                 :      29848 :             return TRAVERSE_CONTINUE;
    4011                 :            :           }
    4012                 :            : 
    4013                 :            :         default:
    4014                 :            :           // We can leave the expression in place.
    4015                 :            :           return TRAVERSE_CONTINUE;
    4016                 :            :         }
    4017                 :            :     }
    4018                 :            : 
    4019                 :     339639 :   bool is_thunk = stmt->thunk_statement() != NULL;
    4020                 :     339639 :   Expression_statement* es = stmt->expression_statement();
    4021                 :     860749 :   for (Find_eval_ordering::const_iterator p = find_eval_ordering.begin();
    4022                 :     860749 :        p != find_eval_ordering.end();
    4023                 :     860749 :        ++p)
    4024                 :            :     {
    4025                 :     521456 :       Expression** pexpr = *p;
    4026                 :            : 
    4027                 :            :       // The last expression in a thunk will be the call passed to go
    4028                 :            :       // or defer, which we must not evaluate early.
    4029                 :     521456 :       if (is_thunk && p + 1 == find_eval_ordering.end())
    4030                 :            :         break;
    4031                 :            : 
    4032                 :     521110 :       Location loc = (*pexpr)->location();
    4033                 :     521110 :       Statement* s;
    4034                 :     521110 :       if ((*pexpr)->call_expression() == NULL
    4035                 :     375737 :           || (*pexpr)->call_expression()->result_count() < 2)
    4036                 :            :         {
    4037                 :     396097 :           Temporary_statement* ts = Statement::make_temporary(NULL, *pexpr,
    4038                 :            :                                                               loc);
    4039                 :     396097 :           s = ts;
    4040                 :     396097 :           *pexpr = Expression::make_temporary_reference(ts, loc);
    4041                 :            :         }
    4042                 :            :       else
    4043                 :            :         {
    4044                 :            :           // A call expression which returns multiple results needs to
    4045                 :            :           // be handled specially.  We can't create a temporary
    4046                 :            :           // because there is no type to give it.  Any actual uses of
    4047                 :            :           // the values will be done via Call_result_expressions.
    4048                 :            :           //
    4049                 :            :           // Since a given call expression can be shared by multiple
    4050                 :            :           // Call_result_expressions, avoid hoisting the call the
    4051                 :            :           // second time we see it here. In addition, don't try to
    4052                 :            :           // hoist the top-level multi-return call in the statement,
    4053                 :            :           // since doing this would result a tree with more than one copy
    4054                 :            :           // of the call.
    4055                 :     125013 :           if (this->remember_expression(*pexpr))
    4056                 :            :             s = NULL;
    4057                 :      60301 :           else if (es != NULL && *pexpr == es->expr())
    4058                 :            :             s = NULL;
    4059                 :            :           else
    4060                 :      57590 :             s = Statement::make_statement(*pexpr, true);
    4061                 :            :         }
    4062                 :            : 
    4063                 :     453687 :       if (s != NULL)
    4064                 :            :         {
    4065                 :     453687 :           block->insert_statement_before(*pindex, s);
    4066                 :     453687 :           ++*pindex;
    4067                 :            :         }
    4068                 :            :     }
    4069                 :            : 
    4070                 :     339639 :   if (init != orig_init)
    4071                 :    3897180 :     vds->var()->var_value()->set_init(init);
    4072                 :            : 
    4073                 :            :   return TRAVERSE_CONTINUE;
    4074                 :            : }
    4075                 :            : 
    4076                 :            : // Implement the order of evaluation rules for the initializer of a
    4077                 :            : // global variable.
    4078                 :            : 
    4079                 :            : int
    4080                 :     935589 : Order_eval::variable(Named_object* no)
    4081                 :            : {
    4082                 :     935589 :   if (no->is_result_variable())
    4083                 :            :     return TRAVERSE_CONTINUE;
    4084                 :     813484 :   Variable* var = no->var_value();
    4085                 :     813484 :   Expression* init = var->init();
    4086                 :     813484 :   if (!var->is_global() || init == NULL)
    4087                 :            :     return TRAVERSE_CONTINUE;
    4088                 :            : 
    4089                 :      17959 :   Find_eval_ordering find_eval_ordering;
    4090                 :      17959 :   Expression::traverse(&init, &find_eval_ordering);
    4091                 :            : 
    4092                 :      17959 :   if (find_eval_ordering.size() <= 1)
    4093                 :            :     {
    4094                 :            :       // If there is only one expression with a side-effect, we can
    4095                 :            :       // leave it in place.
    4096                 :            :       return TRAVERSE_SKIP_COMPONENTS;
    4097                 :            :     }
    4098                 :            : 
    4099                 :        837 :   Expression* orig_init = init;
    4100                 :            : 
    4101                 :       8644 :   for (Find_eval_ordering::const_iterator p = find_eval_ordering.begin();
    4102                 :       8644 :        p != find_eval_ordering.end();
    4103                 :       8644 :        ++p)
    4104                 :            :     {
    4105                 :       7807 :       Expression** pexpr = *p;
    4106                 :       7807 :       Location loc = (*pexpr)->location();
    4107                 :       7807 :       Statement* s;
    4108                 :       7807 :       if ((*pexpr)->call_expression() == NULL
    4109                 :       7706 :           || (*pexpr)->call_expression()->result_count() < 2)
    4110                 :            :         {
    4111                 :       7726 :           Temporary_statement* ts = Statement::make_temporary(NULL, *pexpr,
    4112                 :            :                                                               loc);
    4113                 :       7726 :           s = ts;
    4114                 :       7726 :           *pexpr = Expression::make_temporary_reference(ts, loc);
    4115                 :            :         }
    4116                 :            :       else
    4117                 :            :         {
    4118                 :            :           // A call expression which returns multiple results needs to
    4119                 :            :           // be handled specially.
    4120                 :         81 :           s = Statement::make_statement(*pexpr, true);
    4121                 :            :         }
    4122                 :       7807 :       var->add_preinit_statement(this->gogo_, s);
    4123                 :            :     }
    4124                 :            : 
    4125                 :        837 :   if (init != orig_init)
    4126                 :      17959 :     var->set_init(init);
    4127                 :            : 
    4128                 :            :   return TRAVERSE_SKIP_COMPONENTS;
    4129                 :            : }
    4130                 :            : 
    4131                 :            : // Use temporary variables to implement the order of evaluation rules.
    4132                 :            : 
    4133                 :            : void
    4134                 :       3372 : Gogo::order_evaluations()
    4135                 :            : {
    4136                 :       3372 :   Order_eval order_eval(this);
    4137                 :       3372 :   this->traverse(&order_eval);
    4138                 :       3372 : }
    4139                 :            : 
    4140                 :            : // Order evaluations in a block.
    4141                 :            : 
    4142                 :            : void
    4143                 :      74966 : Gogo::order_block(Block* block)
    4144                 :            : {
    4145                 :      74966 :   Order_eval order_eval(this);
    4146                 :      74966 :   block->traverse(&order_eval);
    4147                 :      74966 : }
    4148                 :            : 
    4149                 :            : // A traversal class used to find a single shortcut operator within an
    4150                 :            : // expression.
    4151                 :            : 
    4152                 :    4358810 : class Find_shortcut : public Traverse
    4153                 :            : {
    4154                 :            :  public:
    4155                 :    4449460 :   Find_shortcut()
    4156                 :    4449460 :     : Traverse(traverse_blocks
    4157                 :            :                | traverse_statements
    4158                 :            :                | traverse_expressions),
    4159                 :    4449460 :       found_(NULL)
    4160                 :            :   { }
    4161                 :            : 
    4162                 :            :   // A pointer to the expression which was found, or NULL if none was
    4163                 :            :   // found.
    4164                 :            :   Expression**
    4165                 :    4381490 :   found() const
    4166                 :    4381490 :   { return this->found_; }
    4167                 :            : 
    4168                 :            :  protected:
    4169                 :            :   int
    4170                 :    1411680 :   block(Block*)
    4171                 :    1411680 :   { return TRAVERSE_SKIP_COMPONENTS; }
    4172                 :            : 
    4173                 :            :   int
    4174                 :          0 :   statement(Block*, size_t*, Statement*)
    4175                 :          0 :   { return TRAVERSE_SKIP_COMPONENTS; }
    4176                 :            : 
    4177                 :            :   int
    4178                 :            :   expression(Expression**);
    4179                 :            : 
    4180                 :            :  private:
    4181                 :            :   Expression** found_;
    4182                 :            : };
    4183                 :            : 
    4184                 :            : // Find a shortcut expression.
    4185                 :            : 
    4186                 :            : int
    4187                 :   11471600 : Find_shortcut::expression(Expression** pexpr)
    4188                 :            : {
    4189                 :   11471600 :   Expression* expr = *pexpr;
    4190                 :   11471600 :   Binary_expression* be = expr->binary_expression();
    4191                 :     634623 :   if (be == NULL)
    4192                 :            :     return TRAVERSE_CONTINUE;
    4193                 :     634623 :   Operator op = be->op();
    4194                 :     634623 :   if (op != OPERATOR_OROR && op != OPERATOR_ANDAND)
    4195                 :            :     return TRAVERSE_CONTINUE;
    4196                 :      72693 :   go_assert(this->found_ == NULL);
    4197                 :      72693 :   this->found_ = pexpr;
    4198                 :      72693 :   return TRAVERSE_EXIT;
    4199                 :            : }
    4200                 :            : 
    4201                 :            : // A traversal class used to turn shortcut operators into explicit if
    4202                 :            : // statements.
    4203                 :            : 
    4204                 :     223724 : class Shortcuts : public Traverse
    4205                 :            : {
    4206                 :            :  public:
    4207                 :     151031 :   Shortcuts(Gogo* gogo)
    4208                 :     151031 :     : Traverse(traverse_variables
    4209                 :            :                | traverse_statements),
    4210                 :     151031 :       gogo_(gogo)
    4211                 :            :   { }
    4212                 :            : 
    4213                 :            :  protected:
    4214                 :            :   int
    4215                 :            :   variable(Named_object*);
    4216                 :            : 
    4217                 :            :   int
    4218                 :            :   statement(Block*, size_t*, Statement*);
    4219                 :            : 
    4220                 :            :  private:
    4221                 :            :   // Convert a shortcut operator.
    4222                 :            :   Statement*
    4223                 :            :   convert_shortcut(Block* enclosing, Expression** pshortcut);
    4224                 :            : 
    4225                 :            :   // The IR.
    4226                 :            :   Gogo* gogo_;
    4227                 :            : };
    4228                 :            : 
    4229                 :            : // Remove shortcut operators in a single statement.
    4230                 :            : 
    4231                 :            : int
    4232                 :    4358810 : Shortcuts::statement(Block* block, size_t* pindex, Statement* s)
    4233                 :            : {
    4234                 :            :   // FIXME: This approach doesn't work for switch statements, because
    4235                 :            :   // we add the new statements before the whole switch when we need to
    4236                 :            :   // instead add them just before the switch expression.  The right
    4237                 :            :   // fix is probably to lower switch statements with nonconstant cases
    4238                 :            :   // to a series of conditionals.
    4239                 :    4358810 :   if (s->switch_statement() != NULL)
    4240                 :            :     return TRAVERSE_CONTINUE;
    4241                 :            : 
    4242                 :    4431490 :   while (true)
    4243                 :            :     {
    4244                 :    4431490 :       Find_shortcut find_shortcut;
    4245                 :            : 
    4246                 :            :       // If S is a variable declaration, then ordinary traversal won't
    4247                 :            :       // do anything.  We want to explicitly traverse the
    4248                 :            :       // initialization expression if there is one.
    4249                 :    4431490 :       Variable_declaration_statement* vds = s->variable_declaration_statement();
    4250                 :    4431490 :       Expression* init = NULL;
    4251                 :    4431490 :       if (vds == NULL)
    4252                 :    4123810 :         s->traverse_contents(&find_shortcut);
    4253                 :            :       else
    4254                 :            :         {
    4255                 :     307674 :           init = vds->var()->var_value()->init();
    4256                 :     307674 :           if (init == NULL)
    4257                 :    4358810 :             return TRAVERSE_CONTINUE;
    4258                 :     239705 :           init->traverse(&init, &find_shortcut);
    4259                 :            :         }
    4260                 :    4363520 :       Expression** pshortcut = find_shortcut.found();
    4261                 :    4363520 :       if (pshortcut == NULL)
    4262                 :            :         return TRAVERSE_CONTINUE;
    4263                 :            : 
    4264                 :      72678 :       Statement* snew = this->convert_shortcut(block, pshortcut);
    4265                 :      72678 :       block->insert_statement_before(*pindex, snew);
    4266                 :      72678 :       ++*pindex;
    4267                 :            : 
    4268                 :      72678 :       if (pshortcut == &init)
    4269                 :      72678 :         vds->var()->var_value()->set_init(init);
    4270                 :            :     }
    4271                 :            : }
    4272                 :            : 
    4273                 :            : // Remove shortcut operators in the initializer of a global variable.
    4274                 :            : 
    4275                 :            : int
    4276                 :     935589 : Shortcuts::variable(Named_object* no)
    4277                 :            : {
    4278                 :     935589 :   if (no->is_result_variable())
    4279                 :            :     return TRAVERSE_CONTINUE;
    4280                 :     813484 :   Variable* var = no->var_value();
    4281                 :     813484 :   Expression* init = var->init();
    4282                 :     813484 :   if (!var->is_global() || init == NULL)
    4283                 :            :     return TRAVERSE_CONTINUE;
    4284                 :            : 
    4285                 :      17974 :   while (true)
    4286                 :            :     {
    4287                 :      17974 :       Find_shortcut find_shortcut;
    4288                 :      17974 :       init->traverse(&init, &find_shortcut);
    4289                 :      17974 :       Expression** pshortcut = find_shortcut.found();
    4290                 :      17974 :       if (pshortcut == NULL)
    4291                 :      17959 :         return TRAVERSE_CONTINUE;
    4292                 :            : 
    4293                 :         15 :       Statement* snew = this->convert_shortcut(NULL, pshortcut);
    4294                 :         15 :       var->add_preinit_statement(this->gogo_, snew);
    4295                 :         15 :       if (pshortcut == &init)
    4296                 :         15 :         var->set_init(init);
    4297                 :            :     }
    4298                 :            : }
    4299                 :            : 
    4300                 :            : // Given an expression which uses a shortcut operator, return a
    4301                 :            : // statement which implements it, and update *PSHORTCUT accordingly.
    4302                 :            : 
    4303                 :            : Statement*
    4304                 :      72693 : Shortcuts::convert_shortcut(Block* enclosing, Expression** pshortcut)
    4305                 :            : {
    4306                 :      72693 :   Binary_expression* shortcut = (*pshortcut)->binary_expression();
    4307                 :      72693 :   Expression* left = shortcut->left();
    4308                 :      72693 :   Expression* right = shortcut->right();
    4309                 :      72693 :   Location loc = shortcut->location();
    4310                 :            : 
    4311                 :      72693 :   Block* retblock = new Block(enclosing, loc);
    4312                 :      72693 :   retblock->set_end_location(loc);
    4313                 :            : 
    4314                 :      72693 :   Temporary_statement* ts = Statement::make_temporary(shortcut->type(),
    4315                 :            :                                                       left, loc);
    4316                 :      72693 :   retblock->add_statement(ts);
    4317                 :            : 
    4318                 :      72693 :   Block* block = new Block(retblock, loc);
    4319                 :      72693 :   block->set_end_location(loc);
    4320                 :      72693 :   Expression* tmpref = Expression::make_temporary_reference(ts, loc);
    4321                 :      72693 :   Statement* assign = Statement::make_assignment(tmpref, right, loc);
    4322                 :      72693 :   block->add_statement(assign);
    4323                 :            : 
    4324                 :      72693 :   Expression* cond = Expression::make_temporary_reference(ts, loc);
    4325                 :      72693 :   if (shortcut->binary_expression()->op() == OPERATOR_OROR)
    4326                 :      27013 :     cond = Expression::make_unary(OPERATOR_NOT, cond, loc);
    4327                 :            : 
    4328                 :      72693 :   Statement* if_statement = Statement::make_if_statement(cond, block, NULL,
    4329                 :            :                                                          loc);
    4330                 :      72693 :   retblock->add_statement(if_statement);
    4331                 :            : 
    4332                 :      72693 :   *pshortcut = Expression::make_temporary_reference(ts, loc);
    4333                 :            : 
    4334                 :      72693 :   delete shortcut;
    4335                 :            : 
    4336                 :            :   // Now convert any shortcut operators in LEFT and RIGHT.
    4337                 :            :   // LEFT and RIGHT were skipped in the top level
    4338                 :            :   // Gogo::order_evaluations. We need to order their
    4339                 :            :   // components first.
    4340                 :      72693 :   Order_eval order_eval(this->gogo_);
    4341                 :      72693 :   retblock->traverse(&order_eval);
    4342                 :     145386 :   Shortcuts shortcuts(this->gogo_);
    4343                 :      72693 :   retblock->traverse(&shortcuts);
    4344                 :            : 
    4345                 :      72693 :   return Statement::make_block_statement(retblock, loc);
    4346                 :            : }
    4347                 :            : 
    4348                 :            : // Turn shortcut operators into explicit if statements.  Doing this
    4349                 :            : // considerably simplifies the order of evaluation rules.
    4350                 :            : 
    4351                 :            : void
    4352                 :       3372 : Gogo::remove_shortcuts()
    4353                 :            : {
    4354                 :       3372 :   Shortcuts shortcuts(this);
    4355                 :       3372 :   this->traverse(&shortcuts);
    4356                 :       3372 : }
    4357                 :            : 
    4358                 :            : // Turn shortcut operators into explicit if statements in a block.
    4359                 :            : 
    4360                 :            : void
    4361                 :      74966 : Gogo::remove_shortcuts_in_block(Block* block)
    4362                 :            : {
    4363                 :      74966 :   Shortcuts shortcuts(this);
    4364                 :      74966 :   block->traverse(&shortcuts);
    4365                 :      74966 : }
    4366                 :            : 
    4367                 :            : // Traversal to flatten parse tree after order of evaluation rules are applied.
    4368                 :            : 
    4369                 :     388527 : class Flatten : public Traverse
    4370                 :            : {
    4371                 :            :  public:
    4372                 :     388527 :   Flatten(Gogo* gogo, Named_object* function)
    4373                 :            :     : Traverse(traverse_variables
    4374                 :            :                | traverse_functions
    4375                 :            :                | traverse_statements
    4376                 :            :                | traverse_expressions),
    4377                 :     388527 :       gogo_(gogo), function_(function), inserter_()
    4378                 :            :   { }
    4379                 :            : 
    4380                 :            :   void
    4381                 :     372049 :   set_inserter(const Statement_inserter* inserter)
    4382                 :     372049 :   { this->inserter_ = *inserter; }
    4383                 :            : 
    4384                 :            :   int
    4385                 :            :   variable(Named_object*);
    4386                 :            : 
    4387                 :            :   int
    4388                 :            :   function(Named_object*);
    4389                 :            : 
    4390                 :            :   int
    4391                 :            :   statement(Block*, size_t* pindex, Statement*);
    4392                 :            : 
    4393                 :            :   int
    4394                 :            :   expression(Expression**);
    4395                 :            : 
    4396                 :            :  private:
    4397                 :            :   // General IR.
    4398                 :            :   Gogo* gogo_;
    4399                 :            :   // The function we are traversing.
    4400                 :            :   Named_object* function_;
    4401                 :            :   // Current statement inserter for use by expressions.
    4402                 :            :   Statement_inserter inserter_;
    4403                 :            : };
    4404                 :            : 
    4405                 :            : // Flatten variables.
    4406                 :            : 
    4407                 :            : int
    4408                 :    1196360 : Flatten::variable(Named_object* no)
    4409                 :            : {
    4410                 :    1196360 :   if (!no->is_variable())
    4411                 :            :     return TRAVERSE_CONTINUE;
    4412                 :            : 
    4413                 :     993125 :   if (no->is_variable() && no->var_value()->is_global())
    4414                 :            :     {
    4415                 :            :       // Global variables can have loops in their initialization
    4416                 :            :       // expressions.  This is handled in flatten_init_expression.
    4417                 :     273147 :       no->var_value()->flatten_init_expression(this->gogo_, this->function_,
    4418                 :            :                                                &this->inserter_);
    4419                 :     273147 :       return TRAVERSE_CONTINUE;
    4420                 :            :     }
    4421                 :            : 
    4422                 :     719978 :   if (!no->var_value()->is_parameter()
    4423                 :     324204 :       && !no->var_value()->is_receiver()
    4424                 :     324204 :       && !no->var_value()->is_closure()
    4425                 :     324204 :       && no->var_value()->is_non_escaping_address_taken()
    4426                 :      26622 :       && !no->var_value()->is_in_heap()
    4427                 :     742137 :       && no->var_value()->toplevel_decl() == NULL)
    4428                 :            :     {
    4429                 :            :       // Local variable that has address taken but not escape.
    4430                 :            :       // It needs to be live beyond its lexical scope. So we
    4431                 :            :       // create a top-level declaration for it.
    4432                 :            :       // No need to do it if it is already in the top level.
    4433                 :      18120 :       Block* top_block = function_->func_value()->block();
    4434                 :      18120 :       if (top_block->bindings()->lookup_local(no->name()) != no)
    4435                 :            :         {
    4436                 :       3982 :           Variable* var = no->var_value();
    4437                 :       3982 :           Temporary_statement* ts =
    4438                 :       3982 :             Statement::make_temporary(var->type(), NULL, var->location());
    4439                 :       3982 :           ts->set_is_address_taken();
    4440                 :       3982 :           top_block->add_statement_at_front(ts);
    4441                 :       3982 :           var->set_toplevel_decl(ts);
    4442                 :            :         }
    4443                 :            :     }
    4444                 :            : 
    4445                 :     719978 :   go_assert(!no->var_value()->has_pre_init());
    4446                 :            : 
    4447                 :            :   return TRAVERSE_SKIP_COMPONENTS;
    4448                 :            : }
    4449                 :            : 
    4450                 :            : // Flatten the body of a function.  Record the function while flattening it,
    4451                 :            : // so that we can pass it down when flattening an expression.
    4452                 :            : 
    4453                 :            : int
    4454                 :     248198 : Flatten::function(Named_object* no)
    4455                 :            : {
    4456                 :     248198 :   go_assert(this->function_ == NULL);
    4457                 :     248198 :   this->function_ = no;
    4458                 :     248198 :   int t = no->func_value()->traverse(this);
    4459                 :     248198 :   this->function_ = NULL;
    4460                 :            : 
    4461                 :     248198 :   if (t == TRAVERSE_EXIT)
    4462                 :          0 :     return t;
    4463                 :            :   return TRAVERSE_SKIP_COMPONENTS;
    4464                 :            : }
    4465                 :            : 
    4466                 :            : // Flatten statement parse trees.
    4467                 :            : 
    4468                 :            : int
    4469                 :    5288060 : Flatten::statement(Block* block, size_t* pindex, Statement* sorig)
    4470                 :            : {
    4471                 :            :   // Because we explicitly traverse the statement's contents
    4472                 :            :   // ourselves, we want to skip block statements here.  There is
    4473                 :            :   // nothing to flatten in a block statement.
    4474                 :    5288060 :   if (sorig->is_block_statement())
    4475                 :            :     return TRAVERSE_CONTINUE;
    4476                 :            : 
    4477                 :    4100280 :   Statement_inserter hold_inserter(this->inserter_);
    4478                 :    4100280 :   this->inserter_ = Statement_inserter(block, pindex);
    4479                 :            : 
    4480                 :            :   // Flatten the expressions first.
    4481                 :    4100280 :   int t = sorig->traverse_contents(this);
    4482                 :    4100280 :   if (t == TRAVERSE_EXIT)
    4483                 :            :     {
    4484                 :          0 :       this->inserter_ = hold_inserter;
    4485                 :          0 :       return t;
    4486                 :            :     }
    4487                 :            : 
    4488                 :            :   // Keep flattening until nothing changes.
    4489                 :            :   Statement* s = sorig;
    4490                 :    4100500 :   while (true)
    4491                 :            :     {
    4492                 :    4100500 :       Statement* snew = s->flatten(this->gogo_, this->function_, block,
    4493                 :            :                                    &this->inserter_);
    4494                 :    4100500 :       if (snew == s)
    4495                 :            :         break;
    4496                 :        222 :       s = snew;
    4497                 :        222 :       t = s->traverse_contents(this);
    4498                 :        222 :       if (t == TRAVERSE_EXIT)
    4499                 :            :         {
    4500                 :          0 :           this->inserter_ = hold_inserter;
    4501                 :          0 :           return t;
    4502                 :            :         }
    4503                 :            :     }
    4504                 :            : 
    4505                 :    4100280 :   if (s != sorig)
    4506                 :        222 :     block->replace_statement(*pindex, s);
    4507                 :            : 
    4508                 :    4100280 :   this->inserter_ = hold_inserter;
    4509                 :    4100280 :   return TRAVERSE_SKIP_COMPONENTS;
    4510                 :            : }
    4511                 :            : 
    4512                 :            : // Flatten expression parse trees.
    4513                 :            : 
    4514                 :            : int
    4515                 :   15318800 : Flatten::expression(Expression** pexpr)
    4516                 :            : {
    4517                 :            :   // Keep flattening until nothing changes.
    4518                 :   15373200 :   while (true)
    4519                 :            :     {
    4520                 :   15346000 :       Expression* e = *pexpr;
    4521                 :   15346000 :       if (e->traverse_subexpressions(this) == TRAVERSE_EXIT)
    4522                 :            :         return TRAVERSE_EXIT;
    4523                 :            : 
    4524                 :   15346000 :       Expression* enew = e->flatten(this->gogo_, this->function_,
    4525                 :            :                                     &this->inserter_);
    4526                 :   15346000 :       if (enew == e)
    4527                 :            :         break;
    4528                 :      27199 :       *pexpr = enew;
    4529                 :      27199 :     }
    4530                 :            :   return TRAVERSE_SKIP_COMPONENTS;
    4531                 :            : }
    4532                 :            : 
    4533                 :            : // Flatten a block.
    4534                 :            : 
    4535                 :            : void
    4536                 :      13106 : Gogo::flatten_block(Named_object* function, Block* block)
    4537                 :            : {
    4538                 :      13106 :   Flatten flatten(this, function);
    4539                 :      13106 :   block->traverse(&flatten);
    4540                 :      13106 : }
    4541                 :            : 
    4542                 :            : // Flatten an expression.  INSERTER may be NULL, in which case the
    4543                 :            : // expression had better not need to create any temporaries.
    4544                 :            : 
    4545                 :            : void
    4546                 :     372049 : Gogo::flatten_expression(Named_object* function, Statement_inserter* inserter,
    4547                 :            :                          Expression** pexpr)
    4548                 :            : {
    4549                 :     372049 :   Flatten flatten(this, function);
    4550                 :     372049 :   if (inserter != NULL)
    4551                 :     372049 :     flatten.set_inserter(inserter);
    4552                 :     372049 :   flatten.expression(pexpr);
    4553                 :     372049 : }
    4554                 :            : 
    4555                 :            : void
    4556                 :       3372 : Gogo::flatten()
    4557                 :            : {
    4558                 :       3372 :   Flatten flatten(this, NULL);
    4559                 :       3372 :   this->traverse(&flatten);
    4560                 :       3372 : }
    4561                 :            : 
    4562                 :            : // Traversal to convert calls to the predeclared recover function to
    4563                 :            : // pass in an argument indicating whether it can recover from a panic
    4564                 :            : // or not.
    4565                 :            : 
    4566                 :       1318 : class Convert_recover : public Traverse
    4567                 :            : {
    4568                 :            :  public:
    4569                 :        659 :   Convert_recover(Named_object* arg)
    4570                 :        659 :     : Traverse(traverse_expressions),
    4571                 :        659 :       arg_(arg)
    4572                 :            :   { }
    4573                 :            : 
    4574                 :            :  protected:
    4575                 :            :   int
    4576                 :            :   expression(Expression**);
    4577                 :            : 
    4578                 :            :  private:
    4579                 :            :   // The argument to pass to the function.
    4580                 :            :   Named_object* arg_;
    4581                 :            : };
    4582                 :            : 
    4583                 :            : // Convert calls to recover.
    4584                 :            : 
    4585                 :            : int
    4586                 :      17075 : Convert_recover::expression(Expression** pp)
    4587                 :            : {
    4588                 :      17075 :   Call_expression* ce = (*pp)->call_expression();
    4589                 :       2173 :   if (ce != NULL && ce->is_recover_call())
    4590                 :        671 :     ce->set_recover_arg(Expression::make_var_reference(this->arg_,
    4591                 :            :                                                        ce->location()));
    4592                 :      17075 :   return TRAVERSE_CONTINUE;
    4593                 :            : }
    4594                 :            : 
    4595                 :            : // Traversal for build_recover_thunks.
    4596                 :            : 
    4597                 :       3372 : class Build_recover_thunks : public Traverse
    4598                 :            : {
    4599                 :            :  public:
    4600                 :       3372 :   Build_recover_thunks(Gogo* gogo)
    4601                 :       3372 :     : Traverse(traverse_functions),
    4602                 :       3372 :       gogo_(gogo)
    4603                 :            :   { }
    4604                 :            : 
    4605                 :            :   int
    4606                 :            :   function(Named_object*);
    4607                 :            : 
    4608                 :            :  private:
    4609                 :            :   Expression*
    4610                 :            :   can_recover_arg(Location);
    4611                 :            : 
    4612                 :            :   // General IR.
    4613                 :            :   Gogo* gogo_;
    4614                 :            : };
    4615                 :            : 
    4616                 :            : // If this function calls recover, turn it into a thunk.
    4617                 :            : 
    4618                 :            : int
    4619                 :     161328 : Build_recover_thunks::function(Named_object* orig_no)
    4620                 :            : {
    4621                 :     161328 :   Function* orig_func = orig_no->func_value();
    4622                 :     161328 :   if (!orig_func->calls_recover()
    4623                 :       1318 :       || orig_func->is_recover_thunk()
    4624                 :     162646 :       || orig_func->has_recover_thunk())
    4625                 :            :     return TRAVERSE_CONTINUE;
    4626                 :            : 
    4627                 :        659 :   Gogo* gogo = this->gogo_;
    4628                 :        659 :   Location location = orig_func->location();
    4629                 :            : 
    4630                 :        659 :   static int count;
    4631                 :        659 :   char buf[50];
    4632                 :            : 
    4633                 :        659 :   Function_type* orig_fntype = orig_func->type();
    4634                 :        659 :   Typed_identifier_list* new_params = new Typed_identifier_list();
    4635                 :        659 :   std::string receiver_name;
    4636                 :        659 :   if (orig_fntype->is_method())
    4637                 :            :     {
    4638                 :         36 :       const Typed_identifier* receiver = orig_fntype->receiver();
    4639                 :         36 :       snprintf(buf, sizeof buf, "rt.%u", count);
    4640                 :         36 :       ++count;
    4641                 :         36 :       receiver_name = buf;
    4642                 :         36 :       new_params->push_back(Typed_identifier(receiver_name, receiver->type(),
    4643                 :            :                                              receiver->location()));
    4644                 :            :     }
    4645                 :        659 :   const Typed_identifier_list* orig_params = orig_fntype->parameters();
    4646                 :        659 :   if (orig_params != NULL && !orig_params->empty())
    4647                 :            :     {
    4648                 :        381 :       for (Typed_identifier_list::const_iterator p = orig_params->begin();
    4649                 :        237 :            p != orig_params->end();
    4650                 :        237 :            ++p)
    4651                 :            :         {
    4652                 :        144 :           snprintf(buf, sizeof buf, "pt.%u", count);
    4653                 :        144 :           ++count;
    4654                 :        144 :           new_params->push_back(Typed_identifier(buf, p->type(),
    4655                 :            :                                                  p->location()));
    4656                 :            :         }
    4657                 :            :     }
    4658                 :        659 :   snprintf(buf, sizeof buf, "pr.%u", count);
    4659                 :        659 :   ++count;
    4660                 :       1318 :   std::string can_recover_name = buf;
    4661                 :       1318 :   new_params->push_back(Typed_identifier(can_recover_name,
    4662                 :        659 :                                          Type::lookup_bool_type(),
    4663                 :            :                                          orig_fntype->location()));
    4664                 :            : 
    4665                 :        659 :   const Typed_identifier_list* orig_results = orig_fntype->results();
    4666                 :        659 :   Typed_identifier_list* new_results;
    4667                 :        659 :   if (orig_results == NULL || orig_results->empty())
    4668                 :            :     new_results = NULL;
    4669                 :            :   else
    4670                 :            :     {
    4671                 :          2 :       new_results = new Typed_identifier_list();
    4672                 :          2 :       for (Typed_identifier_list::const_iterator p = orig_results->begin();
    4673                 :          4 :            p != orig_results->end();
    4674                 :          4 :            ++p)
    4675                 :          2 :         new_results->push_back(Typed_identifier("", p->type(), p->location()));
    4676                 :            :     }
    4677                 :            : 
    4678                 :        659 :   Function_type *new_fntype = Type::make_function_type(NULL, new_params,
    4679                 :            :                                                        new_results,
    4680                 :            :                                                        orig_fntype->location());
    4681                 :        659 :   if (orig_fntype->is_varargs())
    4682                 :          1 :     new_fntype->set_is_varargs();
    4683                 :            : 
    4684                 :        659 :   Type* rtype = NULL;
    4685                 :        659 :   if (orig_fntype->is_method())
    4686                 :         36 :     rtype = orig_fntype->receiver()->type();
    4687                 :       1318 :   std::string name(gogo->recover_thunk_name(orig_no->name(), rtype));
    4688                 :        659 :   Named_object *new_no = gogo->start_function(name, new_fntype, false,
    4689                 :            :                                               location);
    4690                 :        659 :   Function *new_func = new_no->func_value();
    4691                 :        659 :   if (orig_func->enclosing() != NULL)
    4692                 :        576 :     new_func->set_enclosing(orig_func->enclosing());
    4693                 :            : 
    4694                 :            :   // We build the code for the original function attached to the new
    4695                 :            :   // function, and then swap the original and new function bodies.
    4696                 :            :   // This means that existing references to the original function will
    4697                 :            :   // then refer to the new function.  That makes this code a little
    4698                 :            :   // confusing, in that the reference to NEW_NO really refers to the
    4699                 :            :   // other function, not the one we are building.
    4700                 :            : 
    4701                 :        659 :   Expression* closure = NULL;
    4702                 :        659 :   if (orig_func->needs_closure())
    4703                 :            :     {
    4704                 :            :       // For the new function we are creating, declare a new parameter
    4705                 :            :       // variable NEW_CLOSURE_NO and set it to be the closure variable
    4706                 :            :       // of the function.  This will be set to the closure value
    4707                 :            :       // passed in by the caller.  Then pass a reference to this
    4708                 :            :       // variable as the closure value when calling the original
    4709                 :            :       // function.  In other words, simply pass the closure value
    4710                 :            :       // through the thunk we are creating.
    4711                 :        441 :       Named_object* orig_closure_no = orig_func->closure_var();
    4712                 :        441 :       Variable* orig_closure_var = orig_closure_no->var_value();
    4713                 :        441 :       Variable* new_var = new Variable(orig_closure_var->type(), NULL, false,
    4714                 :        441 :                                        false, false, location);
    4715                 :        441 :       new_var->set_is_closure();
    4716                 :        441 :       snprintf(buf, sizeof buf, "closure.%u", count);
    4717                 :        441 :       ++count;
    4718                 :        441 :       Named_object* new_closure_no = Named_object::make_variable(buf, NULL,
    4719                 :            :                                                                  new_var);
    4720                 :        441 :       new_func->set_closure_var(new_closure_no);
    4721                 :        441 :       closure = Expression::make_var_reference(new_closure_no, location);
    4722                 :            :     }
    4723                 :            : 
    4724                 :        659 :   Expression* fn = Expression::make_func_reference(new_no, closure, location);
    4725                 :            : 
    4726                 :        659 :   Expression_list* args = new Expression_list();
    4727                 :        659 :   if (new_params != NULL)
    4728                 :            :     {
    4729                 :            :       // Note that we skip the last parameter, which is the boolean
    4730                 :            :       // indicating whether recover can succed.
    4731                 :        659 :       for (Typed_identifier_list::const_iterator p = new_params->begin();
    4732                 :        839 :            p + 1 != new_params->end();
    4733                 :        839 :            ++p)
    4734                 :            :         {
    4735                 :        180 :           Named_object* p_no = gogo->lookup(p->name(), NULL);
    4736                 :        180 :           go_assert(p_no != NULL
    4737                 :            :                      && p_no->is_variable()
    4738                 :            :                      && p_no->var_value()->is_parameter());
    4739                 :        180 :           args->push_back(Expression::make_var_reference(p_no, location));
    4740                 :            :         }
    4741                 :            :     }
    4742                 :        659 :   args->push_back(this->can_recover_arg(location));
    4743                 :            : 
    4744                 :        659 :   gogo->start_block(location);
    4745                 :            : 
    4746                 :        659 :   Call_expression* call = Expression::make_call(fn, args, false, location);
    4747                 :            : 
    4748                 :            :   // Any varargs call has already been lowered.
    4749                 :        659 :   call->set_varargs_are_lowered();
    4750                 :            : 
    4751                 :        659 :   Statement* s = Statement::make_return_from_call(call, location);
    4752                 :        659 :   s->determine_types();
    4753                 :        659 :   gogo->add_statement(s);
    4754                 :            : 
    4755                 :        659 :   Block* b = gogo->finish_block(location);
    4756                 :            : 
    4757                 :        659 :   gogo->add_block(b, location);
    4758                 :            : 
    4759                 :            :   // Lower the call in case it returns multiple results.
    4760                 :        659 :   gogo->lower_block(new_no, b);
    4761                 :            : 
    4762                 :        659 :   gogo->finish_function(location);
    4763                 :            : 
    4764                 :            :   // Swap the function bodies and types.
    4765                 :        659 :   new_func->swap_for_recover(orig_func);
    4766                 :        659 :   orig_func->set_is_recover_thunk();
    4767                 :        659 :   new_func->set_calls_recover();
    4768                 :        659 :   new_func->set_has_recover_thunk();
    4769                 :            : 
    4770                 :        659 :   Bindings* orig_bindings = orig_func->block()->bindings();
    4771                 :        659 :   Bindings* new_bindings = new_func->block()->bindings();
    4772                 :        659 :   if (orig_fntype->is_method())
    4773                 :            :     {
    4774                 :            :       // We changed the receiver to be a regular parameter.  We have
    4775                 :            :       // to update the binding accordingly in both functions.
    4776                 :         36 :       Named_object* orig_rec_no = orig_bindings->lookup_local(receiver_name);
    4777                 :         36 :       go_assert(orig_rec_no != NULL
    4778                 :            :                  && orig_rec_no->is_variable()
    4779                 :            :                  && !orig_rec_no->var_value()->is_receiver());
    4780                 :         36 :       orig_rec_no->var_value()->set_is_receiver();
    4781                 :            : 
    4782                 :         72 :       std::string new_receiver_name(orig_fntype->receiver()->name());
    4783                 :         36 :       if (new_receiver_name.empty())
    4784                 :            :         {
    4785                 :            :           // Find the receiver.  It was named "r.NNN" in
    4786                 :            :           // Gogo::start_function.
    4787                 :          6 :           for (Bindings::const_definitions_iterator p =
    4788                 :          6 :                  new_bindings->begin_definitions();
    4789                 :          6 :                p != new_bindings->end_definitions();
    4790                 :          6 :                ++p)
    4791                 :            :             {
    4792                 :          6 :               const std::string& pname((*p)->name());
    4793                 :          6 :               if (pname[0] == 'r' && pname[1] == '.')
    4794                 :            :                 {
    4795                 :          6 :                   new_receiver_name = pname;
    4796                 :            :                   break;
    4797                 :            :                 }
    4798                 :            :             }
    4799                 :          6 :           go_assert(!new_receiver_name.empty());
    4800                 :            :         }
    4801                 :         36 :       Named_object* new_rec_no = new_bindings->lookup_local(new_receiver_name);
    4802                 :         36 :       if (new_rec_no == NULL)
    4803                 :          0 :         go_assert(saw_errors());
    4804                 :            :       else
    4805                 :            :         {
    4806                 :         36 :           go_assert(new_rec_no->is_variable()
    4807                 :            :                      && new_rec_no->var_value()->is_receiver());
    4808                 :         72 :           new_rec_no->var_value()->set_is_not_receiver();
    4809                 :            :         }
    4810                 :            :     }
    4811                 :            : 
    4812                 :            :   // Because we flipped blocks but not types, the can_recover
    4813                 :            :   // parameter appears in the (now) old bindings as a parameter.
    4814                 :            :   // Change it to a local variable, whereupon it will be discarded.
    4815                 :        659 :   Named_object* can_recover_no = orig_bindings->lookup_local(can_recover_name);
    4816                 :        659 :   go_assert(can_recover_no != NULL
    4817                 :            :              && can_recover_no->is_variable()
    4818                 :            :              && can_recover_no->var_value()->is_parameter());
    4819                 :        659 :   orig_bindings->remove_binding(can_recover_no);
    4820                 :            : 
    4821                 :            :   // Add the can_recover argument to the (now) new bindings, and
    4822                 :            :   // attach it to any recover statements.
    4823                 :        659 :   Variable* can_recover_var = new Variable(Type::lookup_bool_type(), NULL,
    4824                 :        659 :                                            false, true, false, location);
    4825                 :        659 :   can_recover_no = new_bindings->add_variable(can_recover_name, NULL,
    4826                 :            :                                               can_recover_var);
    4827                 :       1318 :   Convert_recover convert_recover(can_recover_no);
    4828                 :        659 :   new_func->traverse(&convert_recover);
    4829                 :            : 
    4830                 :            :   // Update the function pointers in any named results.
    4831                 :        659 :   new_func->update_result_variables();
    4832                 :        659 :   orig_func->update_result_variables();
    4833                 :            : 
    4834                 :        659 :   return TRAVERSE_CONTINUE;
    4835                 :            : }
    4836                 :            : 
    4837                 :            : // Return the expression to pass for the .can_recover parameter to the
    4838                 :            : // new function.  This indicates whether a call to recover may return
    4839                 :            : // non-nil.  The expression is runtime.canrecover(__builtin_return_address()).
    4840                 :            : 
    4841                 :            : Expression*
    4842                 :        659 : Build_recover_thunks::can_recover_arg(Location location)
    4843                 :            : {
    4844                 :        659 :   Type* uintptr_type = Type::lookup_integer_type("uintptr");
    4845                 :        659 :   static Named_object* can_recover;
    4846                 :        659 :   if (can_recover == NULL)
    4847                 :            :     {
    4848                 :        243 :       const Location bloc = Linemap::predeclared_location();
    4849                 :        243 :       Typed_identifier_list* param_types = new Typed_identifier_list();
    4850                 :        243 :       param_types->push_back(Typed_identifier("a", uintptr_type, bloc));
    4851                 :        243 :       Type* boolean_type = Type::lookup_bool_type();
    4852                 :        243 :       Typed_identifier_list* results = new Typed_identifier_list();
    4853                 :        243 :       results->push_back(Typed_identifier("", boolean_type, bloc));
    4854                 :        243 :       Function_type* fntype = Type::make_function_type(NULL, param_types,
    4855                 :            :                                                        results, bloc);
    4856                 :        243 :       can_recover =
    4857                 :        243 :         Named_object::make_function_declaration("runtime_canrecover",
    4858                 :            :                                                 NULL, fntype, bloc);
    4859                 :        486 :       can_recover->func_declaration_value()->set_asm_name("runtime.canrecover");
    4860                 :            :     }
    4861                 :            : 
    4862                 :        659 :   Expression* zexpr = Expression::make_integer_ul(0, NULL, location);
    4863                 :        659 :   Expression* call = Runtime::make_call(Runtime::BUILTIN_RETURN_ADDRESS,
    4864                 :            :                                         location, 1, zexpr);
    4865                 :        659 :   call = Expression::make_unsafe_cast(uintptr_type, call, location);
    4866                 :            : 
    4867                 :        659 :   Expression_list* args = new Expression_list();
    4868                 :        659 :   args->push_back(call);
    4869                 :            : 
    4870                 :        659 :   Expression* fn = Expression::make_func_reference(can_recover, NULL, location);
    4871                 :        659 :   return Expression::make_call(fn, args, false, location);
    4872                 :            : }
    4873                 :            : 
    4874                 :            : // Build thunks for functions which call recover.  We build a new
    4875                 :            : // function with an extra parameter, which is whether a call to
    4876                 :            : // recover can succeed.  We then move the body of this function to
    4877                 :            : // that one.  We then turn this function into a thunk which calls the
    4878                 :            : // new one, passing the value of runtime.canrecover(__builtin_return_address()).
    4879                 :            : // The function will be marked as not splitting the stack.  This will
    4880                 :            : // cooperate with the implementation of defer to make recover do the
    4881                 :            : // right thing.
    4882                 :            : 
    4883                 :            : void
    4884                 :       3372 : Gogo::build_recover_thunks()
    4885                 :            : {
    4886                 :       3372 :   Build_recover_thunks build_recover_thunks(this);
    4887                 :       3372 :   this->traverse(&build_recover_thunks);
    4888                 :       3372 : }
    4889                 :            : 
    4890                 :            : // Look for named types to see whether we need to create an interface
    4891                 :            : // method table.
    4892                 :            : 
    4893                 :       1746 : class Build_method_tables : public Traverse
    4894                 :            : {
    4895                 :            :  public:
    4896                 :       1746 :   Build_method_tables(Gogo* gogo,
    4897                 :            :                       const std::vector<Interface_type*>& interfaces)
    4898                 :       1746 :     : Traverse(traverse_types),
    4899                 :       1746 :       gogo_(gogo), interfaces_(interfaces)
    4900                 :            :   { }
    4901                 :            : 
    4902                 :            :   int
    4903                 :            :   type(Type*);
    4904                 :            : 
    4905                 :            :  private:
    4906                 :            :   // The IR.
    4907                 :            :   Gogo* gogo_;
    4908                 :            :   // A list of locally defined interfaces which have hidden methods.
    4909                 :            :   const std::vector<Interface_type*>& interfaces_;
    4910                 :            : };
    4911                 :            : 
    4912                 :            : // Build all required interface method tables for types.  We need to
    4913                 :            : // ensure that we have an interface method table for every interface
    4914                 :            : // which has a hidden method, for every named type which implements
    4915                 :            : // that interface.  Normally we can just build interface method tables
    4916                 :            : // as we need them.  However, in some cases we can require an
    4917                 :            : // interface method table for an interface defined in a different
    4918                 :            : // package for a type defined in that package.  If that interface and
    4919                 :            : // type both use a hidden method, that is OK.  However, we will not be
    4920                 :            : // able to build that interface method table when we need it, because
    4921                 :            : // the type's hidden method will be static.  So we have to build it
    4922                 :            : // here, and just refer it from other packages as needed.
    4923                 :            : 
    4924                 :            : void
    4925                 :       3372 : Gogo::build_interface_method_tables()
    4926                 :            : {
    4927                 :       3372 :   if (saw_errors())
    4928                 :        261 :     return;
    4929                 :            : 
    4930                 :       6222 :   std::vector<Interface_type*> hidden_interfaces;
    4931                 :       3111 :   hidden_interfaces.reserve(this->interface_types_.size());
    4932                 :      57865 :   for (std::vector<Interface_type*>::const_iterator pi =
    4933                 :       3111 :          this->interface_types_.begin();
    4934                 :      60976 :        pi != this->interface_types_.end();
    4935                 :      60976 :        ++pi)
    4936                 :            :     {
    4937                 :      57865 :       const Typed_identifier_list* methods = (*pi)->methods();
    4938                 :      57865 :       if (methods == NULL)
    4939                 :       6624 :         continue;
    4940                 :     196749 :       for (Typed_identifier_list::const_iterator pm = methods->begin();
    4941                 :     196749 :            pm != methods->end();
    4942                 :     196749 :            ++pm)
    4943                 :            :         {
    4944                 :     150884 :           if (Gogo::is_hidden_name(pm->name()))
    4945                 :            :             {
    4946                 :       5376 :               hidden_interfaces.push_back(*pi);
    4947                 :       5376 :               break;
    4948                 :            :             }
    4949                 :            :         }
    4950                 :            :     }
    4951                 :            : 
    4952                 :       3111 :   if (!hidden_interfaces.empty())
    4953                 :            :     {
    4954                 :            :       // Now traverse the tree looking for all named types.
    4955                 :       3492 :       Build_method_tables bmt(this, hidden_interfaces);
    4956                 :       1746 :       this->traverse(&bmt);
    4957                 :            :     }
    4958                 :            : 
    4959                 :            :   // We no longer need the list of interfaces.
    4960                 :            : 
    4961                 :       5904 :   this->interface_types_.clear();
    4962                 :            : }
    4963                 :            : 
    4964                 :            : // This is called for each type.  For a named type, for each of the
    4965                 :            : // interfaces with hidden methods that it implements, create the
    4966                 :            : // method table.
    4967                 :            : 
    4968                 :            : int
    4969                 :    8725330 : Build_method_tables::type(Type* type)
    4970                 :            : {
    4971                 :    8725330 :   Named_type* nt = type->named_type();
    4972                 :    8725330 :   Struct_type* st = type->struct_type();
    4973                 :    8725330 :   if (nt != NULL || st != NULL)
    4974                 :            :     {
    4975                 :    2956220 :       Translate_context context(this->gogo_, NULL, NULL, NULL);
    4976                 :   11998900 :       for (std::vector<Interface_type*>::const_iterator p =
    4977                 :    2956220 :              this->interfaces_.begin();
    4978                 :   14955200 :            p != this->interfaces_.end();
    4979                 :   14955200 :            ++p)
    4980                 :            :         {
    4981                 :            :           // We ask whether a pointer to the named type implements the
    4982                 :            :           // interface, because a pointer can implement more methods
    4983                 :            :           // than a value.
    4984                 :   11998900 :           if (nt != NULL)
    4985                 :            :             {
    4986                 :    9912010 :               if ((*p)->implements_interface(Type::make_pointer_type(nt),
    4987                 :            :                                              NULL))
    4988                 :            :                 {
    4989                 :      46724 :                   nt->interface_method_table(*p, false)->get_backend(&context);
    4990                 :      46724 :                   nt->interface_method_table(*p, true)->get_backend(&context);
    4991                 :            :                 }
    4992                 :            :             }
    4993                 :            :           else
    4994                 :            :             {
    4995                 :    2086940 :               if ((*p)->implements_interface(Type::make_pointer_type(st),
    4996                 :            :                                              NULL))
    4997                 :            :                 {
    4998                 :        217 :                   st->interface_method_table(*p, false)->get_backend(&context);
    4999                 :        217 :                   st->interface_method_table(*p, true)->get_backend(&context);
    5000                 :            :                 }
    5001                 :            :             }
    5002                 :            :         }
    5003                 :            :     }
    5004                 :    8725330 :   return TRAVERSE_CONTINUE;
    5005                 :            : }
    5006                 :            : 
    5007                 :            : // Return an expression which allocates memory to hold values of type TYPE.
    5008                 :            : 
    5009                 :            : Expression*
    5010                 :     176292 : Gogo::allocate_memory(Type* type, Location location)
    5011                 :            : {
    5012                 :     176292 :   Expression* td = Expression::make_type_descriptor(type, location);
    5013                 :     176292 :   return Runtime::make_call(Runtime::NEW, location, 1, td);
    5014                 :            : }
    5015                 :            : 
    5016                 :            : // Traversal class used to check for return statements.
    5017                 :            : 
    5018                 :       3372 : class Check_return_statements_traverse : public Traverse
    5019                 :            : {
    5020                 :            :  public:
    5021                 :       3372 :   Check_return_statements_traverse()
    5022                 :       3372 :     : Traverse(traverse_functions)
    5023                 :            :   { }
    5024                 :            : 
    5025                 :            :   int
    5026                 :            :   function(Named_object*);
    5027                 :            : };
    5028                 :            : 
    5029                 :            : // Check that a function has a return statement if it needs one.
    5030                 :            : 
    5031                 :            : int
    5032                 :     148931 : Check_return_statements_traverse::function(Named_object* no)
    5033                 :            : {
    5034                 :     148931 :   Function* func = no->func_value();
    5035                 :     148931 :   const Function_type* fntype = func->type();
    5036                 :     148931 :   const Typed_identifier_list* results = fntype->results();
    5037                 :            : 
    5038                 :            :   // We only need a return statement if there is a return value.
    5039                 :     148931 :   if (results == NULL || results->empty())
    5040                 :            :     return TRAVERSE_CONTINUE;
    5041                 :            : 
    5042                 :      89387 :   if (func->block()->may_fall_through())
    5043                 :        225 :     go_error_at(func->block()->end_location(),
    5044                 :            :                 "missing return at end of function");
    5045                 :            : 
    5046                 :            :   return TRAVERSE_CONTINUE;
    5047                 :            : }
    5048                 :            : 
    5049                 :            : // Check return statements.
    5050                 :            : 
    5051                 :            : void
    5052                 :       3372 : Gogo::check_return_statements()
    5053                 :            : {
    5054                 :       3372 :   Check_return_statements_traverse traverse;
    5055                 :       3372 :   this->traverse(&traverse);
    5056                 :       3372 : }
    5057                 :            : 
    5058                 :            : // Traversal class to decide whether a function body is less than the
    5059                 :            : // inlining budget.  This adjusts *available as it goes, and stops the
    5060                 :            : // traversal if it goes negative.
    5061                 :            : 
    5062                 :    1492610 : class Inline_within_budget : public Traverse
    5063                 :            : {
    5064                 :            :  public:
    5065                 :    1492610 :   Inline_within_budget(int* available)
    5066                 :    1492610 :     : Traverse(traverse_statements
    5067                 :            :                | traverse_expressions),
    5068                 :    1492610 :       available_(available)
    5069                 :            :   { }
    5070                 :            : 
    5071                 :            :   int
    5072                 :            :   statement(Block*, size_t*, Statement*);
    5073                 :            : 
    5074                 :            :   int
    5075                 :            :   expression(Expression**);
    5076                 :            : 
    5077                 :            :  private:
    5078                 :            :   // Pointer to remaining budget.
    5079                 :            :   int* available_;
    5080                 :            : };
    5081                 :            : 
    5082                 :            : // Adjust the budget for the inlining cost of a statement.
    5083                 :            : 
    5084                 :            : int
    5085                 :    4081380 : Inline_within_budget::statement(Block*, size_t*, Statement* s)
    5086                 :            : {
    5087                 :    4081380 :   if (*this->available_ < 0)
    5088                 :            :     return TRAVERSE_EXIT;
    5089                 :    4063980 :   *this->available_ -= s->inlining_cost();
    5090                 :    4063980 :   return TRAVERSE_CONTINUE;
    5091                 :            : }
    5092                 :            : 
    5093                 :            : // Adjust the budget for the inlining cost of an expression.
    5094                 :            : 
    5095                 :            : int
    5096                 :    8904030 : Inline_within_budget::expression(Expression** pexpr)
    5097                 :            : {
    5098                 :    8904030 :   if (*this->available_ < 0)
    5099                 :            :     return TRAVERSE_EXIT;
    5100                 :    7568580 :   *this->available_ -= (*pexpr)->inlining_cost();
    5101                 :    7568580 :   return TRAVERSE_CONTINUE;
    5102                 :            : }
    5103                 :            : 
    5104                 :            : // Traversal class to find functions whose body should be exported for
    5105                 :            : // inlining by other packages.
    5106                 :            : 
    5107                 :       6228 : class Mark_inline_candidates : public Traverse
    5108                 :            : {
    5109                 :            :  public:
    5110                 :       3114 :   Mark_inline_candidates(Unordered_set(Named_object*)* marked)
    5111                 :       3114 :     : Traverse(traverse_functions
    5112                 :            :                | traverse_types),
    5113                 :       3114 :       marked_functions_(marked)
    5114                 :            :   { }
    5115                 :            : 
    5116                 :            :   int
    5117                 :            :   function(Named_object*);
    5118                 :            : 
    5119                 :            :   int
    5120                 :            :   type(Type*);
    5121                 :            : 
    5122                 :            :  private:
    5123                 :            :   // We traverse the function body trying to determine how expensive
    5124                 :            :   // it is for inlining.  We start with a budget, and decrease that
    5125                 :            :   // budget for each statement and expression.  If the budget goes
    5126                 :            :   // negative, we do not export the function body.  The value of this
    5127                 :            :   // budget is a heuristic.  In the usual GCC spirit, we could
    5128                 :            :   // consider setting this via a command line option.
    5129                 :            :   const int budget_heuristic = 80;
    5130                 :            : 
    5131                 :            :   // Set of named objects that are marked as inline candidates.
    5132                 :            :   Unordered_set(Named_object*)* marked_functions_;
    5133                 :            : };
    5134                 :            : 
    5135                 :            : // Mark a function if it is an inline candidate.
    5136                 :            : 
    5137                 :            : int
    5138                 :     159158 : Mark_inline_candidates::function(Named_object* no)
    5139                 :            : {
    5140                 :     159158 :   Function* func = no->func_value();
    5141                 :     159158 :   if ((func->pragmas() & GOPRAGMA_NOINLINE) != 0)
    5142                 :            :     return TRAVERSE_CONTINUE;
    5143                 :     159011 :   int budget = budget_heuristic;
    5144                 :     159011 :   Inline_within_budget iwb(&budget);
    5145                 :     159011 :   func->block()->traverse(&iwb);
    5146                 :     159011 :   if (budget >= 0)
    5147                 :            :     {
    5148                 :      36063 :       func->set_export_for_inlining();
    5149                 :      36063 :       this->marked_functions_->insert(no);
    5150                 :            :     }
    5151                 :     159011 :   return TRAVERSE_CONTINUE;
    5152                 :            : }
    5153                 :            : 
    5154                 :            : // Mark methods if they are inline candidates.
    5155                 :            : 
    5156                 :            : int
    5157                 :    8777310 : Mark_inline_candidates::type(Type* t)
    5158                 :            : {
    5159                 :    8777310 :   Named_type* nt = t->named_type();
    5160                 :    8777310 :   if (nt == NULL || nt->is_alias())
    5161                 :            :     return TRAVERSE_CONTINUE;
    5162                 :    2691920 :   const Bindings* methods = nt->local_methods();
    5163                 :    2691920 :   if (methods == NULL)
    5164                 :            :     return TRAVERSE_CONTINUE;
    5165                 :    1686670 :   for (Bindings::const_definitions_iterator p = methods->begin_definitions();
    5166                 :    1686670 :        p != methods->end_definitions();
    5167                 :    1686670 :        ++p)
    5168                 :            :     {
    5169                 :    1334440 :       Named_object* no = *p;
    5170                 :    1334440 :       go_assert(no->is_function());
    5171                 :    1334440 :       Function *func = no->func_value();
    5172                 :    1334440 :       if ((func->pragmas() & GOPRAGMA_NOINLINE) != 0)
    5173                 :        835 :         continue;
    5174                 :    1333600 :       int budget = budget_heuristic;
    5175                 :    2667200 :       Inline_within_budget iwb(&budget);
    5176                 :    1333600 :       func->block()->traverse(&iwb);
    5177                 :    1333600 :       if (budget >= 0)
    5178                 :            :         {
    5179                 :     103066 :           func->set_export_for_inlining();
    5180                 :    1436670 :           this->marked_functions_->insert(no);
    5181                 :            :         }
    5182                 :            :     }
    5183                 :            :   return TRAVERSE_CONTINUE;
    5184                 :            : }
    5185                 :            : 
    5186                 :            : // Export identifiers as requested.
    5187                 :            : 
    5188                 :            : void
    5189                 :       3372 : Gogo::do_exports()
    5190                 :            : {
    5191                 :       3372 :   if (saw_errors())
    5192                 :        258 :     return;
    5193                 :            : 
    5194                 :            :   // Mark any functions whose body should be exported for inlining by
    5195                 :            :   // other packages.
    5196                 :       6228 :   Unordered_set(Named_object*) marked_functions;
    5197                 :       6228 :   Mark_inline_candidates mic(&marked_functions);
    5198                 :       3114 :   this->traverse(&mic);
    5199                 :            : 
    5200                 :            :   // For now we always stream to a section.  Later we may want to
    5201                 :            :   // support streaming to a separate file.
    5202                 :       6228 :   Stream_to_section stream(this->backend());
    5203                 :            : 
    5204                 :            :   // Write out either the prefix or pkgpath depending on how we were
    5205                 :            :   // invoked.
    5206                 :       6228 :   std::string prefix;
    5207                 :       3114 :   std::string pkgpath;
    5208                 :       3114 :   if (this->pkgpath_from_option_)
    5209                 :       1721 :     pkgpath = this->pkgpath_;
    5210                 :       1393 :   else if (this->prefix_from_option_)
    5211                 :          4 :     prefix = this->prefix_;
    5212                 :       1389 :   else if (this->is_main_package())
    5213                 :       1211 :     pkgpath = "main";
    5214                 :            :   else
    5215                 :        178 :     prefix = "go";
    5216                 :            : 
    5217                 :       6228 :   std::string init_fn_name;
    5218                 :       3114 :   if (this->is_main_package())
    5219                 :       1211 :     init_fn_name = "";
    5220                 :       1903 :   else if (this->need_init_fn_)
    5221                 :       1262 :     init_fn_name = this->get_init_fn_name();
    5222                 :            :   else
    5223                 :        641 :     init_fn_name = this->dummy_init_fn_name();
    5224                 :            : 
    5225                 :       6228 :   Export exp(&stream);
    5226                 :       3114 :   exp.register_builtin_types(this);
    5227                 :       3114 :   exp.export_globals(this->package_name(),
    5228                 :            :                      prefix,
    5229                 :            :                      pkgpath,
    5230                 :       3114 :                      this->packages_,
    5231                 :       3114 :                      this->imports_,
    5232                 :            :                      init_fn_name,
    5233                 :       3114 :                      this->imported_init_fns_,
    5234                 :       3114 :                      this->package_->bindings(),
    5235                 :            :                      &marked_functions);
    5236                 :            : 
    5237                 :       3114 :   if (!this->c_header_.empty() && !saw_errors())
    5238                 :          4 :     this->write_c_header();
    5239                 :            : }
    5240                 :            : 
    5241                 :            : // Write the top level named struct types in C format to a C header
    5242                 :            : // file.  This is used when building the runtime package, to share
    5243                 :            : // struct definitions between C and Go.
    5244                 :            : 
    5245                 :            : void
    5246                 :          4 : Gogo::write_c_header()
    5247                 :            : {
    5248                 :          4 :   std::ofstream out;
    5249                 :          4 :   out.open(this->c_header_.c_str());
    5250                 :          4 :   if (out.fail())
    5251                 :            :     {
    5252                 :          0 :       go_error_at(Linemap::unknown_location(),
    5253                 :            :                   "cannot open %s: %m", this->c_header_.c_str());
    5254                 :          0 :       return;
    5255                 :            :     }
    5256                 :            : 
    5257                 :          8 :   std::list<Named_object*> types;
    5258                 :          4 :   Bindings* top = this->package_->bindings();
    5259                 :      36054 :   for (Bindings::const_definitions_iterator p = top->begin_definitions();
    5260                 :      36054 :        p != top->end_definitions();
    5261                 :      36054 :        ++p)
    5262                 :            :     {
    5263                 :      36050 :       Named_object* no = *p;
    5264                 :            : 
    5265                 :            :       // Skip names that start with underscore followed by something
    5266                 :            :       // other than an uppercase letter, as when compiling the runtime
    5267                 :            :       // package they are mostly types defined by mkrsysinfo.sh based
    5268                 :            :       // on the C system header files.  We don't need to translate
    5269                 :            :       // types to C and back to Go.  But do accept the special cases
    5270                 :            :       // _defer, _panic, and _type.
    5271                 :      63206 :       std::string name = Gogo::unpack_hidden_name(no->name());
    5272                 :      36050 :       if (name[0] == '_'
    5273                 :      26388 :           && (name[1] < 'A' || name[1] > 'Z')
    5274                 :      62768 :           && (name != "_defer" && name != "_panic" && name != "_type"))
    5275                 :      13340 :         continue;
    5276                 :            : 
    5277                 :      27156 :       if (no->is_type() && no->type_value()->struct_type() != NULL)
    5278                 :        568 :         types.push_back(no);
    5279                 :      27156 :       if (no->is_const()
    5280                 :      46122 :           && no->const_value()->type()->integer_type() != NULL
    5281                 :      45674 :           && !no->const_value()->is_sink())
    5282                 :            :         {
    5283                 :      37028 :           Numeric_constant nc;
    5284                 :      18514 :           unsigned long val;
    5285                 :      18514 :           if (no->const_value()->expr()->numeric_constant_value(&nc)
    5286                 :      18514 :               && nc.to_unsigned_long(&val) == Numeric_constant::NC_UL_VALID)
    5287                 :            :             {
    5288                 :      54870 :               out << "#define " << no->message_name() << ' ' << val
    5289                 :      36580 :                   << std::endl;
    5290                 :            :             }
    5291                 :            :         }
    5292                 :            :     }
    5293                 :            : 
    5294                 :          8 :   std::vector<const Named_object*> written;
    5295                 :          4 :   int loop = 0;
    5296                 :        656 :   while (!types.empty())
    5297                 :            :     {
    5298                 :        652 :       Named_object* no = types.front();
    5299                 :        652 :       types.pop_front();
    5300                 :            : 
    5301                 :       1172 :       std::vector<const Named_object*> requires;
    5302                 :        520 :       std::vector<const Named_object*> declare;
    5303                 :       1304 :       if (!no->type_value()->struct_type()->can_write_to_c_header(&requires,
    5304                 :            :                                                                   &declare))
    5305                 :        180 :         continue;
    5306                 :            : 
    5307                 :        604 :       bool ok = true;
    5308                 :        948 :       for (std::vector<const Named_object*>::const_iterator pr
    5309                 :        604 :              = requires.begin();
    5310                 :        372 :            pr != requires.end() && ok;
    5311                 :        948 :            ++pr)
    5312                 :            :         {
    5313                 :      11728 :           for (std::list<Named_object*>::const_iterator pt = types.begin();
    5314                 :      11460 :                pt != types.end() && ok;
    5315                 :      11728 :                ++pt)
    5316                 :      11384 :             if (*pr == *pt)
    5317                 :         84 :               ok = false;
    5318                 :            :         }
    5319                 :        604 :       if (!ok)
    5320                 :            :         {
    5321                 :         84 :           ++loop;
    5322                 :         84 :           if (loop > 10000)
    5323                 :            :             {
    5324                 :            :               // This should be impossible since the code parsed and
    5325                 :            :               // type checked.
    5326                 :          0 :               go_unreachable();
    5327                 :            :             }
    5328                 :            : 
    5329                 :         84 :           types.push_back(no);
    5330                 :         84 :           continue;
    5331                 :            :         }
    5332                 :            : 
    5333                 :       1032 :       for (std::vector<const Named_object*>::const_iterator pd
    5334                 :        520 :              = declare.begin();
    5335                 :       1032 :            pd != declare.end();
    5336                 :       1032 :            ++pd)
    5337                 :            :         {
    5338                 :        512 :           if (*pd == no)
    5339                 :         96 :             continue;
    5340                 :            : 
    5341                 :        840 :           std::vector<const Named_object*> drequires;
    5342                 :        416 :           std::vector<const Named_object*> ddeclare;
    5343                 :        848 :           if (!(*pd)->type_value()->struct_type()->
    5344                 :        848 :               can_write_to_c_header(&drequires, &ddeclare))
    5345                 :          8 :             continue;
    5346                 :            : 
    5347                 :        416 :           bool done = false;
    5348                 :      16184 :           for (std::vector<const Named_object*>::const_iterator pw
    5349                 :        416 :                  = written.begin();
    5350                 :      16184 :                pw != written.end();
    5351                 :      16184 :                ++pw)
    5352                 :            :             {
    5353                 :      16092 :               if (*pw == *pd)
    5354                 :            :                 {
    5355                 :            :                   done = true;
    5356                 :            :                   break;
    5357                 :            :                 }
    5358                 :            :             }
    5359                 :        416 :           if (!done)
    5360                 :            :             {
    5361                 :         92 :               out << std::endl;
    5362                 :         92 :               out << "struct " << (*pd)->message_name() << ";" << std::endl;
    5363                 :         92 :               written.push_back(*pd);
    5364                 :            :             }
    5365                 :            :         }
    5366                 :            : 
    5367                 :        520 :       out << std::endl;
    5368                 :        520 :       out << "struct " << no->message_name() << " {" << std::endl;
    5369                 :       1040 :       no->type_value()->struct_type()->write_to_c_header(out);
    5370                 :        520 :       out << "};" << std::endl;
    5371                 :        520 :       written.push_back(no);
    5372                 :            :     }
    5373                 :            : 
    5374                 :          4 :   out.close();
    5375                 :          4 :   if (out.fail())
    5376                 :          0 :     go_error_at(Linemap::unknown_location(),
    5377                 :            :                 "error writing to %s: %m", this->c_header_.c_str());
    5378                 :            : }
    5379                 :            : 
    5380                 :            : // Find the blocks in order to convert named types defined in blocks.
    5381                 :            : 
    5382                 :       3372 : class Convert_named_types : public Traverse
    5383                 :            : {
    5384                 :            :  public:
    5385                 :       3372 :   Convert_named_types(Gogo* gogo)
    5386                 :       3372 :     : Traverse(traverse_blocks),
    5387                 :       3372 :       gogo_(gogo)
    5388                 :            :   { }
    5389                 :            : 
    5390                 :            :  protected:
    5391                 :            :   int
    5392                 :            :   block(Block* block);
    5393                 :            : 
    5394                 :            :  private:
    5395                 :            :   Gogo* gogo_;
    5396                 :            : };
    5397                 :            : 
    5398                 :            : int
    5399                 :    1419720 : Convert_named_types::block(Block* block)
    5400                 :            : {
    5401                 :    1419720 :   this->gogo_->convert_named_types_in_bindings(block->bindings());
    5402                 :    1419720 :   return TRAVERSE_CONTINUE;
    5403                 :            : }
    5404                 :            : 
    5405                 :            : // Convert all named types to the backend representation.  Since named
    5406                 :            : // types can refer to other types, this needs to be done in the right
    5407                 :            : // sequence, which is handled by Named_type::convert.  Here we arrange
    5408                 :            : // to call that for each named type.
    5409                 :            : 
    5410                 :            : void
    5411                 :       3372 : Gogo::convert_named_types()
    5412                 :            : {
    5413                 :       3372 :   this->convert_named_types_in_bindings(this->globals_);
    5414                 :      82081 :   for (Packages::iterator p = this->packages_.begin();
    5415                 :      82081 :        p != this->packages_.end();
    5416                 :      82081 :        ++p)
    5417                 :            :     {
    5418                 :      78709 :       Package* package = p->second;
    5419                 :      78709 :       this->convert_named_types_in_bindings(package->bindings());
    5420                 :            :     }
    5421                 :            : 
    5422                 :       3372 :   Convert_named_types cnt(this);
    5423                 :       3372 :   this->traverse(&cnt);
    5424                 :            : 
    5425                 :            :   // Make all the builtin named types used for type descriptors, and
    5426                 :            :   // then convert them.  They will only be written out if they are
    5427                 :            :   // needed.
    5428                 :       3372 :   Type::make_type_descriptor_type();
    5429                 :       3372 :   Type::make_type_descriptor_ptr_type();
    5430                 :       3372 :   Function_type::make_function_type_descriptor_type();
    5431                 :       3372 :   Pointer_type::make_pointer_type_descriptor_type();
    5432                 :       3372 :   Struct_type::make_struct_type_descriptor_type();
    5433                 :       3372 :   Array_type::make_array_type_descriptor_type();
    5434                 :       3372 :   Array_type::make_slice_type_descriptor_type();
    5435                 :       3372 :   Map_type::make_map_type_descriptor_type();
    5436                 :       3372 :   Channel_type::make_chan_type_descriptor_type();
    5437                 :       3372 :   Interface_type::make_interface_type_descriptor_type();
    5438                 :       3372 :   Expression::make_func_descriptor_type();
    5439                 :       3372 :   Type::convert_builtin_named_types(this);
    5440                 :            : 
    5441                 :       3372 :   Runtime::convert_types(this);
    5442                 :            : 
    5443                 :       3372 :   this->named_types_are_converted_ = true;
    5444                 :            : 
    5445                 :       3372 :   Type::finish_pointer_types(this);
    5446                 :       3372 : }
    5447                 :            : 
    5448                 :            : // Convert all names types in a set of bindings.
    5449                 :            : 
    5450                 :            : void
    5451                 :    1501800 : Gogo::convert_named_types_in_bindings(Bindings* bindings)
    5452                 :            : {
    5453                 :    3965210 :   for (Bindings::const_definitions_iterator p = bindings->begin_definitions();
    5454                 :    3965210 :        p != bindings->end_definitions();
    5455                 :    3965210 :        ++p)
    5456                 :            :     {
    5457                 :    2463410 :       if ((*p)->is_type())
    5458                 :     531221 :         (*p)->type_value()->convert(this);
    5459                 :            :     }
    5460                 :    1501800 : }
    5461                 :            : 
    5462                 :            : void
    5463                 :          0 : debug_go_gogo(Gogo* gogo)
    5464                 :            : {
    5465                 :          0 :   if (gogo != NULL)
    5466                 :          0 :     gogo->debug_dump();
    5467                 :          0 : }
    5468                 :            : 
    5469                 :            : void
    5470                 :          0 : Gogo::debug_dump()
    5471                 :            : {
    5472                 :          0 :   std::cerr << "Packages:\n";
    5473                 :          0 :   for (Packages::const_iterator p = this->packages_.begin();
    5474                 :          0 :        p != this->packages_.end();
    5475                 :          0 :        ++p)
    5476                 :            :     {
    5477                 :          0 :       const char *tag = "  ";
    5478                 :          0 :       if (p->second == this->package_)
    5479                 :          0 :         tag = "* ";
    5480                 :          0 :       std::cerr << tag << "'" << p->first << "' "
    5481                 :          0 :                 << p->second->pkgpath() << " " << ((void*)p->second) << "\n";
    5482                 :            :     }
    5483                 :          0 : }
    5484                 :            : 
    5485                 :            : // Class Function.
    5486                 :            : 
    5487                 :     250894 : Function::Function(Function_type* type, Named_object* enclosing, Block* block,
    5488                 :     250894 :                    Location location)
    5489                 :            :   : type_(type), enclosing_(enclosing), results_(NULL),
    5490                 :            :     closure_var_(NULL), block_(block), location_(location), labels_(),
    5491                 :            :     local_type_count_(0), descriptor_(NULL), fndecl_(NULL), defer_stack_(NULL),
    5492                 :            :     pragmas_(0), nested_functions_(0), is_sink_(false),
    5493                 :            :     results_are_named_(false), is_unnamed_type_stub_method_(false),
    5494                 :            :     calls_recover_(false), is_recover_thunk_(false), has_recover_thunk_(false),
    5495                 :            :     calls_defer_retaddr_(false), is_type_specific_function_(false),
    5496                 :            :     in_unique_section_(false), export_for_inlining_(false),
    5497                 :            :     is_inline_only_(false), is_referenced_by_inline_(false),
    5498                 :     250894 :     is_exported_by_linkname_(false)
    5499                 :            : {
    5500                 :     250894 : }
    5501                 :            : 
    5502                 :            : // Create the named result variables.
    5503                 :            : 
    5504                 :            : void
    5505                 :     248202 : Function::create_result_variables(Gogo* gogo)
    5506                 :            : {
    5507                 :     248202 :   const Typed_identifier_list* results = this->type_->results();
    5508                 :     248202 :   if (results == NULL || results->empty())
    5509                 :            :     return;
    5510                 :            : 
    5511                 :     180316 :   if (!results->front().name().empty())
    5512                 :      18917 :     this->results_are_named_ = true;
    5513                 :            : 
    5514                 :     180316 :   this->results_ = new Results();
    5515                 :     180316 :   this->results_->reserve(results->size());
    5516                 :            : 
    5517                 :     180316 :   Block* block = this->block_;
    5518                 :     180316 :   int index = 0;
    5519                 :     180316 :   for (Typed_identifier_list::const_iterator p = results->begin();
    5520                 :     383554 :        p != results->end();
    5521                 :     203238 :        ++p, ++index)
    5522                 :            :     {
    5523                 :     406476 :       std::string name = p->name();
    5524                 :     203238 :       if (name.empty() || Gogo::is_sink_name(name))
    5525                 :            :         {
    5526                 :     174928 :           static int result_counter;
    5527                 :     174928 :           char buf[100];
    5528                 :     174928 :           snprintf(buf, sizeof buf, "$ret%d", result_counter);
    5529                 :     174928 :           ++result_counter;
    5530                 :     174954 :           name = gogo->pack_hidden_name(buf, false);
    5531                 :            :         }
    5532                 :     203238 :       Result_variable* result = new Result_variable(p->type(), this, index,
    5533                 :     203238 :                                                     p->location());
    5534                 :     203238 :       Named_object* no = block->bindings()->add_result_variable(name, result);
    5535                 :     203238 :       if (no->is_result_variable())
    5536                 :     203234 :         this->results_->push_back(no);
    5537                 :            :       else
    5538                 :            :         {
    5539                 :          4 :           static int dummy_result_count;
    5540                 :          4 :           char buf[100];
    5541                 :          4 :           snprintf(buf, sizeof buf, "$dret%d", dummy_result_count);
    5542                 :          4 :           ++dummy_result_count;
    5543                 :          4 :           name = gogo->pack_hidden_name(buf, false);
    5544                 :          4 :           no = block->bindings()->add_result_variable(name, result);
    5545                 :          4 :           go_assert(no->is_result_variable());
    5546                 :          4 :           this->results_->push_back(no);
    5547                 :            :         }
    5548                 :            :     }
    5549                 :            : }
    5550                 :            : 
    5551                 :            : // Update the named result variables when cloning a function which
    5552                 :            : // calls recover.
    5553                 :            : 
    5554                 :            : void
    5555                 :       1318 : Function::update_result_variables()
    5556                 :            : {
    5557                 :       1318 :   if (this->results_ == NULL)
    5558                 :            :     return;
    5559                 :            : 
    5560                 :          8 :   for (Results::iterator p = this->results_->begin();
    5561                 :          8 :        p != this->results_->end();
    5562                 :          8 :        ++p)
    5563                 :          4 :     (*p)->result_var_value()->set_function(this);
    5564                 :            : }
    5565                 :            : 
    5566                 :            : // Whether this method should not be included in the type descriptor.
    5567                 :            : 
    5568                 :            : bool
    5569                 :     448449 : Function::nointerface() const
    5570                 :            : {
    5571                 :     448449 :   go_assert(this->is_method());
    5572                 :     448449 :   return (this->pragmas_ & GOPRAGMA_NOINTERFACE) != 0;
    5573                 :            : }
    5574                 :            : 
    5575                 :            : // Record that this method should not be included in the type
    5576                 :            : // descriptor.
    5577                 :            : 
    5578                 :            : void
    5579                 :          0 : Function::set_nointerface()
    5580                 :            : {
    5581                 :          0 :   this->pragmas_ |= GOPRAGMA_NOINTERFACE;
    5582                 :          0 : }
    5583                 :            : 
    5584                 :            : // Return the closure variable, creating it if necessary.
    5585                 :            : 
    5586                 :            : Named_object*
    5587                 :      42323 : Function::closure_var()
    5588                 :            : {
    5589                 :      42323 :   if (this->closure_var_ == NULL)
    5590                 :            :     {
    5591                 :      10256 :       go_assert(this->descriptor_ == NULL);
    5592                 :            :       // We don't know the type of the variable yet.  We add fields as
    5593                 :            :       // we find them.
    5594                 :      10256 :       Location loc = this->type_->location();
    5595                 :      10256 :       Struct_field_list* sfl = new Struct_field_list;
    5596                 :      10256 :       Struct_type* struct_type = Type::make_struct_type(sfl, loc);
    5597                 :      10256 :       struct_type->set_is_struct_incomparable();
    5598                 :      10256 :       Variable* var = new Variable(Type::make_pointer_type(struct_type),
    5599                 :      10256 :                                    NULL, false, false, false, loc);
    5600                 :      10256 :       var->set_is_used();
    5601                 :      10256 :       var->set_is_closure();
    5602                 :      10256 :       this->closure_var_ = Named_object::make_variable("$closure", NULL, var);
    5603                 :            :       // Note that the new variable is not in any binding contour.
    5604                 :            :     }
    5605                 :      42323 :   return this->closure_var_;
    5606                 :            : }
    5607                 :            : 
    5608                 :            : // Set the type of the closure variable.
    5609                 :            : 
    5610                 :            : void
    5611                 :     149505 : Function::set_closure_type()
    5612                 :            : {
    5613                 :     149505 :   if (this->closure_var_ == NULL)
    5614                 :            :     return;
    5615                 :      10256 :   Named_object* closure = this->closure_var_;
    5616                 :      20512 :   Struct_type* st = closure->var_value()->type()->deref()->struct_type();
    5617                 :            : 
    5618                 :            :   // The first field of a closure is always a pointer to the function
    5619                 :            :   // code.
    5620                 :      10256 :   Type* voidptr_type = Type::make_pointer_type(Type::make_void_type());
    5621                 :      10256 :   st->push_field(Struct_field(Typed_identifier(".f", voidptr_type,
    5622                 :            :                                                this->location_)));
    5623                 :            : 
    5624                 :      10256 :   unsigned int index = 1;
    5625                 :      10256 :   for (Closure_fields::const_iterator p = this->closure_fields_.begin();
    5626                 :      29907 :        p != this->closure_fields_.end();
    5627                 :      19651 :        ++p, ++index)
    5628                 :            :     {
    5629                 :      19651 :       Named_object* no = p->first;
    5630                 :      19651 :       char buf[20];
    5631                 :      19651 :       snprintf(buf, sizeof buf, "%u", index);
    5632                 :      39302 :       std::string n = no->name() + buf;
    5633                 :      19651 :       Type* var_type;
    5634                 :      19651 :       if (no->is_variable())
    5635                 :      19073 :         var_type = no->var_value()->type();
    5636                 :            :       else
    5637                 :        578 :         var_type = no->result_var_value()->type();
    5638                 :      19651 :       Type* field_type = Type::make_pointer_type(var_type);
    5639                 :      46559 :       st->push_field(Struct_field(Typed_identifier(n, field_type, p->second)));
    5640                 :            :     }
    5641                 :            : }
    5642                 :            : 
    5643                 :            : // Return whether this function is a method.
    5644                 :            : 
    5645                 :            : bool
    5646                 :    1201000 : Function::is_method() const
    5647                 :            : {
    5648                 :    1201000 :   return this->type_->is_method();
    5649                 :            : }
    5650                 :            : 
    5651                 :            : // Add a label definition.
    5652                 :            : 
    5653                 :            : Label*
    5654                 :       7843 : Function::add_label_definition(Gogo* gogo, const std::string& label_name,
    5655                 :            :                                Location location)
    5656                 :            : {
    5657                 :       7843 :   Label* lnull = NULL;
    5658                 :       7843 :   std::pair<Labels::iterator, bool> ins =
    5659                 :       7843 :     this->labels_.insert(std::make_pair(label_name, lnull));
    5660                 :       7843 :   Label* label;
    5661                 :       7843 :   if (label_name == "_")
    5662                 :            :     {
    5663                 :          0 :       label = Label::create_dummy_label();
    5664                 :          0 :       if (ins.second)
    5665                 :          0 :         ins.first->second = label;
    5666                 :            :     }
    5667                 :       7843 :   else if (ins.second)
    5668                 :            :     {
    5669                 :            :       // This is a new label.
    5670                 :       1053 :       label = new Label(label_name);
    5671                 :       1053 :       ins.first->second = label;
    5672                 :            :     }
    5673                 :            :   else
    5674                 :            :     {
    5675                 :            :       // The label was already in the hash table.
    5676                 :       6790 :       label = ins.first->second;
    5677                 :       6790 :       if (label->is_defined())
    5678                 :            :         {
    5679                 :          1 :           go_error_at(location, "label %qs already defined",
    5680                 :          1 :                       Gogo::message_name(label_name).c_str());
    5681                 :          1 :           go_inform(label->location(), "previous definition of %qs was here",
    5682                 :          1 :                     Gogo::message_name(label_name).c_str());
    5683                 :          1 :           return new Label(label_name);
    5684                 :            :         }
    5685                 :            :     }
    5686                 :            : 
    5687                 :       7842 :   label->define(location, gogo->bindings_snapshot(location));
    5688                 :            : 
    5689                 :            :   // Issue any errors appropriate for any previous goto's to this
    5690                 :            :   // label.
    5691                 :       7842 :   const std::vector<Bindings_snapshot*>& refs(label->refs());
    5692                 :       9381 :   for (std::vector<Bindings_snapshot*>::const_iterator p = refs.begin();
    5693                 :       9381 :        p != refs.end();
    5694                 :       9381 :        ++p)
    5695                 :       1539 :     (*p)->check_goto_to(gogo->current_block());
    5696                 :       7842 :   label->clear_refs();
    5697                 :            : 
    5698                 :       7842 :   return label;
    5699                 :            : }
    5700                 :            : 
    5701                 :            : // Add a reference to a label.
    5702                 :            : 
    5703                 :            : Label*
    5704                 :       8307 : Function::add_label_reference(Gogo* gogo, const std::string& label_name,
    5705                 :            :                               Location location, bool issue_goto_errors)
    5706                 :            : {
    5707                 :       8307 :   Label* lnull = NULL;
    5708                 :       8307 :   std::pair<Labels::iterator, bool> ins =
    5709                 :       8307 :     this->labels_.insert(std::make_pair(label_name, lnull));
    5710                 :       8307 :   Label* label;
    5711                 :       8307 :   if (!ins.second)
    5712                 :            :     {
    5713                 :            :       // The label was already in the hash table.
    5714                 :       1516 :       label = ins.first->second;
    5715                 :            :     }
    5716                 :            :   else
    5717                 :            :     {
    5718                 :       6791 :       go_assert(ins.first->second == NULL);
    5719                 :       6791 :       label = new Label(label_name);
    5720                 :       6791 :       ins.first->second = label;
    5721                 :            :     }
    5722                 :            : 
    5723                 :       8307 :   label->set_is_used();
    5724                 :            : 
    5725                 :       8307 :   if (issue_goto_errors)
    5726                 :            :     {
    5727                 :       2059 :       Bindings_snapshot* snapshot = label->snapshot();
    5728                 :       2059 :       if (snapshot != NULL)
    5729                 :        519 :         snapshot->check_goto_from(gogo->current_block(), location);
    5730                 :            :       else
    5731                 :       1540 :         label->add_snapshot_ref(gogo->bindings_snapshot(location));
    5732                 :            :     }
    5733                 :            : 
    5734                 :       8307 :   return label;
    5735                 :            : }
    5736                 :            : 
    5737                 :            : // Warn about labels that are defined but not used.
    5738                 :            : 
    5739                 :            : void
    5740                 :     160669 : Function::check_labels() const
    5741                 :            : {
    5742                 :     160669 :   for (Labels::const_iterator p = this->labels_.begin();
    5743                 :     162279 :        p != this->labels_.end();
    5744                 :     162279 :        p++)
    5745                 :            :     {
    5746                 :       1610 :       Label* label = p->second;
    5747                 :       1610 :       if (!label->is_used())
    5748                 :          6 :         go_error_at(label->location(), "label %qs defined and not used",
    5749                 :         12 :                     Gogo::message_name(label->name()).c_str());
    5750                 :            :     }
    5751                 :     160669 : }
    5752                 :            : 
    5753                 :            : // Swap one function with another.  This is used when building the
    5754                 :            : // thunk we use to call a function which calls recover.  It may not
    5755                 :            : // work for any other case.
    5756                 :            : 
    5757                 :            : void
    5758                 :        659 : Function::swap_for_recover(Function *x)
    5759                 :            : {
    5760                 :        659 :   go_assert(this->enclosing_ == x->enclosing_);
    5761                 :        659 :   std::swap(this->results_, x->results_);
    5762                 :        659 :   std::swap(this->closure_var_, x->closure_var_);
    5763                 :        659 :   std::swap(this->block_, x->block_);
    5764                 :        659 :   go_assert(this->location_ == x->location_);
    5765                 :        659 :   go_assert(this->fndecl_ == NULL && x->fndecl_ == NULL);
    5766                 :        659 :   go_assert(this->defer_stack_ == NULL && x->defer_stack_ == NULL);
    5767                 :        659 : }
    5768                 :            : 
    5769                 :            : // Traverse the tree.
    5770                 :            : 
    5771                 :            : int
    5772                 :    3986710 : Function::traverse(Traverse* traverse)
    5773                 :            : {
    5774                 :    3986710 :   unsigned int traverse_mask = traverse->traverse_mask();
    5775                 :            : 
    5776                 :    3986710 :   if ((traverse_mask
    5777                 :    3986710 :        & (Traverse::traverse_types | Traverse::traverse_expressions))
    5778                 :            :       != 0)
    5779                 :            :     {
    5780                 :    2456430 :       if (Type::traverse(this->type_, traverse) == TRAVERSE_EXIT)
    5781                 :            :         return TRAVERSE_EXIT;
    5782                 :            :     }
    5783                 :            : 
    5784                 :            :   // FIXME: We should check traverse_functions here if nested
    5785                 :            :   // functions are stored in block bindings.
    5786                 :    3986710 :   if (this->block_ != NULL
    5787                 :    3986710 :       && (traverse_mask
    5788                 :    3986710 :           & (Traverse::traverse_variables
    5789                 :            :              | Traverse::traverse_constants
    5790                 :            :              | Traverse::traverse_blocks
    5791                 :            :              | Traverse::traverse_statements
    5792                 :            :              | Traverse::traverse_expressions
    5793                 :            :              | Traverse::traverse_types)) != 0)
    5794                 :            :     {
    5795                 :    3502710 :       if (this->block_->traverse(traverse) == TRAVERSE_EXIT)
    5796                 :          0 :         return TRAVERSE_EXIT;
    5797                 :            :     }
    5798                 :            : 
    5799                 :            :   return TRAVERSE_CONTINUE;
    5800                 :            : }
    5801                 :            : 
    5802                 :            : // Work out types for unspecified variables and constants.
    5803                 :            : 
    5804                 :            : void
    5805                 :     150133 : Function::determine_types()
    5806                 :            : {
    5807                 :     150133 :   if (this->block_ != NULL)
    5808                 :     150133 :     this->block_->determine_types();
    5809                 :     150133 : }
    5810                 :            : 
    5811                 :            : // Return the function descriptor, the value you get when you refer to
    5812                 :            : // the function in Go code without calling it.
    5813                 :            : 
    5814                 :            : Expression*
    5815                 :     166431 : Function::descriptor(Gogo*, Named_object* no)
    5816                 :            : {
    5817                 :     166431 :   go_assert(!this->is_method());
    5818                 :     166431 :   go_assert(this->closure_var_ == NULL);
    5819                 :     166431 :   if (this->descriptor_ == NULL)
    5820                 :     129397 :     this->descriptor_ = Expression::make_func_descriptor(no);
    5821                 :     166431 :   return this->descriptor_;
    5822                 :            : }
    5823                 :            : 
    5824                 :            : // Get a pointer to the variable representing the defer stack for this
    5825                 :            : // function, making it if necessary.  The value of the variable is set
    5826                 :            : // by the runtime routines to true if the function is returning,
    5827                 :            : // rather than panicing through.  A pointer to this variable is used
    5828                 :            : // as a marker for the functions on the defer stack associated with
    5829                 :            : // this function.  A function-specific variable permits inlining a
    5830                 :            : // function which uses defer.
    5831                 :            : 
    5832                 :            : Expression*
    5833                 :      41330 : Function::defer_stack(Location location)
    5834                 :            : {
    5835                 :      41330 :   if (this->defer_stack_ == NULL)
    5836                 :            :     {
    5837                 :       7278 :       Type* t = Type::lookup_bool_type();
    5838                 :       7278 :       Expression* n = Expression::make_boolean(false, location);
    5839                 :       7278 :       this->defer_stack_ = Statement::make_temporary(t, n, location);
    5840                 :       7278 :       this->defer_stack_->set_is_address_taken();
    5841                 :            :     }
    5842                 :      41330 :   Expression* ref = Expression::make_temporary_reference(this->defer_stack_,
    5843                 :            :                                                          location);
    5844                 :      41330 :   return Expression::make_unary(OPERATOR_AND, ref, location);
    5845                 :            : }
    5846                 :            : 
    5847                 :            : // Export the function.
    5848                 :            : 
    5849                 :            : void
    5850                 :      68975 : Function::export_func(Export* exp, const Named_object* no) const
    5851                 :            : {
    5852                 :      68975 :   Block* block = NULL;
    5853                 :      68975 :   if (this->export_for_inlining())
    5854                 :      14764 :     block = this->block_;
    5855                 :     137950 :   Function::export_func_with_type(exp, no, this->type_, this->results_,
    5856                 :      68975 :                                   this->is_method() && this->nointerface(),
    5857                 :            :                                   this->asm_name(), block, this->location_);
    5858                 :      68975 : }
    5859                 :            : 
    5860                 :            : // Export a function with a type.
    5861                 :            : 
    5862                 :            : void
    5863                 :     284553 : Function::export_func_with_type(Export* exp, const Named_object* no,
    5864                 :            :                                 const Function_type* fntype,
    5865                 :            :                                 Function::Results* result_vars,
    5866                 :            :                                 bool nointerface, const std::string& asm_name,
    5867                 :            :                                 Block* block, Location loc)
    5868                 :            : {
    5869                 :     284553 :   exp->write_c_string("func ");
    5870                 :            : 
    5871                 :     284553 :   if (nointerface)
    5872                 :            :     {
    5873                 :          0 :       go_assert(fntype->is_method());
    5874                 :          0 :       exp->write_c_string("/*nointerface*/ ");
    5875                 :            :     }
    5876                 :            : 
    5877                 :     284553 :   if (!asm_name.empty())
    5878                 :            :     {
    5879                 :       1769 :       exp->write_c_string("/*asm ");
    5880                 :       1769 :       exp->write_string(asm_name);
    5881                 :       1769 :       exp->write_c_string(" */ ");
    5882                 :            :     }
    5883                 :            : 
    5884                 :     284553 :   if (fntype->is_method())
    5885                 :            :     {
    5886                 :     242137 :       exp->write_c_string("(");
    5887                 :     242137 :       const Typed_identifier* receiver = fntype->receiver();
    5888                 :     242137 :       exp->write_name(receiver->name());
    5889                 :     242137 :       exp->write_escape(receiver->note());
    5890                 :     242137 :       exp->write_c_string(" ");
    5891                 :     242137 :       exp->write_type(receiver->type());
    5892                 :     242137 :       exp->write_c_string(") ");
    5893                 :            :     }
    5894                 :            : 
    5895                 :     284553 :   if (no->package() != NULL && !fntype->is_method())
    5896                 :            :     {
    5897                 :      10565 :       char buf[50];
    5898                 :      10565 :       snprintf(buf, sizeof buf, "<p%d>", exp->package_index(no->package()));
    5899                 :      10565 :       exp->write_c_string(buf);
    5900                 :            :     }
    5901                 :            : 
    5902                 :     284553 :   const std::string& name(no->name());
    5903                 :     284553 :   if (!Gogo::is_hidden_name(name))
    5904                 :     199382 :     exp->write_string(name);
    5905                 :            :   else
    5906                 :            :     {
    5907                 :      85171 :       exp->write_c_string(".");
    5908                 :      92437 :       exp->write_string(Gogo::unpack_hidden_name(name));
    5909                 :            :     }
    5910                 :            : 
    5911                 :     284553 :   exp->write_c_string(" (");
    5912                 :     284553 :   const Typed_identifier_list* parameters = fntype->parameters();
    5913                 :     284553 :   if (parameters != NULL)
    5914                 :            :     {
    5915                 :     151651 :       size_t i = 0;
    5916                 :     151651 :       bool is_varargs = fntype->is_varargs();
    5917                 :     151651 :       bool first = true;
    5918                 :     385043 :       for (Typed_identifier_list::const_iterator p = parameters->begin();
    5919                 :     385043 :            p != parameters->end();
    5920                 :     233392 :            ++p, ++i)
    5921                 :            :         {
    5922                 :     233392 :           if (first)
    5923                 :            :             first = false;
    5924                 :            :           else
    5925                 :      81741 :             exp->write_c_string(", ");
    5926                 :     233392 :           exp->write_name(p->name());
    5927                 :     233392 :           exp->write_escape(p->note());
    5928                 :     233392 :           exp->write_c_string(" ");
    5929                 :     233392 :           if (!is_varargs || p + 1 != parameters->end())
    5930                 :     227328 :             exp->write_type(p->type());
    5931                 :            :           else
    5932                 :            :             {
    5933                 :       6064 :               exp->write_c_string("...");
    5934                 :      12128 :               exp->write_type(p->type()->array_type()->element_type());
    5935                 :            :             }
    5936                 :            :         }
    5937                 :            :     }
    5938                 :     284553 :   exp->write_c_string(")");
    5939                 :            : 
    5940                 :     284553 :   const Typed_identifier_list* result_decls = fntype->results();
    5941                 :     284553 :   if (result_decls != NULL)
    5942                 :            :     {
    5943                 :     210961 :       if (result_decls->size() == 1
    5944                 :     176302 :           && result_decls->begin()->name().empty()
    5945                 :     365201 :           && block == NULL)
    5946                 :            :         {
    5947                 :     147071 :           exp->write_c_string(" ");
    5948                 :     147071 :           exp->write_type(result_decls->begin()->type());
    5949                 :            :         }
    5950                 :            :       else
    5951                 :            :         {
    5952                 :      63890 :           exp->write_c_string(" (");
    5953                 :      63890 :           bool first = true;
    5954                 :      63890 :           Results::const_iterator pr;
    5955                 :      63890 :           if (result_vars != NULL)
    5956                 :      20445 :             pr = result_vars->begin();
    5957                 :      63890 :           for (Typed_identifier_list::const_iterator pd = result_decls->begin();
    5958                 :     171766 :                pd != result_decls->end();
    5959                 :     171766 :                ++pd)
    5960                 :            :             {
    5961                 :     107876 :               if (first)
    5962                 :            :                 first = false;
    5963                 :            :               else
    5964                 :      43986 :                 exp->write_c_string(", ");
    5965                 :            :               // We only use pr->name, which may be artificial, if
    5966                 :            :               // need it for inlining.
    5967                 :     107876 :               if (block == NULL || result_vars == NULL)
    5968                 :      95873 :                 exp->write_name(pd->name());
    5969                 :            :               else
    5970                 :      12003 :                 exp->write_name((*pr)->name());
    5971                 :     107876 :               exp->write_escape(pd->note());
    5972                 :     107876 :               exp->write_c_string(" ");
    5973                 :     107876 :               exp->write_type(pd->type());
    5974                 :     107876 :               if (result_vars != NULL)
    5975                 :     107876 :                 ++pr;
    5976                 :            :             }
    5977                 :      63890 :           if (result_vars != NULL)
    5978                 :      20445 :             go_assert(pr == result_vars->end());
    5979                 :      63890 :           exp->write_c_string(")");
    5980                 :            :         }
    5981                 :            :     }
    5982                 :            : 
    5983                 :     284553 :   if (block == NULL)
    5984                 :     269789 :     exp->write_c_string("\n");
    5985                 :            :   else
    5986                 :            :     {
    5987                 :      14764 :       int indent = 1;
    5988                 :      14764 :       if (fntype->is_method())
    5989                 :       6199 :         indent++;
    5990                 :            : 
    5991                 :      29528 :       Export_function_body efb(exp, indent);
    5992                 :            : 
    5993                 :      14764 :       efb.indent();
    5994                 :      14764 :       efb.write_c_string("// ");
    5995                 :      14764 :       efb.write_string(Linemap::location_to_file(block->start_location()));
    5996                 :      14764 :       efb.write_char(':');
    5997                 :      14764 :       char buf[100];
    5998                 :      14764 :       snprintf(buf, sizeof buf, "%d", Linemap::location_to_line(loc));
    5999                 :      14764 :       efb.write_c_string(buf);
    6000                 :      14764 :       efb.write_char('\n');
    6001                 :      14764 :       block->export_block(&efb);
    6002                 :            : 
    6003                 :      14764 :       const std::string& body(efb.body());
    6004                 :            : 
    6005                 :      14764 :       snprintf(buf, sizeof buf, " <inl:%lu>\n",
    6006                 :      14764 :                static_cast<unsigned long>(body.length()));
    6007                 :      14764 :       exp->write_c_string(buf);
    6008                 :            : 
    6009                 :      14764 :       exp->write_string(body);
    6010                 :            :     }
    6011                 :     284553 : }
    6012                 :            : 
    6013                 :            : // Import a function.
    6014                 :            : 
    6015                 :            : bool
    6016                 :    2181800 : Function::import_func(Import* imp, std::string* pname,
    6017                 :            :                       Package** ppkg, bool* pis_exported,
    6018                 :            :                       Typed_identifier** preceiver,
    6019                 :            :                       Typed_identifier_list** pparameters,
    6020                 :            :                       Typed_identifier_list** presults,
    6021                 :            :                       bool* is_varargs,
    6022                 :            :                       bool* nointerface,
    6023                 :            :                       std::string* asm_name,
    6024                 :            :                       std::string* body)
    6025                 :            : {
    6026                 :    2181800 :   imp->require_c_string("func ");
    6027                 :            : 
    6028                 :    2181800 :   *nointerface = false;
    6029                 :    2274510 :   while (imp->match_c_string("/*"))
    6030                 :            :     {
    6031                 :      92707 :       imp->advance(2);
    6032                 :      92707 :       if (imp->match_c_string("nointerface"))
    6033                 :            :         {
    6034                 :          0 :           imp->require_c_string("nointerface*/ ");
    6035                 :          0 :           *nointerface = true;
    6036                 :            :         }
    6037                 :      92707 :       else if (imp->match_c_string("asm"))
    6038                 :            :         {
    6039                 :      92707 :           imp->require_c_string("asm ");
    6040                 :      92707 :           *asm_name = imp->read_identifier();
    6041                 :      92707 :           imp->require_c_string(" */ ");
    6042                 :            :         }
    6043                 :            :       else
    6044                 :            :         {
    6045                 :          0 :           go_error_at(imp->location(),
    6046                 :            :                       "import error at %d: unrecognized function comment",
    6047                 :            :                       imp->pos());
    6048                 :          0 :           return false;
    6049                 :            :         }
    6050                 :            :     }
    6051                 :            : 
    6052                 :    2181800 :   if (*nointerface)
    6053                 :            :     {
    6054                 :            :       // Only a method can be nointerface.
    6055                 :          0 :       go_assert(imp->peek_char() == '(');
    6056                 :            :     }
    6057                 :            : 
    6058                 :    2181800 :   *preceiver = NULL;
    6059                 :    2181800 :   if (imp->peek_char() == '(')
    6060                 :            :     {
    6061                 :    1223360 :       imp->require_c_string("(");
    6062                 :    2446720 :       std::string name = imp->read_name();
    6063                 :    2446720 :       std::string escape_note = imp->read_escape();
    6064                 :    1223360 :       imp->require_c_string(" ");
    6065                 :    1223360 :       Type* rtype = imp->read_type();
    6066                 :    1223360 :       *preceiver = new Typed_identifier(name, rtype, imp->location());
    6067                 :    1223360 :       (*preceiver)->set_note(escape_note);
    6068                 :    1223360 :       imp->require_c_string(") ");
    6069                 :            :     }
    6070                 :            : 
    6071                 :    2181800 :   if (!Import::read_qualified_identifier(imp, pname, ppkg, pis_exported))
    6072                 :            :     {
    6073                 :          0 :       go_error_at(imp->location(),
    6074                 :            :                   "import error at %d: bad function name in export data",
    6075                 :            :                   imp->pos());
    6076                 :          0 :       return false;
    6077                 :            :     }
    6078                 :            : 
    6079                 :    2181800 :   Typed_identifier_list* parameters;
    6080                 :    2181800 :   *is_varargs = false;
    6081                 :    2181800 :   imp->require_c_string(" (");
    6082                 :    2181800 :   if (imp->peek_char() == ')')
    6083                 :            :     parameters = NULL;
    6084                 :            :   else
    6085                 :            :     {
    6086                 :    1359850 :       parameters = new Typed_identifier_list();
    6087                 :    2304060 :       while (true)
    6088                 :            :         {
    6089                 :    2304060 :           std::string name = imp->read_name();
    6090                 :    3248280 :           std::string escape_note = imp->read_escape();
    6091                 :    2304060 :           imp->require_c_string(" ");
    6092                 :            : 
    6093                 :    2304060 :           if (imp->match_c_string("..."))
    6094                 :            :             {
    6095                 :      41761 :               imp->advance(3);
    6096                 :      41761 :               *is_varargs = true;
    6097                 :            :             }
    6098                 :            : 
    6099                 :    2304060 :           Type* ptype = imp->read_type();
    6100                 :    2304060 :           if (*is_varargs)
    6101                 :      41761 :             ptype = Type::make_array_type(ptype, NULL);
    6102                 :    3248280 :           Typed_identifier t = Typed_identifier(name, ptype, imp->location());
    6103                 :    2304060 :           t.set_note(escape_note);
    6104                 :    2304060 :           parameters->push_back(t);
    6105                 :    2304060 :           if (imp->peek_char() != ',')
    6106                 :            :             break;
    6107                 :     944216 :           go_assert(!*is_varargs);
    6108                 :     944216 :           imp->require_c_string(", ");
    6109                 :            :         }
    6110                 :            :     }
    6111                 :    2181800 :   imp->require_c_string(")");
    6112                 :    2181800 :   *pparameters = parameters;
    6113                 :            : 
    6114                 :    2181800 :   Typed_identifier_list* results;
    6115                 :    2181800 :   if (imp->peek_char() != ' ' || imp->match_c_string(" <inl"))
    6116                 :            :     results = NULL;
    6117                 :            :   else
    6118                 :            :     {
    6119                 :    1627770 :       results = new Typed_identifier_list();
    6120                 :    1627770 :       imp->require_c_string(" ");
    6121                 :    1627770 :       if (imp->peek_char() != '(')
    6122                 :            :         {
    6123                 :    1010820 :           Type* rtype = imp->read_type();
    6124                 :    1010820 :           results->push_back(Typed_identifier("", rtype, imp->location()));
    6125                 :            :         }
    6126                 :            :       else
    6127                 :            :         {
    6128                 :     616955 :           imp->require_c_string("(");
    6129                 :     956836 :           while (true)
    6130                 :            :             {
    6131                 :     956836 :               std::string name = imp->read_name();
    6132                 :    1296720 :               std::string note = imp->read_escape();
    6133                 :     956836 :               imp->require_c_string(" ");
    6134                 :     956836 :               Type* rtype = imp->read_type();
    6135                 :     956836 :               Typed_identifier t = Typed_identifier(name, rtype,
    6136                 :    1296720 :                                                     imp->location());
    6137                 :     956836 :               t.set_note(note);
    6138                 :     956836 :               results->push_back(t);
    6139                 :     956836 :               if (imp->peek_char() != ',')
    6140                 :            :                 break;
    6141                 :     339881 :               imp->require_c_string(", ");
    6142                 :            :             }
    6143                 :     616955 :           imp->require_c_string(")");
    6144                 :            :         }
    6145                 :            :     }
    6146                 :    2181800 :   *presults = results;
    6147                 :            : 
    6148                 :    2181800 :   if (!imp->match_c_string(" <inl:"))
    6149                 :            :     {
    6150                 :    1813080 :       imp->require_semicolon_if_old_version();
    6151                 :    1813080 :       imp->require_c_string("\n");
    6152                 :    1813080 :       body->clear();
    6153                 :            :     }
    6154                 :            :   else
    6155                 :            :     {
    6156                 :     368726 :       imp->require_c_string(" <inl:");
    6157                 :     737452 :       std::string lenstr;
    6158                 :    1419590 :       int c;
    6159                 :    2470450 :       while (true)
    6160                 :            :         {
    6161                 :    1419590 :           c = imp->peek_char();
    6162                 :    1419590 :           if (c < '0' || c > '9')
    6163                 :            :             break;
    6164                 :    1050860 :           lenstr += c;
    6165                 :    1050860 :           imp->get_char();
    6166                 :            :         }
    6167                 :     368726 :       imp->require_c_string(">\n");
    6168                 :            : 
    6169                 :     368726 :       errno = 0;
    6170                 :     368726 :       char* end;
    6171                 :     368726 :       long llen = strtol(lenstr.c_str(), &end, 10);
    6172                 :     368726 :       if (*end != '\0'
    6173                 :     368726 :           || llen < 0
    6174                 :     368726 :           || (llen == LONG_MAX && errno == ERANGE))
    6175                 :            :         {
    6176                 :          0 :           go_error_at(imp->location(), "invalid inline function length %s",
    6177                 :            :                       lenstr.c_str());
    6178                 :          0 :           return false;
    6179                 :            :         }
    6180                 :            : 
    6181                 :     368726 :       *body = imp->read(static_cast<size_t>(llen));
    6182                 :            :     }
    6183                 :            : 
    6184                 :            :   return true;
    6185                 :            : }
    6186                 :            : 
    6187                 :            : // Get the backend representation.
    6188                 :            : 
    6189                 :            : Bfunction*
    6190                 :    3208500 : Function::get_or_make_decl(Gogo* gogo, Named_object* no)
    6191                 :            : {
    6192                 :    3208500 :   if (this->fndecl_ == NULL)
    6193                 :            :     {
    6194                 :     250649 :       unsigned int flags = 0;
    6195                 :     250649 :       bool is_init_fn = false;
    6196                 :     250649 :       if (no->package() != NULL)
    6197                 :            :         {
    6198                 :            :           // Functions defined in other packages must be visible.
    6199                 :            :           flags |= Backend::function_is_visible;
    6200                 :            :         }
    6201                 :     240113 :       else if (this->enclosing_ != NULL || Gogo::is_thunk(no))
    6202                 :            :         ;
    6203                 :     206221 :       else if (Gogo::unpack_hidden_name(no->name()) == "init"
    6204                 :     206221 :                && !this->type_->is_method())
    6205                 :            :         ;
    6206                 :     206221 :       else if (no->name() == gogo->get_init_fn_name())
    6207                 :            :         {
    6208                 :            :           flags |= Backend::function_is_visible;
    6209                 :            :           is_init_fn = true;
    6210                 :            :         }
    6211                 :     203529 :       else if (Gogo::unpack_hidden_name(no->name()) == "main"
    6212                 :     203529 :                && gogo->is_main_package())
    6213                 :            :         flags |= Backend::function_is_visible;
    6214                 :            :       // Methods have to be public even if they are hidden because
    6215                 :            :       // they can be pulled into type descriptors when using
    6216                 :            :       // anonymous fields.
    6217                 :     202209 :       else if (!Gogo::is_hidden_name(no->name())
    6218                 :     202209 :                || this->type_->is_method())
    6219                 :            :         {
    6220                 :     109264 :           if (!this->is_unnamed_type_stub_method_)
    6221                 :     101488 :             flags |= Backend::function_is_visible;
    6222                 :            :         }
    6223                 :            : 
    6224                 :     250649 :       Type* rtype = NULL;
    6225                 :     250649 :       if (this->type_->is_method())
    6226                 :      65575 :         rtype = this->type_->receiver()->type();
    6227                 :            : 
    6228                 :     501298 :       std::string asm_name;
    6229                 :     250649 :       if (!this->asm_name_.empty())
    6230                 :            :         {
    6231                 :        847 :           asm_name = this->asm_name_;
    6232                 :            : 
    6233                 :            :           // If an assembler name is explicitly specified, there must
    6234                 :            :           // be some reason to refer to the symbol from a different
    6235                 :            :           // object file.
    6236                 :        847 :           flags |= Backend::function_is_visible;
    6237                 :            :         }
    6238                 :     249802 :       else if (is_init_fn)
    6239                 :            :         {
    6240                 :            :           // These names appear in the export data and are used
    6241                 :            :           // directly in the assembler code.  If we change this here
    6242                 :            :           // we need to change Gogo::init_imports.
    6243                 :       2692 :           asm_name = no->name();
    6244                 :            :         }
    6245                 :            :       else
    6246                 :     247110 :         asm_name = gogo->function_asm_name(no->name(), no->package(), rtype);
    6247                 :            : 
    6248                 :            :       // If an inline body refers to this function, then it
    6249                 :            :       // needs to be visible in the symbol table.
    6250                 :     250649 :       if (this->is_referenced_by_inline_)
    6251                 :       7367 :         flags |= Backend::function_is_visible;
    6252                 :            : 
    6253                 :            :       // A go:linkname directive can be used to force a function to be
    6254                 :            :       // visible.
    6255                 :     250649 :       if (this->is_exported_by_linkname_)
    6256                 :       1644 :         flags |= Backend::function_is_visible;
    6257                 :            : 
    6258                 :            :       // If a function calls the predeclared recover function, we
    6259                 :            :       // can't inline it, because recover behaves differently in a
    6260                 :            :       // function passed directly to defer.  If this is a recover
    6261                 :            :       // thunk that we built to test whether a function can be
    6262                 :            :       // recovered, we can't inline it, because that will mess up
    6263                 :            :       // our return address comparison.
    6264                 :     250649 :       bool is_inlinable = !(this->calls_recover_ || this->is_recover_thunk_);
    6265                 :            : 
    6266                 :            :       // If a function calls __go_set_defer_retaddr, then mark it as
    6267                 :            :       // uninlinable.  This prevents the GCC backend from splitting
    6268                 :            :       // the function; splitting the function is a bad idea because we
    6269                 :            :       // want the return address label to be in the same function as
    6270                 :            :       // the call.
    6271                 :     250649 :       if (this->calls_defer_retaddr_)
    6272                 :       6234 :         is_inlinable = false;
    6273                 :            : 
    6274                 :            :       // Check the //go:noinline compiler directive.
    6275                 :     250649 :       if ((this->pragmas_ & GOPRAGMA_NOINLINE) != 0)
    6276                 :            :         is_inlinable = false;
    6277                 :            : 
    6278                 :     250502 :       if (is_inlinable)
    6279                 :     242949 :         flags |= Backend::function_is_inlinable;
    6280                 :            : 
    6281                 :            :       // If this is a thunk created to call a function which calls
    6282                 :            :       // the predeclared recover function, we need to disable
    6283                 :            :       // stack splitting for the thunk.
    6284                 :     250649 :       bool disable_split_stack = this->is_recover_thunk_;
    6285                 :            : 
    6286                 :            :       // Check the //go:nosplit compiler directive.
    6287                 :     250649 :       if ((this->pragmas_ & GOPRAGMA_NOSPLIT) != 0)
    6288                 :            :         disable_split_stack = true;
    6289                 :            : 
    6290                 :     249321 :       if (disable_split_stack)
    6291                 :       1987 :         flags |= Backend::function_no_split_stack;
    6292                 :            : 
    6293                 :            :       // This should go into a unique section if that has been
    6294                 :            :       // requested elsewhere, or if this is a nointerface function.
    6295                 :            :       // We want to put a nointerface function into a unique section
    6296                 :            :       // because there is a good chance that the linker garbage
    6297                 :            :       // collection can discard it.
    6298                 :     250649 :       if (this->in_unique_section_
    6299                 :     250649 :           || (this->is_method() && this->nointerface()))
    6300                 :          0 :         flags |= Backend::function_in_unique_section;
    6301                 :            : 
    6302                 :     250649 :       if (this->is_inline_only_)
    6303                 :      10536 :         flags |= Backend::function_only_inline;
    6304                 :            : 
    6305                 :     250649 :       Btype* functype = this->type_->get_backend_fntype(gogo);
    6306                 :     250649 :       this->fndecl_ =
    6307                 :     501298 :           gogo->backend()->function(functype, no->get_id(gogo), asm_name,
    6308                 :     250649 :                                     flags, this->location());
    6309                 :            :     }
    6310                 :    3208500 :   return this->fndecl_;
    6311                 :            : }
    6312                 :            : 
    6313                 :            : // Get the backend representation.
    6314                 :            : 
    6315                 :            : Bfunction*
    6316                 :    1253760 : Function_declaration::get_or_make_decl(Gogo* gogo, Named_object* no)
    6317                 :            : {
    6318                 :    1253760 :   if (this->fndecl_ == NULL)
    6319                 :            :     {
    6320                 :     211330 :       unsigned int flags =
    6321                 :            :         (Backend::function_is_visible
    6322                 :            :          | Backend::function_is_declaration
    6323                 :            :          | Backend::function_is_inlinable);
    6324                 :            : 
    6325                 :            :       // Let Go code use an asm declaration to pick up a builtin
    6326                 :            :       // function.
    6327                 :     211330 :       if (!this->asm_name_.empty())
    6328                 :            :         {
    6329                 :     106558 :           Bfunction* builtin_decl =
    6330                 :     106558 :             gogo->backend()->lookup_builtin(this->asm_name_);
    6331                 :     106558 :           if (builtin_decl != NULL)
    6332                 :            :             {
    6333                 :       4774 :               this->fndecl_ = builtin_decl;
    6334                 :       4774 :               return this->fndecl_;
    6335                 :            :             }
    6336                 :            : 
    6337                 :     101784 :           if (this->asm_name_ == "runtime.gopanic"
    6338                 :     100423 :               || this->asm_name_.compare(0, 13, "runtime.panic") == 0
    6339                 :      96264 :               || this->asm_name_.compare(0, 15, "runtime.goPanic") == 0
    6340                 :     190669 :               || this->asm_name_ == "runtime.block")
    6341                 :            :             flags |= Backend::function_does_not_return;
    6342                 :            :         }
    6343                 :            : 
    6344                 :     413112 :       std::string asm_name;
    6345                 :     206556 :       if (this->asm_name_.empty())
    6346                 :            :         {
    6347                 :     104772 :           Type* rtype = NULL;
    6348                 :     104772 :           if (this->fntype_->is_method())
    6349                 :      77242 :             rtype = this->fntype_->receiver()->type();
    6350                 :     104772 :           asm_name = gogo->function_asm_name(no->name(), no->package(), rtype);
    6351                 :            :         }
    6352                 :     198326 :       else if (go_id_needs_encoding(no->get_id(gogo)))
    6353                 :          0 :         asm_name = go_encode_id(no->get_id(gogo));
    6354                 :            : 
    6355                 :     206556 :       Btype* functype = this->fntype_->get_backend_fntype(gogo);
    6356                 :     206556 :       this->fndecl_ =
    6357                 :     413112 :           gogo->backend()->function(functype, no->get_id(gogo), asm_name,
    6358                 :     206556 :                                     flags, this->location());
    6359                 :            :     }
    6360                 :            : 
    6361                 :    1248990 :   return this->fndecl_;
    6362                 :            : }
    6363                 :            : 
    6364                 :            : // Build the descriptor for a function declaration.  This won't
    6365                 :            : // necessarily happen if the package has just a declaration for the
    6366                 :            : // function and no other reference to it, but we may still need the
    6367                 :            : // descriptor for references from other packages.
    6368                 :            : void
    6369                 :       3556 : Function_declaration::build_backend_descriptor(Gogo* gogo)
    6370                 :            : {
    6371                 :       3556 :   if (this->descriptor_ != NULL)
    6372                 :            :     {
    6373                 :        535 :       Translate_context context(gogo, NULL, NULL, NULL);
    6374                 :        535 :       this->descriptor_->get_backend(&context);
    6375                 :            :     }
    6376                 :       3556 : }
    6377                 :            : 
    6378                 :            : // Check that the types used in this declaration's signature are defined.
    6379                 :            : // Reports errors for any undefined type.
    6380                 :            : 
    6381                 :            : void
    6382                 :       3556 : Function_declaration::check_types() const
    6383                 :            : {
    6384                 :            :   // Calling Type::base will give errors for any undefined types.
    6385                 :       3556 :   Function_type* fntype = this->type();
    6386                 :       3556 :   if (fntype->receiver() != NULL)
    6387                 :          0 :     fntype->receiver()->type()->base();
    6388                 :       3556 :   if (fntype->parameters() != NULL)
    6389                 :            :     {
    6390                 :       2737 :       const Typed_identifier_list* params = fntype->parameters();
    6391                 :       8648 :       for (Typed_identifier_list::const_iterator p = params->begin();
    6392                 :       8648 :            p != params->end();
    6393                 :       8648 :            ++p)
    6394                 :       5911 :         p->type()->base();
    6395                 :            :     }
    6396                 :       3556 : }
    6397                 :            : 
    6398                 :            : // Return the function's decl after it has been built.
    6399                 :            : 
    6400                 :            : Bfunction*
    6401                 :    8086400 : Function::get_decl() const
    6402                 :            : {
    6403                 :    8086400 :   go_assert(this->fndecl_ != NULL);
    6404                 :    8086400 :   return this->fndecl_;
    6405                 :            : }
    6406                 :            : 
    6407                 :            : // Build the backend representation for the function code.
    6408                 :            : 
    6409                 :            : void
    6410                 :     247957 : Function::build(Gogo* gogo, Named_object* named_function)
    6411                 :            : {
    6412                 :     247957 :   Translate_context context(gogo, named_function, NULL, NULL);
    6413                 :            : 
    6414                 :            :   // A list of parameter variables for this function.
    6415                 :     495902 :   std::vector<Bvariable*> param_vars;
    6416                 :            : 
    6417                 :            :   // Variables that need to be declared for this function and their
    6418                 :            :   // initial values.
    6419                 :     247945 :   std::vector<Bvariable*> vars;
    6420                 :     247945 :   std::vector<Expression*> var_inits;
    6421                 :     247945 :   std::vector<Statement*> var_decls_stmts;
    6422                 :     999236 :   for (Bindings::const_definitions_iterator p =
    6423                 :     247957 :          this->block_->bindings()->begin_definitions();
    6424                 :     999236 :        p != this->block_->bindings()->end_definitions();
    6425                 :     999236 :        ++p)
    6426                 :            :     {
    6427                 :     751279 :       Location loc = (*p)->location();
    6428                 :     751279 :       if ((*p)->is_variable() && (*p)->var_value()->is_parameter())
    6429                 :            :         {
    6430                 :     395770 :           Bvariable* bvar = (*p)->get_backend_variable(gogo, named_function);
    6431                 :     395770 :           Bvariable* parm_bvar = bvar;
    6432                 :            : 
    6433                 :            :           // We always pass the receiver to a method as a pointer.  If
    6434                 :            :           // the receiver is declared as a non-pointer type, then we
    6435                 :            :           // copy the value into a local variable.  For direct interface
    6436                 :            :           // type we pack the pointer into the type.
    6437                 :     395770 :           if ((*p)->var_value()->is_receiver()
    6438                 :     395770 :               && (*p)->var_value()->type()->points_to() == NULL)
    6439                 :            :             {
    6440                 :      25284 :               std::string name = (*p)->name() + ".pointer";
    6441                 :      12642 :               Type* var_type = (*p)->var_value()->type();
    6442                 :      12642 :               Variable* parm_var =
    6443                 :      12642 :                   new Variable(Type::make_pointer_type(var_type), NULL, false,
    6444                 :      12642 :                                true, false, loc);
    6445                 :      12642 :               Named_object* parm_no =
    6446                 :      12642 :                   Named_object::make_variable(name, NULL, parm_var);
    6447                 :      12642 :               parm_bvar = parm_no->get_backend_variable(gogo, named_function);
    6448                 :            : 
    6449                 :      12642 :               vars.push_back(bvar);
    6450                 :            : 
    6451                 :      12642 :               Expression* parm_ref =
    6452                 :      12642 :                   Expression::make_var_reference(parm_no, loc);
    6453                 :      12642 :               Type* recv_type = (*p)->var_value()->type();
    6454                 :      12642 :               if (recv_type->is_direct_iface_type())
    6455                 :       1638 :                 parm_ref = Expression::pack_direct_iface(recv_type, parm_ref, loc);
    6456                 :            :               else
    6457                 :      11004 :                 parm_ref =
    6458                 :      11004 :                     Expression::make_dereference(parm_ref,
    6459                 :            :                                                  Expression::NIL_CHECK_NEEDED,
    6460                 :            :                                                  loc);
    6461                 :      12642 :               if ((*p)->var_value()->is_in_heap())
    6462                 :       1152 :                 parm_ref = Expression::make_heap_expression(parm_ref, loc);
    6463                 :      12642 :               var_inits.push_back(parm_ref);
    6464                 :            :             }
    6465                 :     383128 :           else if ((*p)->var_value()->is_in_heap())
    6466                 :            :             {
    6467                 :            :               // If we take the address of a parameter, then we need
    6468                 :            :               // to copy it into the heap.
    6469                 :       4552 :               std::string parm_name = (*p)->name() + ".param";
    6470                 :       2276 :               Variable* parm_var = new Variable((*p)->var_value()->type(), NULL,
    6471                 :       2276 :                                                 false, true, false, loc);
    6472                 :       2276 :               Named_object* parm_no =
    6473                 :       2276 :                   Named_object::make_variable(parm_name, NULL, parm_var);
    6474                 :       2276 :               parm_bvar = parm_no->get_backend_variable(gogo, named_function);
    6475                 :            : 
    6476                 :       2276 :               vars.push_back(bvar);
    6477                 :       2276 :               Expression* var_ref =
    6478                 :       2276 :                   Expression::make_var_reference(parm_no, loc);
    6479                 :       2276 :               var_ref = Expression::make_heap_expression(var_ref, loc);
    6480                 :       2276 :               var_inits.push_back(var_ref);
    6481                 :            :             }
    6482                 :     395770 :           param_vars.push_back(parm_bvar);
    6483                 :            :         }
    6484                 :     355509 :       else if ((*p)->is_result_variable())
    6485                 :            :         {
    6486                 :     203081 :           Bvariable* bvar = (*p)->get_backend_variable(gogo, named_function);
    6487                 :            : 
    6488                 :     203081 :           Type* type = (*p)->result_var_value()->type();
    6489                 :     203081 :           Expression* init;
    6490                 :     203081 :           if (!(*p)->result_var_value()->is_in_heap())
    6491                 :            :             {
    6492                 :     203029 :               Btype* btype = type->get_backend(gogo);
    6493                 :     203029 :               Bexpression* binit = gogo->backend()->zero_expression(btype);
    6494                 :     203029 :               init = Expression::make_backend(binit, type, loc);
    6495                 :            :             }
    6496                 :            :           else
    6497                 :         52 :             init = Expression::make_allocation(type, loc);
    6498                 :            : 
    6499                 :     203081 :           vars.push_back(bvar);
    6500                 :     203081 :           var_inits.push_back(init);
    6501                 :            :         }
    6502                 :     152428 :       else if (this->defer_stack_ != NULL
    6503                 :      20415 :                && (*p)->is_variable()
    6504                 :      19793 :                && (*p)->var_value()->is_non_escaping_address_taken()
    6505                 :     773623 :                && !(*p)->var_value()->is_in_heap())
    6506                 :            :         {
    6507                 :            :           // Local variable captured by deferred closure needs to be live
    6508                 :            :           // until the end of the function. We create a top-level
    6509                 :            :           // declaration for it.
    6510                 :            :           // TODO: we don't need to do this if the variable is not captured
    6511                 :            :           // by the defer closure. There is no easy way to check it here,
    6512                 :            :           // so we do this for all address-taken variables for now.
    6513                 :       1207 :           Variable* var = (*p)->var_value();
    6514                 :       1207 :           Temporary_statement* ts =
    6515                 :       1207 :             Statement::make_temporary(var->type(), NULL, var->location());
    6516                 :       1207 :           ts->set_is_address_taken();
    6517                 :       1207 :           var->set_toplevel_decl(ts);
    6518                 :       1207 :           var_decls_stmts.push_back(ts);
    6519                 :            :         }
    6520                 :            :     }
    6521                 :     247957 :   if (!gogo->backend()->function_set_parameters(this->fndecl_, param_vars))
    6522                 :            :     {
    6523                 :         12 :       go_assert(saw_errors());
    6524                 :         12 :       return;
    6525                 :            :     }
    6526                 :            : 
    6527                 :            :   // If we need a closure variable, make sure to create it.
    6528                 :            :   // It gets installed in the function as a side effect of creation.
    6529                 :     247945 :   if (this->closure_var_ != NULL)
    6530                 :            :     {
    6531                 :      11325 :       go_assert(this->closure_var_->var_value()->is_closure());
    6532                 :      11325 :       this->closure_var_->get_backend_variable(gogo, named_function);
    6533                 :            :     }
    6534                 :            : 
    6535                 :     247945 :   if (this->block_ != NULL)
    6536                 :            :     {
    6537                 :            :       // Declare variables if necessary.
    6538                 :     247945 :       Bblock* var_decls = NULL;
    6539                 :     495890 :       std::vector<Bstatement*> var_decls_bstmt_list;
    6540                 :     247945 :       Bstatement* defer_init = NULL;
    6541                 :     247945 :       if (!vars.empty() || this->defer_stack_ != NULL)
    6542                 :            :         {
    6543                 :     186685 :           var_decls =
    6544                 :     186685 :               gogo->backend()->block(this->fndecl_, NULL, vars,
    6545                 :            :                                      this->block_->start_location(),
    6546                 :     186685 :                                      this->block_->end_location());
    6547                 :            : 
    6548                 :     186685 :           if (this->defer_stack_ != NULL)
    6549                 :            :             {
    6550                 :       7278 :               Translate_context dcontext(gogo, named_function, this->block_,
    6551                 :       7278 :                                          var_decls);
    6552                 :       7278 :               defer_init = this->defer_stack_->get_backend(&dcontext);
    6553                 :       7278 :               var_decls_bstmt_list.push_back(defer_init);
    6554                 :       8485 :               for (std::vector<Statement*>::iterator p = var_decls_stmts.begin();
    6555                 :       8485 :                    p != var_decls_stmts.end();
    6556                 :       8485 :                    ++p)
    6557                 :            :                 {
    6558                 :       1207 :                   Bstatement* bstmt = (*p)->get_backend(&dcontext);
    6559                 :       1207 :                   var_decls_bstmt_list.push_back(bstmt);
    6560                 :            :                 }
    6561                 :            :             }
    6562                 :            :         }
    6563                 :            : 
    6564                 :            :       // Build the backend representation for all the statements in the
    6565                 :            :       // function.
    6566                 :     247945 :       Translate_context bcontext(gogo, named_function, NULL, NULL);
    6567                 :     247945 :       Bblock* code_block = this->block_->get_backend(&bcontext);
    6568                 :            : 
    6569                 :            :       // Initialize variables if necessary.
    6570                 :     247945 :       Translate_context icontext(gogo, named_function, this->block_,
    6571                 :     247945 :                                  var_decls);
    6572                 :     495890 :       std::vector<Bstatement*> init;
    6573                 :     247945 :       go_assert(vars.size() == var_inits.size());
    6574                 :     465935 :       for (size_t i = 0; i < vars.size(); ++i)
    6575                 :            :         {
    6576                 :     217990 :           Bexpression* binit = var_inits[i]->get_backend(&icontext);
    6577                 :     217990 :           Bstatement* init_stmt =
    6578                 :     217990 :               gogo->backend()->init_statement(this->fndecl_, vars[i],
    6579                 :     217990 :                                               binit);
    6580                 :     217990 :           init.push_back(init_stmt);
    6581                 :            :         }
    6582                 :     247945 :       Bstatement* var_init = gogo->backend()->statement_list(init);
    6583                 :            : 
    6584                 :            :       // Initialize all variables before executing this code block.
    6585                 :     247945 :       Bstatement* code_stmt = gogo->backend()->block_statement(code_block);
    6586                 :     247945 :       code_stmt = gogo->backend()->compound_statement(var_init, code_stmt);
    6587                 :            : 
    6588                 :            :       // If we have a defer stack, initialize it at the start of a
    6589                 :            :       // function.
    6590                 :     247945 :       Bstatement* except = NULL;
    6591                 :     247945 :       Bstatement* fini = NULL;
    6592                 :     247945 :       if (defer_init != NULL)
    6593                 :            :         {
    6594                 :            :           // Clean up the defer stack when we leave the function.
    6595                 :       7278 :           this->build_defer_wrapper(gogo, named_function, &except, &fini);
    6596                 :            : 
    6597                 :            :           // Wrap the code for this function in an exception handler to handle
    6598                 :            :           // defer calls.
    6599                 :       7278 :           code_stmt =
    6600                 :       7278 :               gogo->backend()->exception_handler_statement(code_stmt,
    6601                 :            :                                                            except, fini,
    6602                 :       7278 :                                                            this->location_);
    6603                 :            :         }
    6604                 :            : 
    6605                 :            :       // Stick the code into the block we built for the receiver, if
    6606                 :            :       // we built one.
    6607                 :     247945 :       if (var_decls != NULL)
    6608                 :            :         {
    6609                 :     186685 :           var_decls_bstmt_list.push_back(code_stmt);
    6610                 :     186685 :           gogo->backend()->block_add_statements(var_decls, var_decls_bstmt_list);
    6611                 :     186685 :           code_stmt = gogo->backend()->block_statement(var_decls);
    6612                 :            :         }
    6613                 :            : 
    6614                 :     247945 :       if (!gogo->backend()->function_set_body(this->fndecl_, code_stmt))
    6615                 :            :         {
    6616                 :          0 :           go_assert(saw_errors());
    6617                 :          0 :           return;
    6618                 :            :         }
    6619                 :            :     }
    6620                 :            : 
    6621                 :            :   // If we created a descriptor for the function, make sure we emit it.
    6622                 :     247945 :   if (this->descriptor_ != NULL)
    6623                 :            :     {
    6624                 :     129395 :       Translate_context dcontext(gogo, NULL, NULL, NULL);
    6625                 :     129395 :       this->descriptor_->get_backend(&dcontext);
    6626                 :            :     }
    6627                 :            : }
    6628                 :            : 
    6629                 :            : // Build the wrappers around function code needed if the function has
    6630                 :            : // any defer statements.  This sets *EXCEPT to an exception handler
    6631                 :            : // and *FINI to a finally handler.
    6632                 :            : 
    6633                 :            : void
    6634                 :       7278 : Function::build_defer_wrapper(Gogo* gogo, Named_object* named_function,
    6635                 :            :                               Bstatement** except, Bstatement** fini)
    6636                 :            : {
    6637                 :       7278 :   Location end_loc = this->block_->end_location();
    6638                 :            : 
    6639                 :            :   // Add an exception handler.  This is used if a panic occurs.  Its
    6640                 :            :   // purpose is to stop the stack unwinding if a deferred function
    6641                 :            :   // calls recover.  There are more details in
    6642                 :            :   // libgo/runtime/go-unwind.c.
    6643                 :            : 
    6644                 :       7278 :   std::vector<Bstatement*> stmts;
    6645                 :       7278 :   Expression* call = Runtime::make_call(Runtime::CHECKDEFER, end_loc, 1,
    6646                 :            :                                         this->defer_stack(end_loc));
    6647                 :       7278 :   Translate_context context(gogo, named_function, NULL, NULL);
    6648                 :       7278 :   Bexpression* defer = call->get_backend(&context);
    6649                 :       7278 :   stmts.push_back(gogo->backend()->expression_statement(this->fndecl_, defer));
    6650                 :            : 
    6651                 :       7278 :   Bstatement* ret_bstmt = this->return_value(gogo, named_function, end_loc);
    6652                 :       7278 :   if (ret_bstmt != NULL)
    6653                 :       3064 :     stmts.push_back(ret_bstmt);
    6654                 :            : 
    6655                 :       7278 :   go_assert(*except == NULL);
    6656                 :       7278 :   *except = gogo->backend()->statement_list(stmts);
    6657                 :            : 
    6658                 :       7278 :   call = Runtime::make_call(Runtime::CHECKDEFER, end_loc, 1,
    6659                 :            :                             this->defer_stack(end_loc));
    6660                 :       7278 :   defer = call->get_backend(&context);
    6661                 :            : 
    6662                 :       7278 :   call = Runtime::make_call(Runtime::DEFERRETURN, end_loc, 1,
    6663                 :            :                             this->defer_stack(end_loc));
    6664                 :       7278 :   Bexpression* undefer = call->get_backend(&context);
    6665                 :       7278 :   Bstatement* function_defer =
    6666                 :       7278 :       gogo->backend()->function_defer_statement(this->fndecl_, undefer, defer,
    6667                 :       7278 :                                                 end_loc);
    6668                 :      14556 :   stmts = std::vector<Bstatement*>(1, function_defer);
    6669                 :       7278 :   if (this->type_->results() != NULL
    6670                 :       3064 :       && !this->type_->results()->empty()
    6671                 :      10342 :       && !this->type_->results()->front().name().empty())
    6672                 :            :     {
    6673                 :            :       // If the result variables are named, and we are returning from
    6674                 :            :       // this function rather than panicing through it, we need to
    6675                 :            :       // return them again, because they might have been changed by a
    6676                 :            :       // defer function.  The runtime routines set the defer_stack
    6677                 :            :       // variable to true if we are returning from this function.
    6678                 :            : 
    6679                 :        821 :       ret_bstmt = this->return_value(gogo, named_function, end_loc);
    6680                 :        821 :       Bexpression* nil = Expression::make_nil(end_loc)->get_backend(&context);
    6681                 :        821 :       Bexpression* ret =
    6682                 :        821 :           gogo->backend()->compound_expression(ret_bstmt, nil, end_loc);
    6683                 :        821 :       Expression* ref =
    6684                 :        821 :         Expression::make_temporary_reference(this->defer_stack_, end_loc);
    6685                 :        821 :       Bexpression* bref = ref->get_backend(&context);
    6686                 :        821 :       ret = gogo->backend()->conditional_expression(this->fndecl_,
    6687                 :            :                                                     NULL, bref, ret, NULL,
    6688                 :        821 :                                                     end_loc);
    6689                 :        821 :       stmts.push_back(gogo->backend()->expression_statement(this->fndecl_, ret));
    6690                 :            :     }
    6691                 :            : 
    6692                 :       7278 :   go_assert(*fini == NULL);
    6693                 :       7278 :   *fini = gogo->backend()->statement_list(stmts);
    6694                 :       7278 : }
    6695                 :            : 
    6696                 :            : // Return the statement that assigns values to this function's result struct.
    6697                 :            : 
    6698                 :            : Bstatement*
    6699                 :       8099 : Function::return_value(Gogo* gogo, Named_object* named_function,
    6700                 :            :                        Location location) const
    6701                 :            : {
    6702                 :       8099 :   const Typed_identifier_list* results = this->type_->results();
    6703                 :       8099 :   if (results == NULL || results->empty())
    6704                 :            :     return NULL;
    6705                 :            : 
    6706                 :       3885 :   go_assert(this->results_ != NULL);
    6707                 :       3885 :   if (this->results_->size() != results->size())
    6708                 :            :     {
    6709                 :          0 :       go_assert(saw_errors());
    6710                 :          0 :       return gogo->backend()->error_statement();
    6711                 :            :     }
    6712                 :            : 
    6713                 :       3885 :   std::vector<Bexpression*> vals(results->size());
    6714                 :       9721 :   for (size_t i = 0; i < vals.size(); ++i)
    6715                 :            :     {
    6716                 :       5836 :       Named_object* no = (*this->results_)[i];
    6717                 :       5836 :       Bvariable* bvar = no->get_backend_variable(gogo, named_function);
    6718                 :       5836 :       Bexpression* val = gogo->backend()->var_expression(bvar, location);
    6719                 :       5836 :       if (no->result_var_value()->is_in_heap())
    6720                 :            :         {
    6721                 :         10 :           Btype* bt = no->result_var_value()->type()->get_backend(gogo);
    6722                 :         10 :           val = gogo->backend()->indirect_expression(bt, val, true, location);
    6723                 :            :         }
    6724                 :       5836 :       vals[i] = val;
    6725                 :            :     }
    6726                 :       3885 :   return gogo->backend()->return_statement(this->fndecl_, vals, location);
    6727                 :            : }
    6728                 :            : 
    6729                 :            : // Class Block.
    6730                 :            : 
    6731                 :    2287340 : Block::Block(Block* enclosing, Location location)
    6732                 :            :   : enclosing_(enclosing), statements_(),
    6733                 :            :     bindings_(new Bindings(enclosing == NULL
    6734                 :    2287340 :                            ? NULL
    6735                 :    2287340 :                            : enclosing->bindings())),
    6736                 :            :     start_location_(location),
    6737                 :    4574680 :     end_location_(Linemap::unknown_location())
    6738                 :            : {
    6739                 :    2287340 : }
    6740                 :            : 
    6741                 :            : // Add a statement to a block.
    6742                 :            : 
    6743                 :            : void
    6744                 :    4370700 : Block::add_statement(Statement* statement)
    6745                 :            : {
    6746                 :    4370700 :   this->statements_.push_back(statement);
    6747                 :    4370700 : }
    6748                 :            : 
    6749                 :            : // Add a statement to the front of a block.  This is slow but is only
    6750                 :            : // used for reference counts of parameters.
    6751                 :            : 
    6752                 :            : void
    6753                 :       3982 : Block::add_statement_at_front(Statement* statement)
    6754                 :            : {
    6755                 :       3982 :   this->statements_.insert(this->statements_.begin(), statement);
    6756                 :       3982 : }
    6757                 :            : 
    6758                 :            : // Replace a statement in a block.
    6759                 :            : 
    6760                 :            : void
    6761                 :     623431 : Block::replace_statement(size_t index, Statement* s)
    6762                 :            : {
    6763                 :     623431 :   go_assert(index < this->statements_.size());
    6764                 :     623431 :   this->statements_[index] = s;
    6765                 :     623431 : }
    6766                 :            : 
    6767                 :            : // Add a statement before another statement.
    6768                 :            : 
    6769                 :            : void
    6770                 :    1761340 : Block::insert_statement_before(size_t index, Statement* s)
    6771                 :            : {
    6772                 :    1761340 :   go_assert(index < this->statements_.size());
    6773                 :    1761340 :   this->statements_.insert(this->statements_.begin() + index, s);
    6774                 :    1761340 : }
    6775                 :            : 
    6776                 :            : // Add a statement after another statement.
    6777                 :            : 
    6778                 :            : void
    6779                 :          0 : Block::insert_statement_after(size_t index, Statement* s)
    6780                 :            : {
    6781                 :          0 :   go_assert(index < this->statements_.size());
    6782                 :          0 :   this->statements_.insert(this->statements_.begin() + index + 1, s);
    6783                 :          0 : }
    6784                 :            : 
    6785                 :            : // Traverse the tree.
    6786                 :            : 
    6787                 :            : int
    6788                 :   36793300 : Block::traverse(Traverse* traverse)
    6789                 :            : {
    6790                 :   36793300 :   unsigned int traverse_mask = traverse->traverse_mask();
    6791                 :            : 
    6792                 :   36793300 :   if ((traverse_mask & Traverse::traverse_blocks) != 0)
    6793                 :            :     {
    6794                 :    7536680 :       int t = traverse->block(this);
    6795                 :    7536680 :       if (t == TRAVERSE_EXIT)
    6796                 :            :         return TRAVERSE_EXIT;
    6797                 :    7536680 :       else if (t == TRAVERSE_SKIP_COMPONENTS)
    6798                 :            :         return TRAVERSE_CONTINUE;
    6799                 :            :     }
    6800                 :            : 
    6801                 :   33958000 :   if ((traverse_mask
    6802                 :   33958000 :        & (Traverse::traverse_variables
    6803                 :            :           | Traverse::traverse_constants
    6804                 :            :           | Traverse::traverse_expressions
    6805                 :            :           | Traverse::traverse_types)) != 0)
    6806                 :            :     {
    6807                 :   29821500 :       const unsigned int e_or_t = (Traverse::traverse_expressions
    6808                 :            :                                    | Traverse::traverse_types);
    6809                 :   29821500 :       const unsigned int e_or_t_or_s = (e_or_t
    6810                 :            :                                         | Traverse::traverse_statements);
    6811                 :   17704800 :       for (Bindings::const_definitions_iterator pb =
    6812                 :   29821500 :              this->bindings_->begin_definitions();
    6813                 :   47526300 :            pb != this->bindings_->end_definitions();
    6814                 :   47526300 :            ++pb)
    6815                 :            :         {
    6816                 :   18192700 :           int t = TRAVERSE_CONTINUE;
    6817                 :   18192700 :           switch ((*pb)->classification())
    6818                 :            :             {
    6819                 :     112026 :             case Named_object::NAMED_OBJECT_CONST:
    6820                 :     112026 :               if ((traverse_mask & Traverse::traverse_constants) != 0)
    6821                 :      10252 :                 t = traverse->constant(*pb, false);
    6822                 :      10252 :               if (t == TRAVERSE_CONTINUE
    6823                 :     112026 :                   && (traverse_mask & e_or_t) != 0)
    6824                 :            :                 {
    6825                 :      97372 :                   Type* tc = (*pb)->const_value()->type();
    6826                 :      97372 :                   if (tc != NULL
    6827                 :      97372 :                       && Type::traverse(tc, traverse) == TRAVERSE_EXIT)
    6828                 :   36793300 :                     return TRAVERSE_EXIT;
    6829                 :      97372 :                   t = (*pb)->const_value()->traverse_expression(traverse);
    6830                 :            :                 }
    6831                 :            :               break;
    6832                 :            : 
    6833                 :   18061100 :             case Named_object::NAMED_OBJECT_VAR:
    6834                 :   18061100 :             case Named_object::NAMED_OBJECT_RESULT_VAR:
    6835                 :   18061100 :               if ((traverse_mask & Traverse::traverse_variables) != 0)
    6836                 :    4652720 :                 t = traverse->variable(*pb);
    6837                 :    4652720 :               if (t == TRAVERSE_CONTINUE
    6838                 :   16663700 :                   && (traverse_mask & e_or_t) != 0)
    6839                 :            :                 {
    6840                 :   14450300 :                   if ((*pb)->is_result_variable()
    6841                 :   14450300 :                       || (*pb)->var_value()->has_type())
    6842                 :            :                     {
    6843                 :   13797900 :                       Type* tv = ((*pb)->is_variable()
    6844                 :   13797900 :                                   ? (*pb)->var_value()->type()
    6845                 :    3365610 :                                   : (*pb)->result_var_value()->type());
    6846                 :   13797900 :                       if (tv != NULL
    6847                 :   13797900 :                           && Type::traverse(tv, traverse) == TRAVERSE_EXIT)
    6848                 :            :                         return TRAVERSE_EXIT;
    6849                 :            :                     }
    6850                 :            :                 }
    6851                 :   18060900 :               if (t == TRAVERSE_CONTINUE
    6852                 :   16663600 :                   && (traverse_mask & e_or_t_or_s) != 0
    6853                 :   34724500 :                   && (*pb)->is_variable())
    6854                 :   12856400 :                 t = (*pb)->var_value()->traverse_expression(traverse,
    6855                 :            :                                                             traverse_mask);
    6856                 :            :               break;
    6857                 :            : 
    6858                 :          0 :             case Named_object::NAMED_OBJECT_FUNC:
    6859                 :          0 :             case Named_object::NAMED_OBJECT_FUNC_DECLARATION:
    6860                 :          0 :               go_unreachable();
    6861                 :            : 
    6862                 :      19538 :             case Named_object::NAMED_OBJECT_TYPE:
    6863                 :      19538 :               if ((traverse_mask & e_or_t) != 0)
    6864                 :      16274 :                 t = Type::traverse((*pb)->type_value(), traverse);
    6865                 :            :               break;
    6866                 :            : 
    6867                 :            :             case Named_object::NAMED_OBJECT_TYPE_DECLARATION:
    6868                 :            :             case Named_object::NAMED_OBJECT_UNKNOWN:
    6869                 :            :             case Named_object::NAMED_OBJECT_ERRONEOUS:
    6870                 :            :               break;
    6871                 :            : 
    6872                 :          0 :             case Named_object::NAMED_OBJECT_PACKAGE:
    6873                 :          0 :             case Named_object::NAMED_OBJECT_SINK:
    6874                 :          0 :               go_unreachable();
    6875                 :            : 
    6876                 :          0 :             default:
    6877                 :          0 :               go_unreachable();
    6878                 :            :             }
    6879                 :            : 
    6880                 :   18189200 :           if (t == TRAVERSE_EXIT)
    6881                 :            :             return TRAVERSE_EXIT;
    6882                 :            :         }
    6883                 :            :     }
    6884                 :            : 
    6885                 :            :   // No point in checking traverse_mask here--if we got here we always
    6886                 :            :   // want to walk the statements.  The traversal can insert new
    6887                 :            :   // statements before or after the current statement.  Inserting
    6888                 :            :   // statements before the current statement requires updating I via
    6889                 :            :   // the pointer; those statements will not be traversed.  Any new
    6890                 :            :   // statements inserted after the current statement will be traversed
    6891                 :            :   // in their turn.
    6892                 :  111588000 :   for (size_t i = 0; i < this->statements_.size(); ++i)
    6893                 :            :     {
    6894                 :   80083100 :       if (this->statements_[i]->traverse(this, &i, traverse) == TRAVERSE_EXIT)
    6895                 :    1965730 :         return TRAVERSE_EXIT;
    6896                 :            :     }
    6897                 :            : 
    6898                 :   31504400 :   return TRAVERSE_CONTINUE;
    6899                 :            : }
    6900                 :            : 
    6901                 :            : // Work out types for unspecified variables and constants.
    6902                 :            : 
    6903                 :            : void
    6904                 :    1316330 : Block::determine_types()
    6905                 :            : {
    6906                 :     669484 :   for (Bindings::const_definitions_iterator pb =
    6907                 :    1316330 :          this->bindings_->begin_definitions();
    6908                 :    1985820 :        pb != this->bindings_->end_definitions();
    6909                 :    1985820 :        ++pb)
    6910                 :            :     {
    6911                 :     669484 :       if ((*pb)->is_variable())
    6912                 :     541368 :         (*pb)->var_value()->determine_type();
    6913                 :     128116 :       else if ((*pb)->is_const())
    6914                 :       4916 :         (*pb)->const_value()->determine_type();
    6915                 :            :     }
    6916                 :            : 
    6917                 :    4475640 :   for (std::vector<Statement*>::const_iterator ps = this->statements_.begin();
    6918                 :    4475640 :        ps != this->statements_.end();
    6919                 :    4475640 :        ++ps)
    6920                 :    3159310 :     (*ps)->determine_types();
    6921                 :    1316330 : }
    6922                 :            : 
    6923                 :            : // Return true if the statements in this block may fall through.
    6924                 :            : 
    6925                 :            : bool
    6926                 :      96822 : Block::may_fall_through() const
    6927                 :            : {
    6928                 :      96822 :   if (this->statements_.empty())
    6929                 :            :     return true;
    6930                 :      96780 :   return this->statements_.back()->may_fall_through();
    6931                 :            : }
    6932                 :            : 
    6933                 :            : // Write export data for a block.
    6934                 :            : 
    6935                 :            : void
    6936                 :      38858 : Block::export_block(Export_function_body* efb)
    6937                 :            : {
    6938                 :     108139 :   for (Block::iterator p = this->begin();
    6939                 :     108139 :        p != this->end();
    6940                 :     108139 :        ++p)
    6941                 :            :     {
    6942                 :      69281 :       efb->indent();
    6943                 :            : 
    6944                 :      69281 :       efb->increment_indent();
    6945                 :      69281 :       (*p)->export_statement(efb);
    6946                 :      69281 :       efb->decrement_indent();
    6947                 :            : 
    6948                 :      69281 :       Location loc = (*p)->location();
    6949                 :      69281 :       if ((*p)->is_block_statement())
    6950                 :            :         {
    6951                 :            :           // For a block we put the start location on the first brace
    6952                 :            :           // in Block_statement::do_export_statement.  Here we put the
    6953                 :            :           // end location on the final brace.
    6954                 :      20001 :           loc = (*p)->block_statement()->block()->end_location();
    6955                 :            :         }
    6956                 :      69281 :       char buf[50];
    6957                 :      69281 :       snprintf(buf, sizeof buf, " //%d\n", Linemap::location_to_line(loc));
    6958                 :      69281 :       efb->write_c_string(buf);
    6959                 :            :     }
    6960                 :      38858 : }
    6961                 :            : 
    6962                 :            : // Add exported block data to SET, reading from BODY starting at OFF.
    6963                 :            : // Returns whether the import succeeded.
    6964                 :            : 
    6965                 :            : bool
    6966                 :      31594 : Block::import_block(Block* set, Import_function_body *ifb, Location loc)
    6967                 :            : {
    6968                 :      31594 :   Location eloc = ifb->location();
    6969                 :      31594 :   Location sloc = loc;
    6970                 :      31594 :   const std::string& body(ifb->body());
    6971                 :      31594 :   size_t off = ifb->off();
    6972                 :      86022 :   while (off < body.length())
    6973                 :            :     {
    6974                 :      75486 :       int indent = ifb->indent();
    6975                 :      75486 :       if (off + indent >= body.length())
    6976                 :            :         {
    6977                 :          0 :           go_error_at(eloc,
    6978                 :            :                       "invalid export data for %qs: insufficient indentation",
    6979                 :          0 :                       ifb->name().c_str());
    6980                 :          0 :           return false;
    6981                 :            :         }
    6982                 :     184797 :       for (int i = 0; i < indent - 1; i++)
    6983                 :            :         {
    6984                 :     109311 :           if (body[off + i] != ' ')
    6985                 :            :             {
    6986                 :          0 :               go_error_at(eloc,
    6987                 :            :                           "invalid export data for %qs: bad indentation",
    6988                 :          0 :                           ifb->name().c_str());
    6989                 :          0 :               return false;
    6990                 :            :             }
    6991                 :            :         }
    6992                 :            : 
    6993                 :      75486 :       bool at_end = false;
    6994                 :      75486 :       if (body[off + indent - 1] == '}')
    6995                 :            :         at_end = true;
    6996                 :      54428 :       else if (body[off + indent - 1] != ' ')
    6997                 :            :         {
    6998                 :          0 :           go_error_at(eloc,
    6999                 :            :                       "invalid export data for %qs: bad indentation",
    7000                 :          0 :                       ifb->name().c_str());
    7001                 :          0 :           return false;
    7002                 :            :         }
    7003                 :            : 
    7004                 :      75486 :       off += indent;
    7005                 :            : 
    7006                 :      75486 :       size_t nl = body.find('\n', off);
    7007                 :      75486 :       if (nl == std::string::npos)
    7008                 :            :         {
    7009                 :          0 :           go_error_at(eloc, "invalid export data for %qs: missing newline",
    7010                 :          0 :                       ifb->name().c_str());
    7011                 :          0 :           return false;
    7012                 :            :         }
    7013                 :            : 
    7014                 :      75486 :       size_t lineno_pos = body.find(" //", off);
    7015                 :      75486 :       if (lineno_pos == std::string::npos || lineno_pos >= nl)
    7016                 :            :         {
    7017                 :          0 :           go_error_at(eloc, "invalid export data for %qs: missing line number",
    7018                 :          0 :                       ifb->name().c_str());
    7019                 :          0 :           return false;
    7020                 :            :         }
    7021                 :            : 
    7022                 :      75486 :       unsigned int lineno = 0;
    7023                 :     260005 :       for (size_t i = lineno_pos + 3; i < nl; ++i)
    7024                 :            :         {
    7025                 :     184519 :           char c = body[i];
    7026                 :     184519 :           if (c < '0' || c > '9')
    7027                 :            :             {
    7028                 :          0 :               go_error_at(loc,
    7029                 :            :                           "invalid export data for %qs: invalid line number",
    7030                 :          0 :                           ifb->name().c_str());
    7031                 :          0 :               return false;
    7032                 :            :             }
    7033                 :     184519 :           lineno = lineno * 10 + c - '0';
    7034                 :            :         }
    7035                 :            : 
    7036                 :      75486 :       ifb->gogo()->linemap()->start_line(lineno, 1);
    7037                 :      75486 :       sloc = ifb->gogo()->linemap()->get_location(0);
    7038                 :            : 
    7039                 :      75486 :       if (at_end)
    7040                 :            :         {
    7041                 :            :           // An if statement can have an "else" following the "}", in
    7042                 :            :           // which case we want to leave the offset where it is, just
    7043                 :            :           // after the "}".  We don't get the block ending location
    7044                 :            :           // quite right for if statements.
    7045                 :      21058 :           if (body.compare(off, 6, " else ") != 0)
    7046                 :      20936 :             off = nl + 1;
    7047                 :            :           break;
    7048                 :            :         }
    7049                 :            : 
    7050                 :      54428 :       ifb->set_off(off);
    7051                 :      54428 :       Statement* s = Statement::import_statement(ifb, sloc);
    7052                 :      54428 :       if (s == NULL)
    7053                 :            :         return false;
    7054                 :            : 
    7055                 :      54428 :       set->add_statement(s);
    7056                 :            : 
    7057                 :      54428 :       size_t at = ifb->off();
    7058                 :      54428 :       if (at < nl + 1)
    7059                 :            :         off = nl + 1;
    7060                 :            :       else
    7061                 :            :         off = at;
    7062                 :            :     }
    7063                 :            : 
    7064                 :      31594 :   ifb->set_off(off);
    7065                 :      31594 :   set->set_end_location(sloc);
    7066                 :      31594 :   return true;
    7067                 :            : }
    7068                 :            : 
    7069                 :            : // Convert a block to the backend representation.
    7070                 :            : 
    7071                 :            : Bblock*
    7072                 :    2212150 : Block::get_backend(Translate_context* context)
    7073                 :            : {
    7074                 :    2212150 :   Gogo* gogo = context->gogo();
    7075                 :    2212150 :   Named_object* function = context->function();
    7076                 :    2212150 :   std::vector<Bvariable*> vars;
    7077                 :    2212150 :   vars.reserve(this->bindings_->size_definitions());
    7078                 :     911889 :   for (Bindings::const_definitions_iterator pv =
    7079                 :    2212150 :          this->bindings_->begin_definitions();
    7080                 :    3124040 :        pv != this->bindings_->end_definitions();
    7081                 :    3124040 :        ++pv)
    7082                 :            :     {
    7083                 :     911889 :       if ((*pv)->is_variable() && !(*pv)->var_value()->is_parameter())
    7084                 :     307094 :         vars.push_back((*pv)->get_backend_variable(gogo, function));
    7085                 :            :     }
    7086                 :            : 
    7087                 :    2212150 :   go_assert(function != NULL);
    7088                 :    2212150 :   Bfunction* bfunction =
    7089                 :    2212150 :     function->func_value()->get_or_make_decl(gogo, function);
    7090                 :    2212150 :   Bblock* ret = context->backend()->block(bfunction, context->bblock(),
    7091                 :            :                                           vars, this->start_location_,
    7092                 :    2212150 :                                           this->end_location_);
    7093                 :            : 
    7094                 :    2212150 :   Translate_context subcontext(gogo, function, this, ret);
    7095                 :    4424300 :   std::vector<Bstatement*> bstatements;
    7096                 :    2212150 :   bstatements.reserve(this->statements_.size());
    7097                 :    2212150 :   for (std::vector<Statement*>::const_iterator p = this->statements_.begin();
    7098                 :    8330890 :        p != this->statements_.end();
    7099                 :    8330890 :        ++p)
    7100                 :    6118740 :     bstatements.push_back((*p)->get_backend(&subcontext));
    7101                 :            : 
    7102                 :    2212150 :   context->backend()->block_add_statements(ret, bstatements);
    7103                 :            : 
    7104                 :    2212150 :   return ret;
    7105                 :            : }
    7106                 :            : 
    7107                 :            : // Class Bindings_snapshot.
    7108                 :            : 
    7109                 :       9382 : Bindings_snapshot::Bindings_snapshot(const Block* b, Location location)
    7110                 :       9382 :   : block_(b), counts_(), location_(location)
    7111                 :            : {
    7112                 :      32504 :   while (b != NULL)
    7113                 :            :     {
    7114                 :      23122 :       this->counts_.push_back(b->bindings()->size_definitions());
    7115                 :      23122 :       b = b->enclosing();
    7116                 :            :     }
    7117                 :       9382 : }
    7118                 :            : 
    7119                 :            : // Report errors appropriate for a goto from B to this.
    7120                 :            : 
    7121                 :            : void
    7122                 :        519 : Bindings_snapshot::check_goto_from(const Block* b, Location loc)
    7123                 :            : {
    7124                 :        519 :   size_t dummy;
    7125                 :        519 :   if (!this->check_goto_block(loc, b, this->block_, &dummy))
    7126                 :         12 :     return;
    7127                 :        507 :   this->check_goto_defs(loc, this->block_,
    7128                 :        507 :                         this->block_->bindings()->size_definitions(),
    7129                 :        507 :                         this->counts_[0]);
    7130                 :            : }
    7131                 :            : 
    7132                 :            : // Report errors appropriate for a goto from this to B.
    7133                 :            : 
    7134                 :            : void
    7135                 :       1539 : Bindings_snapshot::check_goto_to(const Block* b)
    7136                 :            : {
    7137                 :       1539 :   size_t index;
    7138                 :       1539 :   if (!this->check_goto_block(this->location_, this->block_, b, &index))
    7139                 :         19 :     return;
    7140                 :       1520 :   this->check_goto_defs(this->location_, b, this->counts_[index],
    7141                 :            :                         b->bindings()->size_definitions());
    7142                 :            : }
    7143                 :            : 
    7144                 :            : // Report errors appropriate for a goto at LOC from BFROM to BTO.
    7145                 :            : // Return true if all is well, false if we reported an error.  If this
    7146                 :            : // returns true, it sets *PINDEX to the number of blocks BTO is above
    7147                 :            : // BFROM.
    7148                 :            : 
    7149                 :            : bool
    7150                 :       2058 : Bindings_snapshot::check_goto_block(Location loc, const Block* bfrom,
    7151                 :            :                                     const Block* bto, size_t* pindex)
    7152                 :            : {
    7153                 :            :   // It is an error if BTO is not either BFROM or above BFROM.
    7154                 :       2058 :   size_t index = 0;
    7155                 :       9732 :   for (const Block* pb = bfrom; pb != bto; pb = pb->enclosing(), ++index)
    7156                 :            :     {
    7157                 :       7705 :       if (pb == NULL)
    7158                 :            :         {
    7159                 :         31 :           go_error_at(loc, "goto jumps into block");
    7160                 :         31 :           go_inform(bto->start_location(), "goto target block starts here");
    7161                 :         31 :           return false;
    7162                 :            :         }
    7163                 :            :     }
    7164                 :       2027 :   *pindex = index;
    7165                 :       2027 :   return true;
    7166                 :            : }
    7167                 :            : 
    7168                 :            : // Report errors appropriate for a goto at LOC ending at BLOCK, where
    7169                 :            : // CFROM is the number of names defined at the point of the goto and
    7170                 :            : // CTO is the number of names defined at the point of the label.
    7171                 :            : 
    7172                 :            : void
    7173                 :       2027 : Bindings_snapshot::check_goto_defs(Location loc, const Block* block,
    7174                 :            :                                    size_t cfrom, size_t cto)
    7175                 :            : {
    7176                 :       2027 :   if (cfrom < cto)
    7177                 :            :     {
    7178                 :          4 :       Bindings::const_definitions_iterator p =
    7179                 :          4 :         block->bindings()->begin_definitions();
    7180                 :          4 :       for (size_t i = 0; i < cfrom; ++i)
    7181                 :            :         {
    7182                 :          0 :           go_assert(p != block->bindings()->end_definitions());
    7183                 :          0 :           ++p;
    7184                 :            :         }
    7185                 :          4 :       go_assert(p != block->bindings()->end_definitions());
    7186                 :            : 
    7187                 :         10 :       for (; p != block->bindings()->end_definitions(); ++p)
    7188                 :            :         {
    7189                 :          6 :           if ((*p)->is_variable())
    7190                 :            :             {
    7191                 :         12 :               std::string n = (*p)->message_name();
    7192                 :          6 :               go_error_at(loc, "goto jumps over declaration of %qs", n.c_str());
    7193                 :          6 :               go_inform((*p)->location(), "%qs defined here", n.c_str());
    7194                 :            :             }
    7195                 :            :         }
    7196                 :            :     }
    7197                 :       2027 : }
    7198                 :            : 
    7199                 :            : // Class Function_declaration.
    7200                 :            : 
    7201                 :            : // Whether this declares a method.
    7202                 :            : 
    7203                 :            : bool
    7204                 :    1162300 : Function_declaration::is_method() const
    7205                 :            : {
    7206                 :    1162300 :   return this->fntype_->is_method();
    7207                 :            : }
    7208                 :            : 
    7209                 :            : // Whether this method should not be included in the type descriptor.
    7210                 :            : 
    7211                 :            : bool
    7212                 :     936181 : Function_declaration::nointerface() const
    7213                 :            : {
    7214                 :     936181 :   go_assert(this->is_method());
    7215                 :     936181 :   return (this->pragmas_ & GOPRAGMA_NOINTERFACE) != 0;
    7216                 :            : }
    7217                 :            : 
    7218                 :            : // Record that this method should not be included in the type
    7219                 :            : // descriptor.
    7220                 :            : 
    7221                 :            : void
    7222                 :          0 : Function_declaration::set_nointerface()
    7223                 :            : {
    7224                 :          0 :   this->pragmas_ |= GOPRAGMA_NOINTERFACE;
    7225                 :          0 : }
    7226                 :            : 
    7227                 :            : // Import an inlinable function.  This is used for an inlinable
    7228                 :            : // function whose body is recorded in the export data.  Parse the
    7229                 :            : // export data into a Block and create a regular function using that
    7230                 :            : // Block as its body.  Redeclare this function declaration as the
    7231                 :            : // function.
    7232                 :            : 
    7233                 :            : void
    7234                 :      10536 : Function_declaration::import_function_body(Gogo* gogo, Named_object* no)
    7235                 :            : {
    7236                 :      10536 :   go_assert(no->func_declaration_value() == this);
    7237                 :      10536 :   go_assert(no->package() != NULL);
    7238                 :      10536 :   const std::string& body(this->imported_body_);
    7239                 :      10536 :   go_assert(!body.empty());
    7240                 :            : 
    7241                 :            :   // Read the "//FILE:LINE" comment starts the export data.
    7242                 :            : 
    7243                 :      10536 :   size_t indent = 1;
    7244                 :      10536 :   if (this->is_method())
    7245                 :        458 :     indent = 2;
    7246                 :      10536 :   size_t i = 0;
    7247                 :      21530 :   for (; i < indent; i++)
    7248                 :            :     {
    7249                 :      10994 :       if (body.at(i) != ' ')
    7250                 :            :         {
    7251                 :          0 :           go_error_at(this->location_,
    7252                 :            :                       "invalid export body for %qs: bad initial indentation",
    7253                 :          0 :                       no->message_name().c_str());
    7254                 :          0 :           return;
    7255                 :            :         }
    7256                 :            :     }
    7257                 :            : 
    7258                 :      10536 :   if (body.substr(i, 2) != "//")
    7259                 :            :     {
    7260                 :          0 :       go_error_at(this->location_,
    7261                 :            :                   "invalid export body for %qs: missing file comment",
    7262                 :          0 :                   no->message_name().c_str());
    7263                 :          0 :       return;
    7264                 :            :     }
    7265                 :            : 
    7266                 :      10536 :   size_t colon = body.find(':', i + 2);
    7267                 :      10536 :   size_t nl = body.find('\n', i + 2);
    7268                 :      10536 :   if (nl == std::string::npos)
    7269                 :            :     {
    7270                 :          0 :       go_error_at(this->location_,
    7271                 :            :                   "invalid export body for %qs: missing file name",
    7272                 :          0 :                   no->message_name().c_str());
    7273                 :          0 :       return;
    7274                 :            :     }
    7275                 :      10536 :   if (colon == std::string::npos || nl < colon)
    7276                 :            :     {
    7277                 :          0 :       go_error_at(this->location_,
    7278                 :            :                   "invalid export body for %qs: missing initial line number",
    7279                 :          0 :                   no->message_name().c_str());
    7280                 :          0 :       return;
    7281                 :            :     }
    7282                 :            : 
    7283                 :      21072 :   std::string file = body.substr(i + 2, colon - (i + 2));
    7284                 :      21072 :   std::string linestr = body.substr(colon + 1, nl - (colon + 1));
    7285                 :      10536 :   char* end;
    7286                 :      10536 :   long linenol = strtol(linestr.c_str(), &end, 10);
    7287                 :      10536 :   if (*end != '\0')
    7288                 :            :     {
    7289                 :          0 :       go_error_at(this->location_,
    7290                 :            :                   "invalid export body for %qs: invalid initial line number",
    7291                 :          0 :                   no->message_name().c_str());
    7292                 :          0 :       return;
    7293                 :            :     }
    7294                 :      10536 :   unsigned int lineno = static_cast<unsigned int>(linenol);
    7295                 :            : 
    7296                 :            :   // Turn the file/line into a location.
    7297                 :            : 
    7298                 :      10536 :   char* alc = new char[file.length() + 1];
    7299                 :      10536 :   memcpy(alc, file.data(), file.length());
    7300                 :      10536 :   alc[file.length()] = '\0';
    7301                 :      10536 :   gogo->linemap()->start_file(alc, lineno);
    7302                 :      10536 :   gogo->linemap()->start_line(lineno, 1);
    7303                 :      10536 :   Location start_loc = gogo->linemap()->get_location(0);
    7304                 :            : 
    7305                 :            :   // Define the function with an outer block that declares the
    7306                 :            :   // parameters.
    7307                 :            : 
    7308                 :      10536 :   Function_type* fntype = this->fntype_;
    7309                 :            : 
    7310                 :      10536 :   Block* outer = new Block(NULL, start_loc);
    7311                 :            : 
    7312                 :      10536 :   Function* fn = new Function(fntype, NULL, outer, start_loc);
    7313                 :      10536 :   fn->set_is_inline_only();
    7314                 :            : 
    7315                 :      10536 :   if (fntype->is_method())
    7316                 :            :     {
    7317                 :        458 :       if (this->nointerface())
    7318                 :          0 :         fn->set_nointerface();
    7319                 :        458 :       const Typed_identifier* receiver = fntype->receiver();
    7320                 :        458 :       Variable* recv_param = new Variable(receiver->type(), NULL, false,
    7321                 :        458 :                                           true, true, start_loc);
    7322                 :            : 
    7323                 :        916 :       std::string rname = receiver->name();
    7324                 :        458 :       unsigned rcounter = 0;
    7325                 :            : 
    7326                 :            :       // We need to give a nameless receiver a name to avoid having it
    7327                 :            :       // clash with some other nameless param. FIXME.
    7328                 :        458 :       Gogo::rename_if_empty(&rname, "r", &rcounter);
    7329                 :            : 
    7330                 :        458 :       outer->bindings()->add_variable(rname, NULL, recv_param);
    7331                 :            :     }
    7332                 :            : 
    7333                 :      10536 :   const Typed_identifier_list* params = fntype->parameters();
    7334                 :      10536 :   bool is_varargs = fntype->is_varargs();
    7335                 :      10536 :   unsigned pcounter = 0;
    7336                 :      10536 :   if (params != NULL)
    7337                 :            :     {
    7338                 :       9073 :       for (Typed_identifier_list::const_iterator p = params->begin();
    7339                 :      23719 :            p != params->end();
    7340                 :      23719 :            ++p)
    7341                 :            :         {
    7342                 :      14646 :           Variable* param = new Variable(p->type(), NULL, false, true, false,
    7343                 :      14646 :                                          start_loc);
    7344                 :      14646 :           if (is_varargs && p + 1 == params->end())
    7345                 :        459 :             param->set_is_varargs_parameter();
    7346                 :            : 
    7347                 :      29292 :           std::string pname = p->name();
    7348                 :            : 
    7349                 :            :           // We need to give each nameless parameter a non-empty name to avoid
    7350                 :            :           // having it clash with some other nameless param. FIXME.
    7351                 :      14646 :           Gogo::rename_if_empty(&pname, "p", &pcounter);
    7352                 :            : 
    7353                 :      14646 :           outer->bindings()->add_variable(pname, NULL, param);
    7354                 :            :         }
    7355                 :            :     }
    7356                 :            : 
    7357                 :      10536 :   fn->create_result_variables(gogo);
    7358                 :            : 
    7359                 :      10536 :   if (!fntype->is_method())
    7360                 :            :     {
    7361                 :      10078 :       const Package* package = no->package();
    7362                 :      10078 :       no = package->bindings()->add_function(no->name(), package, fn);
    7363                 :            :     }
    7364                 :            :   else
    7365                 :            :     {
    7366                 :        916 :       Named_type* rtype = fntype->receiver()->type()->deref()->named_type();
    7367                 :        458 :       go_assert(rtype != NULL);
    7368                 :        458 :       no = rtype->add_method(no->name(), fn);
    7369                 :        458 :       const Package* package = rtype->named_object()->package();
    7370                 :        458 :       package->bindings()->add_method(no);
    7371                 :            :     }
    7372                 :            : 
    7373                 :      21072 :   Import_function_body ifb(gogo, this->imp_, no, body, nl + 1, outer, indent);
    7374                 :            : 
    7375                 :      10536 :   if (!Block::import_block(outer, &ifb, start_loc))
    7376                 :          0 :     return;
    7377                 :            : 
    7378                 :      10536 :   gogo->lower_block(no, outer);
    7379                 :      10536 :   outer->determine_types();
    7380                 :            : 
    7381                 :      10536 :   gogo->add_imported_inline_function(no);
    7382                 :            : }
    7383                 :            : 
    7384                 :            : // Return the function descriptor.
    7385                 :            : 
    7386                 :            : Expression*
    7387                 :     104792 : Function_declaration::descriptor(Gogo*, Named_object* no)
    7388                 :            : {
    7389                 :     104792 :   go_assert(!this->fntype_->is_method());
    7390                 :     104792 :   if (this->descriptor_ == NULL)
    7391                 :      90772 :     this->descriptor_ = Expression::make_func_descriptor(no);
    7392                 :     104792 :   return this->descriptor_;
    7393                 :            : }
    7394                 :            : 
    7395                 :            : // Class Variable.
    7396                 :            : 
    7397                 :    1403840 : Variable::Variable(Type* type, Expression* init, bool is_global,
    7398                 :            :                    bool is_parameter, bool is_receiver,
    7399                 :    1403840 :                    Location location)
    7400                 :            :   : type_(type), init_(init), preinit_(NULL), location_(location),
    7401                 :            :     backend_(NULL), is_global_(is_global), is_parameter_(is_parameter),
    7402                 :            :     is_closure_(false), is_receiver_(is_receiver),
    7403                 :            :     is_varargs_parameter_(false), is_used_(false),
    7404                 :            :     is_address_taken_(false), is_non_escaping_address_taken_(false),
    7405                 :            :     seen_(false), init_is_lowered_(false), init_is_flattened_(false),
    7406                 :            :     type_from_init_tuple_(false), type_from_range_index_(false),
    7407                 :            :     type_from_range_value_(false), type_from_chan_element_(false),
    7408                 :            :     is_type_switch_var_(false), determined_type_(false),
    7409                 :            :     in_unique_section_(false), is_referenced_by_inline_(false),
    7410                 :    1403840 :     toplevel_decl_(NULL)
    7411                 :            : {
    7412                 :    1403840 :   go_assert(type != NULL || init != NULL);
    7413                 :    1403840 :   go_assert(!is_parameter || init == NULL);
    7414                 :    1403840 : }
    7415                 :            : 
    7416                 :            : // Traverse the initializer expression.
    7417                 :            : 
    7418                 :            : int
    7419                 :   16813300 : Variable::traverse_expression(Traverse* traverse, unsigned int traverse_mask)
    7420                 :            : {
    7421                 :   16813300 :   if (this->preinit_ != NULL)
    7422                 :            :     {
    7423                 :      31970 :       if (this->preinit_->traverse(traverse) == TRAVERSE_EXIT)
    7424                 :            :         return TRAVERSE_EXIT;
    7425                 :            :     }
    7426                 :   16813300 :   if (this->init_ != NULL
    7427                 :    4722390 :       && ((traverse_mask
    7428                 :    4722390 :            & (Traverse::traverse_expressions | Traverse::traverse_types))
    7429                 :            :           != 0))
    7430                 :            :     {
    7431                 :    3980490 :       if (Expression::traverse(&this->init_, traverse) == TRAVERSE_EXIT)
    7432                 :     487649 :         return TRAVERSE_EXIT;
    7433                 :            :     }
    7434                 :            :   return TRAVERSE_CONTINUE;
    7435                 :            : }
    7436                 :            : 
    7437                 :            : // Lower the initialization expression after parsing is complete.
    7438                 :            : 
    7439                 :            : void
    7440                 :    5687580 : Variable::lower_init_expression(Gogo* gogo, Named_object* function,
    7441                 :            :                                 Statement_inserter* inserter)
    7442                 :            : {
    7443                 :    5687580 :   Named_object* dep = gogo->var_depends_on(this);
    7444                 :         67 :   if (dep != NULL && dep->is_variable())
    7445                 :         67 :     dep->var_value()->lower_init_expression(gogo, function, inserter);
    7446                 :            : 
    7447                 :    5687580 :   if (this->init_ != NULL && !this->init_is_lowered_)
    7448                 :            :     {
    7449                 :     285518 :       if (this->seen_)
    7450                 :            :         {
    7451                 :            :           // We will give an error elsewhere, this is just to prevent
    7452                 :            :           // an infinite loop.
    7453                 :          0 :           return;
    7454                 :            :         }
    7455                 :     285518 :       this->seen_ = true;
    7456                 :            : 
    7457                 :     285518 :       Statement_inserter global_inserter;
    7458                 :     285518 :       if (this->is_global_)
    7459                 :            :         {
    7460                 :      17990 :           global_inserter = Statement_inserter(gogo, this);
    7461                 :      17990 :           inserter = &global_inserter;
    7462                 :            :         }
    7463                 :            : 
    7464                 :     285518 :       gogo->lower_expression(function, inserter, &this->init_);
    7465                 :            : 
    7466                 :     285518 :       this->seen_ = false;
    7467                 :            : 
    7468                 :     285518 :       this->init_is_lowered_ = true;
    7469                 :            :     }
    7470                 :            : }
    7471                 :            : 
    7472                 :            : // Flatten the initialization expression after ordering evaluations.
    7473                 :            : 
    7474                 :            : void
    7475                 :     597723 : Variable::flatten_init_expression(Gogo* gogo, Named_object* function,
    7476                 :            :                                   Statement_inserter* inserter)
    7477                 :            : {
    7478                 :     597723 :   Named_object* dep = gogo->var_depends_on(this);
    7479                 :         33 :   if (dep != NULL && dep->is_variable())
    7480                 :         33 :     dep->var_value()->flatten_init_expression(gogo, function, inserter);
    7481                 :            : 
    7482                 :     597723 :   if (this->init_ != NULL && !this->init_is_flattened_)
    7483                 :            :     {
    7484                 :     241070 :       if (this->seen_)
    7485                 :            :         {
    7486                 :            :           // We will give an error elsewhere, this is just to prevent
    7487                 :            :           // an infinite loop.
    7488                 :          0 :           return;
    7489                 :            :         }
    7490                 :     241070 :       this->seen_ = true;
    7491                 :            : 
    7492                 :     241070 :       Statement_inserter global_inserter;
    7493                 :     241070 :       if (this->is_global_)
    7494                 :            :         {
    7495                 :       7056 :           global_inserter = Statement_inserter(gogo, this);
    7496                 :       7056 :           inserter = &global_inserter;
    7497                 :            :         }
    7498                 :            : 
    7499                 :     241070 :       gogo->flatten_expression(function, inserter, &this->init_);
    7500                 :            : 
    7501                 :            :       // If an interface conversion is needed, we need a temporary
    7502                 :            :       // variable.
    7503                 :     241070 :       if (this->type_ != NULL
    7504                 :     241070 :           && !Type::are_identical(this->type_, this->init_->type(),
    7505                 :            :                                   Type::COMPARE_ERRORS | Type::COMPARE_TAGS,
    7506                 :            :                                   NULL)
    7507                 :        218 :           && this->init_->type()->interface_type() != NULL
    7508                 :     241072 :           && !this->init_->is_variable())
    7509                 :            :         {
    7510                 :          0 :           Temporary_statement* temp =
    7511                 :          0 :             Statement::make_temporary(NULL, this->init_, this->location_);
    7512                 :          0 :           inserter->insert(temp);
    7513                 :          0 :           this->init_ = Expression::make_temporary_reference(temp,
    7514                 :            :                                                              this->location_);
    7515                 :            :         }
    7516                 :            : 
    7517                 :     241070 :       this->seen_ = false;
    7518                 :     241070 :       this->init_is_flattened_ = true;
    7519                 :            :     }
    7520                 :            : }
    7521                 :            : 
    7522                 :            : // Get the preinit block.
    7523                 :            : 
    7524                 :            : Block*
    7525                 :      47507 : Variable::preinit_block(Gogo* gogo)
    7526                 :            : {
    7527                 :      47507 :   go_assert(this->is_global_);
    7528                 :      47507 :   if (this->preinit_ == NULL)
    7529                 :      11005 :     this->preinit_ = new Block(NULL, this->location());
    7530                 :            : 
    7531                 :            :   // If a global variable has a preinitialization statement, then we
    7532                 :            :   // need to have an initialization function.
    7533                 :      47507 :   gogo->set_need_init_fn();
    7534                 :            : 
    7535                 :      47507 :   return this->preinit_;
    7536                 :            : }
    7537                 :            : 
    7538                 :            : // Add a statement to be run before the initialization expression.
    7539                 :            : 
    7540                 :            : void
    7541                 :      47507 : Variable::add_preinit_statement(Gogo* gogo, Statement* s)
    7542                 :            : {
    7543                 :      47507 :   Block* b = this->preinit_block(gogo);
    7544                 :      47507 :   b->add_statement(s);
    7545                 :      47507 :   b->set_end_location(s->location());
    7546                 :      47507 : }
    7547                 :            : 
    7548                 :            : // Whether this variable has a type.
    7549                 :            : 
    7550                 :            : bool
    7551                 :   14932000 : Variable::has_type() const
    7552                 :            : {
    7553                 :   14932000 :   if (this->type_ == NULL)
    7554                 :            :     return false;
    7555                 :            : 
    7556                 :            :   // A variable created in a type switch case nil does not actually
    7557                 :            :   // have a type yet.  It will be changed to use the initializer's
    7558                 :            :   // type in determine_type.
    7559                 :   13866200 :   if (this->is_type_switch_var_
    7560                 :   13866200 :       && this->type_->is_nil_constant_as_type())
    7561                 :        400 :     return false;
    7562                 :            : 
    7563                 :            :   return true;
    7564                 :            : }
    7565                 :            : 
    7566                 :            : // In an assignment which sets a variable to a tuple of EXPR, return
    7567                 :            : // the type of the first element of the tuple.
    7568                 :            : 
    7569                 :            : Type*
    7570                 :      20270 : Variable::type_from_tuple(Expression* expr, bool report_error) const
    7571                 :            : {
    7572                 :      20270 :   if (expr->map_index_expression() != NULL)
    7573                 :            :     {
    7574                 :      19889 :       Map_type* mt = expr->map_index_expression()->get_map_type();
    7575                 :      19889 :       if (mt == NULL)
    7576                 :          0 :         return Type::make_error_type();
    7577                 :      19889 :       return mt->val_type();
    7578                 :            :     }
    7579                 :        381 :   else if (expr->receive_expression() != NULL)
    7580                 :            :     {
    7581                 :        381 :       Expression* channel = expr->receive_expression()->channel();
    7582                 :        381 :       Type* channel_type = channel->type();
    7583                 :        381 :       if (channel_type->channel_type() == NULL)
    7584                 :          0 :         return Type::make_error_type();
    7585                 :        762 :       return channel_type->channel_type()->element_type();
    7586                 :            :     }
    7587                 :            :   else
    7588                 :            :     {
    7589                 :          0 :       if (report_error)
    7590                 :          0 :         go_error_at(this->location(), "invalid tuple definition");
    7591                 :          0 :       return Type::make_error_type();
    7592                 :            :     }
    7593                 :            : }
    7594                 :            : 
    7595                 :            : // Given EXPR used in a range clause, return either the index type or
    7596                 :            : // the value type of the range, depending upon GET_INDEX_TYPE.
    7597                 :            : 
    7598                 :            : Type*
    7599                 :    1223350 : Variable::type_from_range(Expression* expr, bool get_index_type,
    7600                 :            :                           bool report_error) const
    7601                 :            : {
    7602                 :    1223350 :   Type* t = expr->type();
    7603                 :    1223350 :   if (t->array_type() != NULL
    7604                 :     112728 :       || (t->points_to() != NULL
    7605                 :       4973 :           && t->points_to()->array_type() != NULL
    7606                 :       4973 :           && !t->points_to()->is_slice_type()))
    7607                 :            :     {
    7608                 :    1115600 :       if (get_index_type)
    7609                 :     122106 :         return Type::lookup_integer_type("int");
    7610                 :            :       else
    7611                 :    2980470 :         return t->deref()->array_type()->element_type();
    7612                 :            :     }
    7613                 :     107755 :   else if (t->is_string_type())
    7614                 :            :     {
    7615                 :      19101 :       if (get_index_type)
    7616                 :       2981 :         return Type::lookup_integer_type("int");
    7617                 :            :       else
    7618                 :      16120 :         return Type::lookup_integer_type("int32");
    7619                 :            :     }
    7620                 :      88654 :   else if (t->map_type() != NULL)
    7621                 :            :     {
    7622                 :      87109 :       if (get_index_type)
    7623                 :      62114 :         return t->map_type()->key_type();
    7624                 :            :       else
    7625                 :     112104 :         return t->map_type()->val_type();
    7626                 :            :     }
    7627                 :       1545 :   else if (t->channel_type() != NULL)
    7628                 :            :     {
    7629                 :       1545 :       if (get_index_type)
    7630                 :       3090 :         return t->channel_type()->element_type();
    7631                 :            :       else
    7632                 :            :         {
    7633                 :          0 :           if (report_error)
    7634                 :          0 :             go_error_at(this->location(),
    7635                 :            :                         ("invalid definition of value variable "
    7636                 :            :                          "for channel range"));
    7637                 :          0 :           return Type::make_error_type();
    7638                 :            :         }
    7639                 :            :     }
    7640                 :            :   else
    7641                 :            :     {
    7642                 :          0 :       if (report_error)
    7643                 :          0 :         go_error_at(this->location(), "invalid type for range clause");
    7644                 :          0 :       return Type::make_error_type();
    7645                 :            :     }
    7646                 :            : }
    7647                 :            : 
    7648                 :            : // EXPR should be a channel.  Return the channel's element type.
    7649                 :            : 
    7650                 :            : Type*
    7651                 :       5792 : Variable::type_from_chan_element(Expression* expr, bool report_error) const
    7652                 :            : {
    7653                 :       5792 :   Type* t = expr->type();
    7654                 :       5792 :   if (t->channel_type() != NULL)
    7655                 :      11584 :     return t->channel_type()->element_type();
    7656                 :            :   else
    7657                 :            :     {
    7658                 :          0 :       if (report_error)
    7659                 :          0 :         go_error_at(this->location(), "expected channel");
    7660                 :          0 :       return Type::make_error_type();
    7661                 :            :     }
    7662                 :            : }
    7663                 :            : 
    7664                 :            : // Return the type of the Variable.  This may be called before
    7665                 :            : // Variable::determine_type is called, which means that we may need to
    7666                 :            : // get the type from the initializer.  FIXME: If we combine lowering
    7667                 :            : // with type determination, then this should be unnecessary.
    7668                 :            : 
    7669                 :            : Type*
    7670                 :   65170200 : Variable::type()
    7671                 :            : {
    7672                 :            :   // A variable in a type switch with a nil case will have the wrong
    7673                 :            :   // type here.  This gets fixed up in determine_type, below.
    7674                 :   65170200 :   Type* type = this->type_;
    7675                 :   65170200 :   Expression* init = this->init_;
    7676                 :   65170200 :   if (this->is_type_switch_var_
    7677                 :     826958 :       && type != NULL
    7678                 :   65993800 :       && this->type_->is_nil_constant_as_type())
    7679                 :            :     {
    7680                 :          5 :       Type_guard_expression* tge = this->init_->type_guard_expression();
    7681                 :          0 :       go_assert(tge != NULL);
    7682                 :          5 :       init = tge->expr();
    7683                 :          5 :       type = NULL;
    7684                 :            :     }
    7685                 :            : 
    7686                 :   65170200 :   if (this->seen_)
    7687                 :            :     {
    7688                 :          0 :       if (this->type_ == NULL || !this->type_->is_error_type())
    7689                 :            :         {
    7690                 :          0 :           go_error_at(this->location_, "variable initializer refers to itself");
    7691                 :          0 :           this->type_ = Type::make_error_type();
    7692                 :            :         }
    7693                 :          0 :       return this->type_;
    7694                 :            :     }
    7695                 :            : 
    7696                 :   65170200 :   this->seen_ = true;
    7697                 :            : 
    7698                 :   65170200 :   if (type != NULL)
    7699                 :            :     ;
    7700                 :    7420910 :   else if (this->type_from_init_tuple_)
    7701                 :      19001 :     type = this->type_from_tuple(init, false);
    7702                 :    7401910 :   else if (this->type_from_range_index_ || this->type_from_range_value_)
    7703                 :    1197120 :     type = this->type_from_range(init, this->type_from_range_index_, false);
    7704                 :    6204780 :   else if (this->type_from_chan_element_)
    7705                 :       5623 :     type = this->type_from_chan_element(init, false);
    7706                 :            :   else
    7707                 :            :     {
    7708                 :    6199160 :       go_assert(init != NULL);
    7709                 :    6199160 :       type = init->type();
    7710                 :    6199160 :       go_assert(type != NULL);
    7711                 :            : 
    7712                 :            :       // Variables should not have abstract types.
    7713                 :    6199160 :       if (type->is_abstract())
    7714                 :     671859 :         type = type->make_non_abstract_type();
    7715                 :            : 
    7716                 :    6199160 :       if (type->is_void_type())
    7717                 :          0 :         type = Type::make_error_type();
    7718                 :            :     }
    7719                 :            : 
    7720                 :   65170200 :   this->seen_ = false;
    7721                 :            : 
    7722                 :   65170200 :   return type;
    7723                 :            : }
    7724                 :            : 
    7725                 :            : // Fetch the type from a const pointer, in which case it should have
    7726                 :            : // been set already.
    7727                 :            : 
    7728                 :            : Type*
    7729                 :       7770 : Variable::type() const
    7730                 :            : {
    7731                 :       7770 :   go_assert(this->type_ != NULL);
    7732                 :       7770 :   return this->type_;
    7733                 :            : }
    7734                 :            : 
    7735                 :            : // Set the type if necessary.
    7736                 :            : 
    7737                 :            : void
    7738                 :    2650360 : Variable::determine_type()
    7739                 :            : {
    7740                 :    2650360 :   if (this->determined_type_)
    7741                 :            :     return;
    7742                 :     708345 :   this->determined_type_ = true;
    7743                 :            : 
    7744                 :     708345 :   if (this->preinit_ != NULL)
    7745                 :         56 :     this->preinit_->determine_types();
    7746                 :            : 
    7747                 :            :   // A variable in a type switch with a nil case will have the wrong
    7748                 :            :   // type here.  It will have an initializer which is a type guard.
    7749                 :            :   // We want to initialize it to the value without the type guard, and
    7750                 :            :   // use the type of that value as well.
    7751                 :     708345 :   if (this->is_type_switch_var_
    7752                 :       8273 :       && this->type_ != NULL
    7753                 :     715714 :       && this->type_->is_nil_constant_as_type())
    7754                 :            :     {
    7755                 :         73 :       Type_guard_expression* tge = this->init_->type_guard_expression();
    7756                 :          0 :       go_assert(tge != NULL);
    7757                 :         73 :       this->type_ = NULL;
    7758                 :         73 :       this->init_ = tge->expr();
    7759                 :            :     }
    7760                 :            : 
    7761                 :     708345 :   if (this->init_ == NULL)
    7762                 :     422838 :     go_assert(this->type_ != NULL && !this->type_->is_abstract());
    7763                 :     285507 :   else if (this->type_from_init_tuple_)
    7764                 :            :     {