X-Git-Url: https://git.m6w6.name/?a=blobdiff_plain;ds=sidebyside;f=tests%2Fidn%2Fidn.psi;h=b8f3602205127f09558c98358d76e43e100e0706;hb=6509a2053456d0e63b6f383b757289d3016ed1a5;hp=845335bf6af23e42e5e39a59690ba85520209d96;hpb=207ff7bc85e967235f0ad1ffbf47c0f85f375063;p=m6w6%2Fext-psi

diff --git a/tests/idn/idn.psi b/tests/idn/idn.psi
index 845335b..b8f3602 100644
--- a/tests/idn/idn.psi
+++ b/tests/idn/idn.psi
@@ -1,7 +1,7 @@
-# libidn
+// libidn
 lib "idn";
 
-# IDNA errors
+// IDNA errors
 const int \IDNA_SUCCESS = 0;
 const int \IDNA_STRINGPREP_ERROR = 1;
 const int \IDNA_PUNYCODE_ERROR = 2;
@@ -15,7 +15,7 @@ const int \IDNA_CONTAINS_ACE_PREFIX = 8;
 const int \IDNA_ICONV_ERROR = 9;
 const int \IDNA_MALLOC_ERROR = 201;
 const int \IDNA_DLOPEN_ERROR = 202;
-# IDNA flags
+// IDNA flags
 const int \IDNA_ALLOW_UNASSIGNED = 1;
 const int \IDNA_USE_STD3_ASCII_RULES = 2;
 
@@ -27,7 +27,7 @@ function idn\utf8_to_ascii(string $host, string &$result, int $flags = 0) : int
 	let flags = intval($flags);
 	set $result = to_string(*buffer);
 	return to_int(idna_to_ascii_8z);
-	free *buffer;
+	free free(*buffer);
 }
 default char *idna_strerror(int rc);
 function idn\strerror(int $rc) : string {