summaryrefslogtreecommitdiff
path: root/win32/win32.h
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1999-05-28 21:22:23 +0000
committerGurusamy Sarathy <gsar@cpan.org>1999-05-28 21:22:23 +0000
commit7fac1903b890dcf899cc0c18a1b5f9e0198b58ab (patch)
tree0c13b60ba236c0cc850f3c339a0c339d6e75c44f /win32/win32.h
parent2692f720225eadd5a0dcbb17c23107401470624b (diff)
downloadperl-7fac1903b890dcf899cc0c18a1b5f9e0198b58ab.tar.gz
add wide versions of win32 system calls (first step in
globalization); delayload winsock for performance if compiling with VC 6.0 p4raw-id: //depot/perl@3501
Diffstat (limited to 'win32/win32.h')
-rw-r--r--win32/win32.h14
1 files changed, 14 insertions, 0 deletions
diff --git a/win32/win32.h b/win32/win32.h
index bfca44a1b2..a539a16854 100644
--- a/win32/win32.h
+++ b/win32/win32.h
@@ -392,5 +392,19 @@ struct thread_intern {
# endif /* !USE_DECLSPEC_THREAD */
#endif /* USE_THREADS */
+/* UNICODE<>ANSI translation helpers */
+/* Use CP_ACP when mode is ANSI */
+/* Use CP_UTF8 when mode is UTF8 */
+
+#define A2WHELPER(lpa, lpw, nChars, acp)\
+ lpw[0] = 0, MultiByteToWideChar(acp, 0, lpa, -1, lpw, nChars)
+
+#define W2AHELPER(lpw, lpa, nChars, acp)\
+ lpa[0] = '\0', WideCharToMultiByte(acp, 0, lpw, -1, lpa, nChars, NULL, NULL)
+
+/* place holders for now */
+#define USING_WIDE() 0
+#define GETINTERPMODE() CP_ACP
+
#endif /* _INC_WIN32_PERL5 */