[Ada] Set Etype on rewriteen Max_Queue_Length expressions
authorPiotr Trojanek <trojanek@adacore.com>
Thu, 31 May 2018 10:46:17 +0000 (10:46 +0000)
committerPierre-Marie de Rodat <pmderodat@gcc.gnu.org>
Thu, 31 May 2018 10:46:17 +0000 (10:46 +0000)
commit7366d29a546c6ea55a6fe8d2a131dc16c892f4b3
tree5849e0224885534be42afc8a5370b15b55a7909d
parent81a95941f966dd1c0e4e2d368e0d7441f0776482
[Ada] Set Etype on rewriteen Max_Queue_Length expressions

Rewriting of Max_Queue_Length expression into N_Integer_Literal should probably
be done in expansion and not in analysis, but anyway it should not strip the
expression from its Etype because backends (e.g. GNATprove) expect that Etype
to be present.

No frontend test is provided, because GNAT doesn't care about the missing
Etype decoration. This patch allows to simplify AST processing in GNATprove.

2018-05-31  Piotr Trojanek  <trojanek@adacore.com>

gcc/ada/

* sem_prag.adb (Analyze_Pragma): Set Etype on the rewritten
Max_Queue_Length expression.

From-SVN: r261002
gcc/ada/ChangeLog
gcc/ada/sem_prag.adb