Skip to content

Remove some unused variables and simplify use of ieee_value #211

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
merged 4 commits into from
Jun 5, 2020

Conversation

jvdp1
Copy link
Member

@jvdp1 jvdp1 commented Jun 4, 2020

I removed some unused variables and I modified the call to ieee_value in stdlib_experimental_stats_mean.fypp to be in agreement with the other submodules.

@jvdp1 jvdp1 requested review from certik and milancurcic June 4, 2020 16:43
@@ -19,7 +19,7 @@ contains
${t1}$ :: res

if (.not.optval(mask, .true.)) then
res = ieee_value(real(res, kind=${k1}$), ieee_quiet_nan)
res = ieee_value(1._${k1}$, ieee_quiet_nan)
Copy link
Member Author

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Note: this line (as written before) generated a Run-Time Check Failure with ifort because res is used without being defined.

Copy link
Member

@certik certik left a comment

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Looks good.

@jvdp1
Copy link
Member Author

jvdp1 commented Jun 5, 2020

Thanks @certik .
Because it only removes some unused variables and fixes an issue for ifort, I'll merge it after solving the conflicting file.

@jvdp1 jvdp1 merged commit a1b9a91 into fortran-lang:master Jun 5, 2020
@jvdp1 jvdp1 deleted the some_cleaning branch June 5, 2020 15:47
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

Successfully merging this pull request may close these issues.

2 participants