summaryrefslogtreecommitdiffstats
path: root/contrib/gcc/f/bld.c
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/gcc/f/bld.c')
-rw-r--r--contrib/gcc/f/bld.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/contrib/gcc/f/bld.c b/contrib/gcc/f/bld.c
index ec7c5cd6..d300069 100644
--- a/contrib/gcc/f/bld.c
+++ b/contrib/gcc/f/bld.c
@@ -1333,7 +1333,7 @@ ffebld_constant_new_real2_val (ffetargetReal2 val)
nc = malloc_new_kp (ffebld_constant_pool(),
"FFEBLD_constREAL2",
sizeof (*nc));
- nc->consttype = FFEBLD_constREAL1;
+ nc->consttype = FFEBLD_constREAL2;
nc->u.real2 = val;
nc->hook = FFECOM_constantNULL;
nc->llink = NULL;
OpenPOWER on IntegriCloud