diff options
| author | Ronan Desplanques <desplanques@adacore.com> | 2022-11-04 16:54:35 +0100 |
|---|---|---|
| committer | Marc Poulhiès <poulhies@adacore.com> | 2022-11-21 11:10:31 +0100 |
| commit | 6d0d71ea1c685df245f3c11a5daf52843823cd58 (patch) | |
| tree | a25e8a0ad67d3a43b601ec43bf6f4ca05108f6c0 | |
| parent | 8bebbf7b463693316a1518ba31c04648cb629b23 (diff) | |
| download | gcc-6d0d71ea1c685df245f3c11a5daf52843823cd58.zip gcc-6d0d71ea1c685df245f3c11a5daf52843823cd58.tar.gz gcc-6d0d71ea1c685df245f3c11a5daf52843823cd58.tar.bz2 | |
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.
| -rw-r--r-- | gcc/ada/sfn_scan.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/sfn_scan.adb b/gcc/ada/sfn_scan.adb index b428ed7..8ee9a09 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) = ';'; |