Update src/stdlib_str2num.f90

Co-authored-by: Jeremie Vandenplas <[email protected]>

Author: jalvesz

src/stdlib_str2num.f90

@@ -417,7 +417,7 @@ subroutine to_real_qp(s,v,p,stat)
         real(wp), parameter :: fractional_base(nfnb)   = [(10._wp**(-e),e=1,nfnb)]
         real(wp), parameter :: expbase(nwnb+nfnb) = [whole_number_base, fractional_base]
 
-        integer(1)  :: sign, sige !> sign of integer number and exponential
+        integer(int8)  :: sign, sige !> sign of integer number and exponential
         integer, parameter :: maxdpt = 19 !> Maximum depth to read values on int_dp
         integer(dp) :: int_dp1, int_dp2 !> long integers to capture whole and fractional part
         integer     :: i_exp !> integer to capture exponent number