aboutsummaryrefslogtreecommitdiff
path: root/gcc/d/expr.cc
diff options
context:
space:
mode:
authorThomas Schwinge <tschwinge@baylibre.com>2024-03-11 22:51:28 +0100
committerThomas Schwinge <tschwinge@baylibre.com>2024-03-11 22:51:28 +0100
commita95e21151a6366e7344d0f1983f99e318c5a7097 (patch)
tree11d987406d9ce8399ec1736477d971ef09344df2 /gcc/d/expr.cc
parent02d394b2736afa9a24ab3e1b8ad56fd6ac37e0f4 (diff)
parentaf4bb221153359f5948da917d5ef2df738bb1e61 (diff)
downloadgcc-a95e21151a6366e7344d0f1983f99e318c5a7097.zip
gcc-a95e21151a6366e7344d0f1983f99e318c5a7097.tar.gz
gcc-a95e21151a6366e7344d0f1983f99e318c5a7097.tar.bz2
Merge commit 'af4bb221153359f5948da917d5ef2df738bb1e61' into HEAD
Diffstat (limited to 'gcc/d/expr.cc')
-rw-r--r--gcc/d/expr.cc18
1 files changed, 15 insertions, 3 deletions
diff --git a/gcc/d/expr.cc b/gcc/d/expr.cc
index 7038655..52243e6 100644
--- a/gcc/d/expr.cc
+++ b/gcc/d/expr.cc
@@ -2050,6 +2050,9 @@ public:
tree result = get_decl_tree (e->var);
TREE_USED (result) = 1;
+ if (e->var->isFuncDeclaration ())
+ result = maybe_reject_intrinsic (result);
+
if (declaration_reference_p (e->var))
gcc_assert (POINTER_TYPE_P (TREE_TYPE (result)));
else
@@ -2535,13 +2538,13 @@ public:
{
/* Copy the string contents to a null terminated string. */
dinteger_t length = (e->len * e->sz);
- char *string = XALLOCAVEC (char, length + 1);
+ char *string = XALLOCAVEC (char, length + e->sz);
+ memset (string, 0, length + e->sz);
if (length > 0)
memcpy (string, e->string, length);
- string[length] = '\0';
/* String value and type includes the null terminator. */
- tree value = build_string (length, string);
+ tree value = build_string (length + e->sz, string);
TREE_TYPE (value) = make_array_type (tb->nextOf (), length + 1);
value = build_address (value);
@@ -2725,6 +2728,15 @@ public:
void visit (AssocArrayLiteralExp *e) final override
{
+ if (e->lowering != NULL)
+ {
+ /* When an associative array literal gets lowered, it's converted into a
+ struct literal suitable for static initialization. */
+ gcc_assert (this->constp_);
+ this->result_ = build_expr (e->lowering, this->constp_, true);
+ return ;
+ }
+
/* Want the mutable type for typeinfo reference. */
Type *tb = e->type->toBasetype ()->mutableOf ();