78 lines
1.5 KiB
C
78 lines
1.5 KiB
C
|
#include <utility.h>
|
||
|
|
||
|
bool_t pac_rune_is_sign_of_block_1(rune_t rune)
|
||
|
{
|
||
|
if(rune < 0x21) return FALSE;
|
||
|
if(rune > 0x2f) return FALSE;
|
||
|
return TRUE;
|
||
|
}
|
||
|
|
||
|
bool_t pac_rune_is_sign_of_block_2(rune_t rune)
|
||
|
{
|
||
|
if(rune < 0x3a) return FALSE;
|
||
|
if(rune > 0x40) return FALSE;
|
||
|
return TRUE;
|
||
|
}
|
||
|
|
||
|
bool_t pac_rune_is_sign_of_block_3(rune_t rune)
|
||
|
{
|
||
|
if(rune < 0x5b) return FALSE;
|
||
|
if(rune > 0x60) return FALSE;
|
||
|
return TRUE;
|
||
|
}
|
||
|
|
||
|
bool_t pac_rune_is_sign_of_block_4(rune_t rune)
|
||
|
{
|
||
|
if(rune < 0x7b) return FALSE;
|
||
|
if(rune > 0x7e) return FALSE;
|
||
|
return TRUE;
|
||
|
}
|
||
|
|
||
|
|
||
|
|
||
|
bool_t pac_rune_is_lower_letter(rune_t rune)
|
||
|
{
|
||
|
if(rune < 'a') return FALSE;
|
||
|
if(rune > 'z') return FALSE;
|
||
|
return TRUE;
|
||
|
}
|
||
|
|
||
|
bool_t pac_rune_is_upper_letter(rune_t rune)
|
||
|
{
|
||
|
if(rune < 'A') return FALSE;
|
||
|
if(rune > 'Z') return FALSE;
|
||
|
return TRUE;
|
||
|
}
|
||
|
|
||
|
bool_t pac_rune_is_letter(rune_t rune)
|
||
|
{
|
||
|
if(pac_rune_is_lower_letter(rune)) return TRUE;
|
||
|
if(pac_rune_is_upper_letter(rune)) return TRUE;
|
||
|
return FALSE;
|
||
|
}
|
||
|
|
||
|
bool_t pac_rune_is_digit(rune_t rune)
|
||
|
{
|
||
|
if(rune < '0') return FALSE;
|
||
|
if(rune > '9') return FALSE;
|
||
|
return TRUE;
|
||
|
}
|
||
|
|
||
|
bool_t pac_rune_is_blank(rune_t rune)
|
||
|
{
|
||
|
if(rune == ' ') return TRUE;
|
||
|
if(rune == '\t') return TRUE;
|
||
|
return FALSE;
|
||
|
}
|
||
|
|
||
|
bool_t pac_rune_is_sign(rune_t rune)
|
||
|
{
|
||
|
if(pac_rune_is_sign_of_block_1(rune)) return TRUE;
|
||
|
if(pac_rune_is_sign_of_block_2(rune)) return TRUE;
|
||
|
if(pac_rune_is_sign_of_block_3(rune)) return TRUE;
|
||
|
if(pac_rune_is_sign_of_block_4(rune)) return TRUE;
|
||
|
return FALSE;
|
||
|
}
|
||
|
|
||
|
|