Skip to content

Commit 798e43d

Browse files
jalveszjvdp1
andauthored
Update src/stdlib_str2num.f90
Co-authored-by: Jeremie Vandenplas <[email protected]>
1 parent d5e8696 commit 798e43d

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/stdlib_str2num.f90

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -328,7 +328,7 @@ elemental subroutine to_real_dp(s,v,p,stat)
328328
integer(wp) :: int_wp !> long integer to capture fractional part
329329
integer :: i_exp !> integer to capture whole number part
330330
integer :: exp_aux
331-
integer(1) :: i, pP, pE, val , resp
331+
integer(int8) :: i, pP, pE, val , resp
332332
!----------------------------------------------
333333
stat = 23 !> initialize error status with any number > 0
334334
!----------------------------------------------

0 commit comments

Comments
 (0)