Bexpression*
function_code_expression(Bfunction*, Location);
+ Bexpression*
+ address_expression(Bexpression*, Location);
+
// Statements.
Bstatement*
return this->make_expression(ret);
}
+// Get the address of an expression.
+
+Bexpression*
+Gcc_backend::address_expression(Bexpression* bexpr, Location location)
+{
+ tree expr = bexpr->get_tree();
+ if (expr == error_mark_node)
+ return this->error_expression();
+
+ tree ret = build_fold_addr_expr_loc(location.gcc_location(), expr);
+ return this->make_expression(ret);
+}
+
// An expression as a statement.
Bstatement*
// Otherwise it is the interface method table for RHS_TYPE.
tree first_field_value;
if (lhs_is_empty)
- first_field_value = rhs_type->type_descriptor_pointer(gogo, location);
+ {
+ Bexpression* rhs_bexpr =
+ rhs_type->type_descriptor_pointer(gogo, location);
+ first_field_value = expr_to_tree(rhs_bexpr);
+ }
else
{
// Build the interface method table for this interface and this
if (for_type_guard)
{
// A type assertion fails when converting a nil interface.
- tree lhs_type_descriptor = lhs_type->type_descriptor_pointer(gogo,
- location);
+ Bexpression* lhs_type_expr = lhs_type->type_descriptor_pointer(gogo,
+ location);
+ tree lhs_type_descriptor = expr_to_tree(lhs_type_expr);
static tree assert_interface_decl;
tree call = Gogo::call_builtin(&assert_interface_decl,
location,
// type assertion converting nil will always succeed.
go_assert(strcmp(IDENTIFIER_POINTER(DECL_NAME(field)), "__methods")
== 0);
- tree lhs_type_descriptor = lhs_type->type_descriptor_pointer(gogo,
- location);
+ Bexpression* lhs_type_expr = lhs_type->type_descriptor_pointer(gogo,
+ location);
+ tree lhs_type_descriptor = expr_to_tree(lhs_type_expr);
+
static tree convert_interface_decl;
tree call = Gogo::call_builtin(&convert_interface_decl,
location,
// Call a function to check that the type is valid. The function
// will panic with an appropriate runtime type error if the type is
// not valid.
-
- tree lhs_type_descriptor = lhs_type->type_descriptor_pointer(gogo, location);
+ Bexpression* lhs_type_expr = lhs_type->type_descriptor_pointer(gogo,
+ location);
+ tree lhs_type_descriptor = expr_to_tree(lhs_type_expr);
if (!DECL_P(rhs_tree))
rhs_tree = save_expr(rhs_tree);
Expression::get_interface_type_descriptor(context, rhs_type, rhs_tree,
location);
- tree rhs_inter_descriptor = rhs_type->type_descriptor_pointer(gogo,
- location);
+ Bexpression* rhs_inter_expr = rhs_type->type_descriptor_pointer(gogo,
+ location);
+ tree rhs_inter_descriptor = expr_to_tree(rhs_inter_expr);
static tree check_interface_type_decl;
tree call = Gogo::call_builtin(&check_interface_type_decl,
}
arg = fold_convert_loc(location.gcc_location(), ptr_type_node, arg);
- tree descriptor = right_type->type_descriptor_pointer(context->gogo(),
- location);
+ Bexpression* descriptor_bexpr =
+ right_type->type_descriptor_pointer(context->gogo(), location);
+ tree descriptor = expr_to_tree(descriptor_bexpr);
if (left_type->interface_type()->is_empty())
{
valaddr = build_fold_addr_expr(tmp);
}
- tree descriptor = mt->map_descriptor_pointer(gogo, loc);
+ Bexpression* bdescriptor = mt->map_descriptor_pointer(gogo, loc);
+ tree descriptor = expr_to_tree(bdescriptor);
tree type_tree = type_to_tree(this->type_->get_backend(gogo));
if (type_tree == error_mark_node)
tree
do_get_tree(Translate_context* context)
{
- return this->type_->type_descriptor_pointer(context->gogo(),
- this->location());
+ Bexpression* ret = this->type_->type_descriptor_pointer(context->gogo(),
+ this->location());
+ return expr_to_tree(ret);
}
void
tree
do_get_tree(Translate_context* context)
{
- return this->type_->map_descriptor_pointer(context->gogo(),
- this->location());
+ Bexpression* ret = this->type_->map_descriptor_pointer(context->gogo(),
+ this->location());
+ return expr_to_tree(ret);
}
void
// Return a pointer to the type descriptor for this type.
-tree
+Bexpression*
Type::type_descriptor_pointer(Gogo* gogo, Location location)
{
Type* t = this->forwarded();
t->make_type_descriptor_var(gogo);
go_assert(t->type_descriptor_var_ != NULL);
}
- tree var_tree = var_to_tree(t->type_descriptor_var_);
- if (var_tree == error_mark_node)
- return error_mark_node;
- return build_fold_addr_expr_loc(location.gcc_location(), var_tree);
+ Bexpression* var_expr =
+ gogo->backend()->var_expression(t->type_descriptor_var_, location);
+ return gogo->backend()->address_expression(var_expr, location);
}
// A mapping from unnamed types to type descriptor variables.
// Build a map descriptor for this type. Return a pointer to it.
-tree
+Bexpression*
Map_type::map_descriptor_pointer(Gogo* gogo, Location location)
{
Bvariable* bvar = this->map_descriptor(gogo);
- tree var_tree = var_to_tree(bvar);
- if (var_tree == error_mark_node)
- return error_mark_node;
- return build_fold_addr_expr_loc(location.gcc_location(), var_tree);
+ Bexpression* var_expr = gogo->backend()->var_expression(bvar, location);
+ return gogo->backend()->address_expression(var_expr, location);
}
// Build a map descriptor for this type.