1 files changed, 8 insertions, 0 deletions
diff --git a/libgfortran/io/size_from_kind.c b/libgfortran/io/size_from_kind.c
index 6601a0f9a44..f09e3409de4 100644
--- a/libgfortran/io/size_from_kind.c
+++ b/libgfortran/io/size_from_kind.c
@@ -49,6 +49,10 @@ size_from_real_kind (int kind)
     case 16:
       return sizeof (GFC_REAL_16);
 #endif
+#ifdef HAVE_GFC_REAL_17
+    case 17:
+      return sizeof (GFC_REAL_17);
+#endif
     default:
       return kind;
     }
@@ -76,6 +80,10 @@ size_from_complex_kind (int kind)
     case 16:
       return sizeof (GFC_COMPLEX_16);
 #endif
+#ifdef HAVE_GFC_COMPLEX_17
+    case 17:
+      return sizeof (GFC_COMPLEX_17);
+#endif
     default:
       return 2 * kind;
     }