Revert "Update stdlib_ascii.f90"

This reverts commit 0b60a39.

Author: arjenmarkus

src/stdlib_ascii.f90

@@ -98,7 +98,6 @@ pure logical function is_control(c)
     pure logical function is_digit(c)
         character(len=1), intent(in) :: c !! The character to test.
         integer :: ic
-        ic = iachar(c)
         is_digit = (iachar('0') <= ic) .and. (ic <= iachar('9'))
     end function
 
@@ -111,7 +110,7 @@ pure logical function is_octal_digit(c)
     end function
 
     !> Checks whether `c` is a digit in base 16 (0 .. 9, A .. F, a .. f).
-    pure logical function is_hex_digit(c)
+    pure logical function is_hex_digit(cin)
         character(len=1), intent(in) :: c !! The character to test.
         integer :: ic
         ic = iachar(c)
@@ -149,7 +148,7 @@ pure logical function is_printable(c)
     end function
 
     !> Checks whether `c` is a lowercase ASCII letter (a .. z).
-    pure logical function is_lower(c)
+    pure logical function is_lower(cin)
         character(len=1), intent(in) :: c !! The character to test.
         is_lower = (c >= 'a') .and. (c <= 'z')
     end function