Mercurial > hg > xemacs-beta
comparison src/mule-ccl.c @ 440:8de8e3f6228a r21-2-28
Import from CVS: tag r21-2-28
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:33:38 +0200 |
parents | 84b14dcb0985 |
children | abe6d1db359e |
comparison
equal
deleted
inserted
replaced
439:357dd071b03c | 440:8de8e3f6228a |
---|---|
420 IC += ADDRESS; | 420 IC += ADDRESS; |
421 else | 421 else |
422 IC += 2; | 422 IC += 2; |
423 */ | 423 */ |
424 | 424 |
425 #define CCL_Extention 0x1F /* Extended CCL code | 425 #define CCL_Extension 0x1F /* Extended CCL code |
426 1:ExtendedCOMMNDRrrRRRrrrXXXXX | 426 1:ExtendedCOMMNDRrrRRRrrrXXXXX |
427 2:ARGUEMENT | 427 2:ARGUEMENT |
428 3:... | 428 3:... |
429 ------------------------------ | 429 ------------------------------ |
430 extended_command (rrr,RRR,Rrr,ARGS) | 430 extended_command (rrr,RRR,Rrr,ARGS) |
1122 } | 1122 } |
1123 else if (!reg[rrr]) | 1123 else if (!reg[rrr]) |
1124 ic = jump_address; | 1124 ic = jump_address; |
1125 break; | 1125 break; |
1126 | 1126 |
1127 case CCL_Extention: | 1127 case CCL_Extension: |
1128 switch (EXCMD) | 1128 switch (EXCMD) |
1129 { | 1129 { |
1130 case CCL_ReadMultibyteChar2: | 1130 case CCL_ReadMultibyteChar2: |
1131 if (!src) | 1131 if (!src) |
1132 CCL_INVALID_CMD; | 1132 CCL_INVALID_CMD; |