gdb/fortran: Fix printing of logical true values for Flang
authorAndrew Burgess <andrew.burgess@embecosm.com>
Mon, 2 Mar 2020 18:08:49 +0000 (18:08 +0000)
committerAndrew Burgess <andrew.burgess@embecosm.com>
Tue, 3 Mar 2020 18:20:18 +0000 (18:20 +0000)
commit5e5d66b6a46c7b0353308bfb508b96a59f1addbf
tree6f253eff4c7af4858fcf1bc0f2955a0b6f30f042
parent584cf46d0ab5960cca76bfaf414cee5641166868
gdb/fortran: Fix printing of logical true values for Flang

GDB is not able to print logical true values for Flang compiler.

Actual result:

  (gdb) p l
  $1 = 4294967295

Expected result:

  (gdb) p l
  $1 = .TRUE.

This is due to GDB expecting representation of true value being 1.
The Fortran standard doesnt specify how LOGICAL types are represented.
Different compilers use different non-zero values to represent logical
true. The gfortran compiler uses 1 to represent logical true and the
flang compiler uses -1. GDB should accept all the non-zero values as
true.

This is achieved by handling TYPE_CODE_BOOL in f_val_print and
printing any non-zero value as true.

gdb/ChangeLog:

* f-valprint.c (f_val_print): Handle TYPE_CODE_BOOL, any non-zero
value should be printed as true.

gdb/testsuite/ChangeLog:

* gdb.fortran/logical.exp: Add tests that any non-zero value is
printed as true.
gdb/ChangeLog
gdb/f-valprint.c
gdb/testsuite/ChangeLog
gdb/testsuite/gdb.fortran/logical.exp