Use SWI-Prolog's wide-character functions.

This avoids the use of TsmFromSz.

1 files changed, 3 insertions, 3 deletions

diff --git a/c/pl.cpp b/c/pl.cpp
index c944547..21253ba 100644
--- a/c/pl.cpp
+++ b/c/pl.cpp
@@ -37,10 +37,10 @@ int Query::NextSolution()
 int PL_get_tchars(term_t t, TCHAR **lpTsz, int iFlags)
 {
 #ifdef UNICODE
-	size_t sizLen;
-	if (!PL_get_wchars(t, &sizLen, lpTsz, iFlags))
+	size_t len;
+	if (!PL_get_wchars(t, &len, lpTsz, iFlags))
 		return 0;
-	return sizLen;
+	return len;
 #else
 	if (!PL_get_chars(t, lpTsz, iFlags))
 		return 0;