ada: Fix unescaped quotes when combining fdiagnostics-format=json and gnatdJ
authorGhjuvan Lacambre <lacambre@adacore.com>
Mon, 12 Dec 2022 13:54:47 +0000 (14:54 +0100)
committerMarc Poulhiès <poulhies@adacore.com>
Tue, 3 Jan 2023 09:29:54 +0000 (10:29 +0100)
commit201c21b0e847679645df1af3dd13459274f41047
tree4c75ffc8c0ed19ba0d7fea85f16b0e739b00e246
parent238ff612f2fd88372c585753dd2faa73cb94cbb5
ada: Fix unescaped quotes when combining fdiagnostics-format=json and gnatdJ

This commit fixes a small bug where GNAT would emit unescaped quotes in
its -fdiagnostics-format=json output when using -gnatdJ and emitting
messages about operator functions (e.g. "=").

gcc/ada/

* errout.adb (Write_JSON_Span): Escape subprogram name.
gcc/ada/errout.adb