<table border="1" cellspacing="0" cellpadding="8">
<tr>
<th>Issue</th>
<td>
<a href=https://github.com/llvm/llvm-project/issues/119021>119021</a>
</td>
</tr>
<tr>
<th>Summary</th>
<td>
[flang] Allow redundant type specifications
</td>
</tr>
<tr>
<th>Labels</th>
<td>
flang
</td>
</tr>
<tr>
<th>Assignees</th>
<td>
</td>
</tr>
<tr>
<th>Reporter</th>
<td>
psteinfeld
</td>
</tr>
</table>
<pre>
Redundant type specifications are allowed with a warning in nvfortran and xlf. All other compilers I've tested emit fatal error messages.
Here's the test program I used:
```
integer :: xx
integer,volatile :: xx
end
```
</pre>
<img width="1px" height="1px" alt="" src="http://email.email.llvm.org/o/eJx8kcGKpDwUhZ8mbi4tSdRSF1nU_zfF9HbeIJqrZoiJ5F6t6rcfrC6Yns1AIJCccziczxL5OSIa0fwnmvfC7rykbDZi9HHC4IohuU_zE90enY0M_Lkh0Iajn_xo2adIYDOCDSHd0cHd8wIW7jZHH2fwEeIxpczZRrDRwSNMJcA1BEi8YIYxrZsPmAk-hG4PBEZidICrZ5gs2wCYc8qwIpGdkUohr0Jef2BGoVsCXr48sOU0Z7vCB-yETlSnSlzk68grgI-MM2Y4_6orPB7fX4X-_0jBsg_4lwCj-x5UOFO5vuptgUa1VdWoplN1sZjOtUM1dKpvm85KNV4aWQ9u6FVXVbruu8IbLXWttLxoqaSqS9mNvez6S6Nle3FdLWqJq_WhDOFYy5TnwhPtaJTqpVZFsAMGeoLSego2zkLrk1k2p-Ft2GcStQyemP5EsOfwpPvlaN7P7dMd8r-IFnsOZmHe6FxC34S-zZ6XfSjHtAp9O9Nf19uW0y8cWejbsy0JfXsVPoz-HQAA___tL8IK">