isAsciiSeparator :: Word8 -> Bool
isAsciiSeparator byte =
    byte == 95 || -- underscore
    byte == 45
isAsciiSeparator :: Word8 -> Bool
isAsciiSeparator byte =
    byte == 95 || -- underscore
    byte == 45
isAsciiSeparator byte =
    byte == 95 || -- underscore
    byte == 45