Перевод с С++

Тема в разделе "Lotus - Программирование", создана пользователем -, 5 сен 2011.

  1. Гость

    Репутация:
    0
    Нужна помощь в переводе кода с С++ на Lotus Script
    char *ascii_to_utf8(unsigned char c)
    {
    unsigned char *out;

    if(c < 128)
    {
    out = (char *)calloc(2, sizeof(char));
    out[0] = c;
    out[1] = '\0';
    }
    else
    {
    out = (char *)calloc(3, sizeof(char));
    out[1] = (c >> 6) | 0xC0;
    out[0] = (c & 0x3F) | 0x80;
    out[2] = '\0';
    }

    return out;
    }


    And in PERL:

    sub ascii_to_utf8
    {
    my $c = ord(shift(@_));
    if($c < 128)
    {
    return chr($c);
    }
    else
    {
    return pack("C*", ($c >> 6) | 0xC0, ($c & 0x3F) | 0x80));
    }
    }
     
Загрузка...
Похожие Темы - Перевод С++
  1. Amandida
    Ответов:
    0
    Просмотров:
    2.155
  2. Sotona-13
    Ответов:
    1
    Просмотров:
    1.499
  3. aisylu
    Ответов:
    0
    Просмотров:
    1.150
  4. moipoezd
    Ответов:
    2
    Просмотров:
    95
  5. vimka
    Ответов:
    3
    Просмотров:
    105

Поделиться этой страницей