[Bug libfortran/118536] G formatted printing of UNSIGNED fails

[anlauf at gcc dot gnu.org via Gcc-bugs]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=118536

anlauf at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Assignee|unassigned at gcc dot gnu.org      |anlauf at gcc dot 
gnu.org

--- Comment #2 from anlauf at gcc dot gnu.org ---
(In reply to anlauf from comment #1)
> Patch:

Should rather be:

diff --git a/libgfortran/io/transfer.c b/libgfortran/io/transfer.c
index 0177e052062..b3b72f39c5b 100644
--- a/libgfortran/io/transfer.c
+++ b/libgfortran/io/transfer.c
@@ -2365,6 +2365,9 @@ formatted_transfer_scalar_write (st_parameter_dt *dtp, bt
type, void *p, int kin
              case BT_INTEGER:
                write_i (dtp, f, p, kind);
                break;
+             case BT_UNSIGNED:
+               write_iu (dtp, f, p, kind);
+               break;
              case BT_LOGICAL:
                write_l (dtp, f, p, kind);
                break;