Hello,

I texi2any.pl, we have two little bits of MS-Windows specific code
related to locales.  I would like to have the same in the C texi2any
main program implementation.  Could you please help me to do that?

I would need two information:

1) what would be the equivalent in C of if ($^O eq 'MSWin32') in Perl?
My guess is that it is 
# ifdef _WIN32
but I am not sure.

2) what would be the Ms-Windows specific parts in the following code
(to get the CP value) in C (with the needed includes):

    eval 'require Win32::API';
    if (!$@) {
      Win32::API::More->Import("kernel32", "int GetACP()");
      my $CP = GetACP();
      if (defined($CP)) {
        $locale_encoding = 'cp'.$CP;
      }
    }  

CC'ing Eli who provided this for Perl.

Thanks in advance,

-- 
Pat

Reply via email to