ccode revision 1
1N/Atst output{
1N/A int main()
1N/A {
1N/A printf("\n");
1N/A printf("#define CC_ASCII 1 /* ISO-8859-1 */\n");
1N/A printf("#define CC_EBCDIC_E 2 /* Xopen dd(1) EBCDIC */\n");
1N/A printf("#define CC_EBCDIC_I 3 /* Xopen dd(1) IBM */\n");
1N/A printf("#define CC_EBCDIC_O 4 /* IBM-1047 mvs OpenEdition */\n");
1N/A printf("#define CC_EBCDIC_S 5 /* Siemens posix-bc */\n");
1N/A printf("#define CC_EBCDIC_H 6 /* IBM-37 AS/400 */\n");
1N/A printf("#define CC_EBCDIC_M 7 /* IBM mvs cobol */\n");
1N/A printf("#define CC_EBCDIC_U 8 /* microfocus cobol */\n");
1N/A printf("\n");
1N/A printf("#define CC_MAPS 8 /* number of code maps */\n");
1N/A printf("\n");
1N/A printf("#define CC_EBCDIC CC_EBCDIC_E\n");
1N/A printf("#define CC_EBCDIC1 CC_EBCDIC_E\n");
1N/A printf("#define CC_EBCDIC2 CC_EBCDIC_I\n");
1N/A printf("#define CC_EBCDIC3 CC_EBCDIC_O\n");
1N/A printf("\n");
1N/A switch ('~')
1N/A {
1N/A case 0137:
1N/A printf("#define CC_NATIVE CC_EBCDIC_E /* native character code */\n");
1N/A break;
1N/A case 0176:
1N/A printf("#define CC_NATIVE CC_ASCII /* native character code */\n");
1N/A break;
1N/A case 0241:
1N/A switch ('\n')
1N/A {
1N/A case 0025:
1N/A printf("#define CC_NATIVE CC_EBCDIC_O /* native character code */\n");
1N/A break;
1N/A default:
1N/A switch ('[')
1N/A {
1N/A case 0272:
1N/A printf("#define CC_NATIVE CC_EBCDIC_H /* native character code */\n");
1N/A break;
1N/A default:
1N/A printf("#define CC_NATIVE CC_EBCDIC_I /* native character code */\n");
1N/A break;
1N/A }
1N/A break;
1N/A }
1N/A break;
1N/A case 0377:
1N/A printf("#define CC_NATIVE CC_EBCDIC_S /* native character code */\n");
1N/A break;
1N/A default:
1N/A switch ('A')
1N/A {
1N/A case 0301:
1N/A printf("#define CC_NATIVE CC_EBCDIC_O /* native character code */\n");
1N/A break;
1N/A default:
1N/A printf("#define CC_NATIVE CC_ASCII /* native character code */\n");
1N/A break;
1N/A }
1N/A break;
1N/A }
1N/A if ('A' == 0101)
1N/A {
1N/A printf("#define CC_ALIEN CC_EBCDIC /* alien character code */\n\n");
1N/A printf("#define CC_bel 0007 /* bel character */\n");
1N/A printf("#define CC_esc 0033 /* esc character */\n");
1N/A printf("#define CC_sub 0032 /* sub character */\n");
1N/A printf("#define CC_vt 0013 /* vt character */\n");
1N/A }
1N/A else
1N/A {
1N/A printf("#define CC_ALIEN CC_ASCII /* alien character code */\n\n");
1N/A printf("#define CC_bel 0057 /* bel character */\n");
1N/A printf("#define CC_esc 0047 /* esc character */\n");
1N/A printf("#define CC_sub 0077 /* sub character */\n");
1N/A printf("#define CC_vt 0013 /* vt character */\n");
1N/A }
1N/A return 0;
1N/A }
1N/A}end