diff --git a/src/stdlib_str2num.f90 b/src/stdlib_str2num.f90
index 6e903045c..1f3eb2cb4 100644
--- a/src/stdlib_str2num.f90
+++ b/src/stdlib_str2num.f90
@@ -218,8 +218,8 @@ elemental subroutine to_real_sp(s,v,p,stat)
         ! -- In/out Variables
         character(*), intent(in) :: s !> input string
         real(wp), intent(inout)  :: v !> Output real value
-        integer(1), intent(out)  :: p !> last position within the string
-        integer(1), intent(out)  :: stat !> status upon success or failure to read
+        integer(int8), intent(out)  :: p !> last position within the string
+        integer(int8), intent(out)  :: stat !> status upon success or failure to read
 
         ! -- Internal Variables
         integer(kind=ikind), parameter :: nwnb = 39 !> number of whole number factors