From 6447a675e44d32b2fcbdb5a2e107951da614846e Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Laurent=20Th=C3=A9venoux?= <thevenoux@adacore.com>
Date: Wed, 3 Apr 2024 14:36:31 +0200
Subject: [PATCH] gnat_compare: fix short flag for --skip-gprclean option

Short flag used for `--skip-gprclean` was set to `-C` which is already
taken as the short for `--charset`. Changing it to `-sc` instead.
---
 testsuite/ada/gnat_compare/gnat_compare.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/testsuite/ada/gnat_compare/gnat_compare.adb b/testsuite/ada/gnat_compare/gnat_compare.adb
index e6b835fe6..71e11b988 100644
--- a/testsuite/ada/gnat_compare/gnat_compare.adb
+++ b/testsuite/ada/gnat_compare/gnat_compare.adb
@@ -75,7 +75,7 @@ procedure GNAT_Compare is
          "Skip the build of the project to process");
 
       package Skip_GPRclean is new Parse_Flag
-        (App.Args.Parser, "-C", "--skip-gprclean",
+        (App.Args.Parser, "-sc", "--skip-gprclean",
          "Skip the run of gprclean at the end of gnat_compare execution");
    end Args;