From 6ea6c05a8d4354b25c6c18c1b60e1f5a06d25f66 Mon Sep 17 00:00:00 2001 From: Bernhard Reutner-Fischer Date: Sun, 31 Oct 2021 23:21:36 +0100 Subject: [PATCH] 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. --- gcc/fortran/symbol.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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); -- 2.7.4