is_control Function

public elemental function is_control(c)

Checks whether c is a control character.

Arguments

Type IntentOptional Attributes Name
character(len=1), intent(in) :: c

The character to test.

Return Value logical


Variables

Type Visibility Attributes Name Initial
integer, private :: ic

Source Code

   elemental logical function is_control(c)
      character(len=1), intent(in) :: c
          !! The character to test.
      integer :: ic
      ic = iachar(c)
      is_control = ic < int(z'20') .or. ic == int(z'7F')
   end function is_control