From 6d0d71ea1c685df245f3c11a5daf52843823cd58 Mon Sep 17 00:00:00 2001
From: Ronan Desplanques <desplanques@adacore.com>
Date: Fri, 4 Nov 2022 16:54:35 +0100
Subject: [PATCH] ada: Fix gnatmake's parsing of adc files
Before this patch, gnatmake's parser for adc files failed to ignore
semicolons located inside comments. This patch fixes that behavior.
gcc/ada/
* sfn_scan.adb (Scan_SFN_Pragmas): Improve handling of comments.
---
gcc/ada/sfn_scan.adb | 1 +
1 file changed, 1 insertion(+)
diff --git a/gcc/ada/sfn_scan.adb b/gcc/ada/sfn_scan.adb
index b428ed7f0cf5..8ee9a0968f34 100644
--- a/gcc/ada/sfn_scan.adb
+++ b/gcc/ada/sfn_scan.adb
@@ -583,6 +583,7 @@ package body SFN_Scan is
else
Skip_Loop : loop
+ Skip_WS;
exit Main_Scan_Loop when At_EOF;
exit Skip_Loop when S (P) = ';';
--
GitLab