comparison src/intl-win32.c @ 5438:8d29f1c4bb98

Merge with 21.5 trunk.
author Mats Lidell <matsl@xemacs.org>
date Fri, 26 Nov 2010 06:43:36 +0100
parents 308d34e9f07d c096d8051f89
children 0af042a0c116
comparison
equal deleted inserted replaced
5437:002cb5224e4f 5438:8d29f1c4bb98
1788 data->cp_type = MULTIBYTE_EBCDIC; 1788 data->cp_type = MULTIBYTE_EBCDIC;
1789 else if (EQ (value, Qmac)) 1789 else if (EQ (value, Qmac))
1790 data->cp_type = MULTIBYTE_MAC; 1790 data->cp_type = MULTIBYTE_MAC;
1791 else 1791 else
1792 { 1792 {
1793 CHECK_NATNUM (value);
1794 data->locale_type = MULTIBYTE_SPECIFIED_CODE_PAGE; 1793 data->locale_type = MULTIBYTE_SPECIFIED_CODE_PAGE;
1795 data->cp = XINT (value); 1794 #ifdef HAVE_BIGNUM
1795 check_integer_range (value, Qzero, make_integer (INT_MAX));
1796 data->cp = BIGNUMP (value) ? bignum_to_int (XBIGNUM_DATA (value)) : XINT (value);
1797 #else
1798 CHECK_NATNUM (value);
1799 data->cp = XINT (value);
1800 #endif
1796 } 1801 }
1797 } 1802 }
1798 else if (EQ (key, Qlocale)) 1803 else if (EQ (key, Qlocale))
1799 { 1804 {
1800 if (EQ (value, Qcurrent)) 1805 if (EQ (value, Qcurrent))