Skip to content

Commit

Permalink
Update src/stdlib_str2num.f90
Browse files Browse the repository at this point in the history
Co-authored-by: Jeremie Vandenplas <[email protected]>
  • Loading branch information
jalvesz and jvdp1 authored Dec 26, 2023
1 parent abe20e6 commit d7dac73
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/stdlib_str2num.f90
Original file line number Diff line number Diff line change
Expand Up @@ -234,7 +234,7 @@ elemental subroutine to_real_sp(s,v,p,stat)
integer(dp) :: int_wp !> long integer to capture fractional part
integer :: i_exp !> integer to capture whole number part
integer :: exp_aux
integer(1) :: i, pP, pE, val , resp
integer(int8) :: i, pP, pE, val , resp
!----------------------------------------------
stat = 23 !> initialize error status with any number > 0
!----------------------------------------------
Expand Down

0 comments on commit d7dac73

Please sign in to comment.