Commit 4569999
committed
Merge branch 'atmosphere/ra_cam_support_BOZ_Fix' into hotfix-v7.1 (PR #736)
This merge corrects a non-standard BOZ-literal constant in module_ra_cam_support.
The GNU 10.1.0 compiler identified a non-standard BOZ-literal constant in
module_ra_cam_support.F, failing to compile this file with the following error:
module_ra_cam_support.F:11:35:
11 | integer, parameter:: bigint = O'17777777777' ! largest possible 32-bit integer
| 1
Error: BOZ literal constant at (1) is neither a data-stmt-constant nor an actual argument to INT, REAL, DBLE, or CMPLX intrinsic function [see ‘-fno-allow-invalid-boz’]
As per the Fortran 2003 standard, this constant should be typed with the INT
intrinsic (or be used in a data statement):
4.4.1 Integer type
C410 (R411) A boz-literal-constant shall appear only as a data-stmt-constant in
a DATA statement, as the actual argument associated with the dummy argument A of
the numeric intrinsic functions DBLE, REAL or INT, or as the actual argument
associated with the X or Y dummy argument of the intrinsic function CMPLX.
This merge uses the INT intrinsic with an argument of O'17777777777' to
initialize the bigint parameter.
* atmosphere/ra_cam_support_BOZ_Fix:
Fix non-standard BOZ-literal integer constant in module_ra_cam_support1 file changed
Lines changed: 1 addition & 1 deletion
Lines changed: 1 addition & 1 deletion
| Original file line number | Diff line number | Diff line change | |
|---|---|---|---|
| |||
8 | 8 | | |
9 | 9 | | |
10 | 10 | | |
11 | | - | |
| 11 | + | |
12 | 12 | | |
13 | 13 | | |
14 | 14 | | |
| |||
0 commit comments