Fortran: Revert explicit memcpy in gfc_get_typebound_proc

This reverts the hunk to gfc_get_typebound_proc from
7883a7f07c

gcc/fortran/ChangeLog:

	* symbol.c (gfc_get_typebound_proc): Revert memcpy.
This commit is contained in:
Bernhard Reutner-Fischer 2021-10-31 23:21:36 +01:00
parent ca84f39399
commit 6ea6c05a8d

View file

@ -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);