From 65c3a8767f9ab0af7bca9684e4712e54f3f578e9 Mon Sep 17 00:00:00 2001
From: Mark Danial <mark.danial@ibm.com>
Date: Thu, 30 Jan 2025 10:41:39 -0500
Subject: [PATCH] Mark real10 testcase as unsupported on AIX

---
 flang/test/Semantics/kinds04_q10.f90 | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/flang/test/Semantics/kinds04_q10.f90 b/flang/test/Semantics/kinds04_q10.f90
index aa5c4abe2f1df..be1f7f51da3a6 100644
--- a/flang/test/Semantics/kinds04_q10.f90
+++ b/flang/test/Semantics/kinds04_q10.f90
@@ -5,6 +5,8 @@
 ! C717 The value of kind-param shall specify an approximation method that
 ! exists on the processor.
 
+! UNSUPPORTED: system-aix
+
 subroutine s(var)
   real :: realvar1 = 4.0E6_4
   real :: realvar2 = 4.0D6