Update src/stdlib_str2num.f90

Co-authored-by: Jeremie Vandenplas <[email protected]>
fortran-lang · Dec 26, 2023 · 318e4ac · 318e4ac
1 parent 2320766
commit 318e4ac
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/src/stdlib_str2num.f90 b/src/stdlib_str2num.f90
@@ -190,10 +190,10 @@ elemental subroutine to_int_32(s,v,p,stat)
         ! -- In/out Variables
         character(*), intent(in) :: s !> input string
         integer, intent(inout)  :: v !> Output real value
-        integer(1), intent(out)  :: p !> position within the number
-        integer(1), intent(out)  :: stat !> status upon succes or failure to read
+        integer(int8), intent(out)  :: p !> position within the number
+        integer(int8), intent(out)  :: stat !> status upon succes or failure to read
         ! -- Internal Variables
-        integer(1)  :: val 
+        integer(int8)  :: val 
         !----------------------------------------------
         stat = 23 !> initialize error status with any number > 0
         !----------------------------------------------