diff options
| author | Bernhard Reutner-Fischer <aldot@gcc.gnu.org> | 2021-10-31 23:21:36 +0100 |
|---|---|---|
| committer | Bernhard Reutner-Fischer <aldot@gcc.gnu.org> | 2021-10-31 23:30:19 +0100 |
| commit | 6ea6c05a8d4354b25c6c18c1b60e1f5a06d25f66 (patch) | |
| tree | 92d3874cf740ac39e48cdfc00e79324015551ea0 | |
| parent | ca84f39399fda80c770306465276ffd66d3766ed (diff) | |
| download | gcc-6ea6c05a8d4354b25c6c18c1b60e1f5a06d25f66.zip gcc-6ea6c05a8d4354b25c6c18c1b60e1f5a06d25f66.tar.gz gcc-6ea6c05a8d4354b25c6c18c1b60e1f5a06d25f66.tar.bz2 | |
Fortran: Revert explicit memcpy in gfc_get_typebound_proc
This reverts the hunk to gfc_get_typebound_proc from
7883a7f07c1ad9c8aaccc5bbd96e0ae1fa230c89
gcc/fortran/ChangeLog:
* symbol.c (gfc_get_typebound_proc): Revert memcpy.
| -rw-r--r-- | gcc/fortran/symbol.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/symbol.c b/gcc/fortran/symbol.c index 34c0ba2..d6f53f4 100644 --- a/gcc/fortran/symbol.c +++ b/gcc/fortran/symbol.c @@ -5073,7 +5073,7 @@ gfc_get_typebound_proc (gfc_typebound_proc *tb0) result = XCNEW (gfc_typebound_proc); if (tb0) - memcpy (result, tb0, sizeof (gfc_typebound_proc)); + *result = *tb0; result->error = 1; latest_undo_chgset->tbps.safe_push (result); |