gdb/fortran: Add Fortran 'kind' intrinsic and keyword

[deliverable/binutils-gdb.git] / gdb / expprint.c

diff --git a/gdb/expprint.c b/gdb/expprint.c
index d7ad1a71878077f22a2028eeef2e874e57d2512e..a22499f4833b2379bc08323718bf1d5dec5e602f 100644 (file)
--- a/gdb/expprint.c
+++ b/gdb/expprint.c
@@ -869,6 +869,7 @@ dump_subexp_body_standard (struct expression *exp,
     case UNOP_MIN:
     case UNOP_ODD:
     case UNOP_TRUNC:
+    case UNOP_KIND:
       elt = dump_subexp (exp, stream, elt);
       break;
     case OP_LONG: