14 lines
339 B
Perl
14 lines
339 B
Perl
|
/* m_34_ksc.t: Multi-byte character constant encoded in KSC-5601. */
|
|||
|
|
|
|||
|
|
/* 34.1: */
|
|||
|
|
|
|||
|
|
#pragma __setlocale( "ksc5601") /* For MCPP */
|
|||
|
|
#pragma setlocale( "korean") /* For Visual C */
|
|||
|
|
|
|||
|
|
#if '<27><>' == '\xed\xae'
|
|||
|
|
Multi-byte character is encoded in KSC-5601.
|
|||
|
|
#else
|
|||
|
|
I cannot understand KSC-5601.
|
|||
|
|
#endif
|
|||
|
|
|