public inbox for gdb-cvs@sourceware.org help / color / mirror / Atom feed
From: Nils-Christian Kempke <nckempke@sourceware.org> To: gdb-cvs@sourceware.org Subject: [binutils-gdb] gdb/fortran: reformat build_fortran_types in f-lang.c Date: Mon, 11 Apr 2022 12:08:49 +0000 (GMT) [thread overview] Message-ID: <20220411120849.5D951385CFC0@sourceware.org> (raw) https://sourceware.org/git/gitweb.cgi?p=binutils-gdb.git;h=ed9ec61174d955a1cb79f4b96dd5339d3e4013ca commit ed9ec61174d955a1cb79f4b96dd5339d3e4013ca Author: Nils-Christian Kempke <nils-christian.kempke@intel.com> Date: Mon Apr 11 14:06:55 2022 +0200 gdb/fortran: reformat build_fortran_types in f-lang.c Add a few newlines after the type definitions and remove some unnecessary linebreaks. Diff: --- gdb/f-lang.c | 18 ++++++++---------- 1 file changed, 8 insertions(+), 10 deletions(-) diff --git a/gdb/f-lang.c b/gdb/f-lang.c index 3c3ca0c0d71..80846244dfb 100644 --- a/gdb/f-lang.c +++ b/gdb/f-lang.c @@ -1620,39 +1620,36 @@ build_fortran_types (struct gdbarch *gdbarch) = arch_boolean_type (gdbarch, TARGET_CHAR_BIT, 1, "logical*1"); builtin_f_type->builtin_integer_s1 - = arch_integer_type (gdbarch, TARGET_CHAR_BIT, 0, - "integer*1"); + = arch_integer_type (gdbarch, TARGET_CHAR_BIT, 0, "integer*1"); builtin_f_type->builtin_integer_s2 - = arch_integer_type (gdbarch, gdbarch_short_bit (gdbarch), 0, - "integer*2"); + = arch_integer_type (gdbarch, gdbarch_short_bit (gdbarch), 0, "integer*2"); builtin_f_type->builtin_integer_s8 = arch_integer_type (gdbarch, gdbarch_long_long_bit (gdbarch), 0, "integer*8"); builtin_f_type->builtin_logical_s2 - = arch_boolean_type (gdbarch, gdbarch_short_bit (gdbarch), 1, - "logical*2"); + = arch_boolean_type (gdbarch, gdbarch_short_bit (gdbarch), 1, "logical*2"); builtin_f_type->builtin_logical_s8 = arch_boolean_type (gdbarch, gdbarch_long_long_bit (gdbarch), 1, "logical*8"); builtin_f_type->builtin_integer - = arch_integer_type (gdbarch, gdbarch_int_bit (gdbarch), 0, - "integer"); + = arch_integer_type (gdbarch, gdbarch_int_bit (gdbarch), 0, "integer"); builtin_f_type->builtin_logical - = arch_boolean_type (gdbarch, gdbarch_int_bit (gdbarch), 1, - "logical*4"); + = arch_boolean_type (gdbarch, gdbarch_int_bit (gdbarch), 1, "logical*4"); builtin_f_type->builtin_real = arch_float_type (gdbarch, gdbarch_float_bit (gdbarch), "real", gdbarch_float_format (gdbarch)); + builtin_f_type->builtin_real_s8 = arch_float_type (gdbarch, gdbarch_double_bit (gdbarch), "real*8", gdbarch_double_format (gdbarch)); + auto fmt = gdbarch_floatformat_for_type (gdbarch, "real(kind=16)", 128); if (fmt != nullptr) builtin_f_type->builtin_real_s16 @@ -1667,6 +1664,7 @@ build_fortran_types (struct gdbarch *gdbarch) builtin_f_type->builtin_complex = init_complex_type ("complex*4", builtin_f_type->builtin_real); + builtin_f_type->builtin_complex_s8 = init_complex_type ("complex*8", builtin_f_type->builtin_real_s8);
reply other threads:[~2022-04-11 12:08 UTC|newest] Thread overview: [no followups] expand[flat|nested] mbox.gz Atom feed
Reply instructions: You may reply publicly to this message via plain-text email using any one of the following methods: * Save the following mbox file, import it into your mail client, and reply-to-all from there: mbox Avoid top-posting and favor interleaved quoting: https://en.wikipedia.org/wiki/Posting_style#Interleaved_style * Reply using the --to, --cc, and --in-reply-to switches of git-send-email(1): git send-email \ --in-reply-to=20220411120849.5D951385CFC0@sourceware.org \ --to=nckempke@sourceware.org \ --cc=gdb-cvs@sourceware.org \ /path/to/YOUR_REPLY https://kernel.org/pub/software/scm/git/docs/git-send-email.html * If your mail client supports setting the In-Reply-To header via mailto: links, try the mailto: linkBe sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions for how to clone and mirror all data and code used for this inbox; as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).