[gcc(refs/users/pheeck/heads/sccp)] ada: Fix gnatmake's parsing of adc files

[gcc(refs/users/pheeck/heads/sccp)] ada: Fix gnatmake's parsing of adc files

[Filip Kastl]

https://gcc.gnu.org/g:93f4d6edfa14d06eb1fadd3bc2cfcc67a2e284da

commit 93f4d6edfa14d06eb1fadd3bc2cfcc67a2e284da
Author: Ronan Desplanques <desplanques@adacore.com>
Date:   Fri Nov 4 16:54:35 2022 +0100

    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.

Diff:
---
 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 b428ed7f0cf..8ee9a0968f3 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) = ';';