git.m6w6.name Git - m6w6/ext-psi/blob - tests/idn/idn.psi

   1 // libidn
   2 lib "idn";
   3
   4 #include <idna.h>
   5
   6 function idn\utf8_to_ascii(string $host, string &$result, int $flags = 0) : int {
   7         let output = &NULL;
   8         let input = strval($host);
   9         let flags = intval($flags);
  10         set $result = to_string(*output);
  11         return to_int(idna_to_ascii_8z);
  12         free free(*output);
  13 }
  14
  15 function idn\strerror(int $rc) : string {
  16         return to_string(idna_strerror);
  17         let rc = intval($rc);
  18 }