1hdr	locale,wchar,wctype
2lib	locale,localeconv,wctype,iswctype,iswblank
3lib	wctrans,towctrans wctype.h
4typ	wctrans_t wctype.h
5cat{
6	#if _PACKAGE_ast
7	#   undef  _hdr_locale
8	#   define _hdr_locale 1
9	#else
10	#   ifdef _hdr_locale
11	#	include <locale.h>
12	#	ifndef LC_MESSAGES
13	#	    define LC_MESSAGES  LC_ALL
14	#	endif /* LC_MESSAGES */
15	#   endif /* _hdr_locale */
16	#endif /* _PACKAGE_ast */
17	#ifdef _hdr_locale
18	#   ifdef _lib_localeconv
19		static struct lconv *lp;
20	#	define GETDECIMAL(x)  (((lp=localeconv()) && lp->decimal_point && *lp->decimal_point) ?  *lp->decimal_point : '.' )
21	#   else
22	#	define GETDECIMAL(x)	('.')
23	#   endif /* _lib_localeconv */
24	#else
25	#   define GETDECIMAL(x)	('.')
26	#endif /* _hdr_locale */
27}end
28