Mercurial > hg > xemacs-beta
comparison src/chartab.c @ 771:943eaba38521
[xemacs-hg @ 2002-03-13 08:51:24 by ben]
The big ben-mule-21-5 check-in!
Various files were added and deleted. See CHANGES-ben-mule.
There are still some test suite failures. No crashes, though.
Many of the failures have to do with problems in the test suite itself
rather than in the actual code. I'll be addressing these in the next
day or so -- none of the test suite failures are at all critical.
Meanwhile I'll be trying to address the biggest issues -- i.e. build
or run failures, which will almost certainly happen on various platforms.
All comments should be sent to ben@xemacs.org -- use a Cc: if necessary
when sending to mailing lists. There will be pre- and post- tags,
something like
pre-ben-mule-21-5-merge-in, and
post-ben-mule-21-5-merge-in.
author | ben |
---|---|
date | Wed, 13 Mar 2002 08:54:06 +0000 |
parents | fdefd0186b75 |
children | 026c5bf9c134 |
comparison
equal
deleted
inserted
replaced
770:336a418893b5 | 771:943eaba38521 |
---|---|
1344 int start = MIN_LEADING_BYTE; | 1344 int start = MIN_LEADING_BYTE; |
1345 int stop = start + NUM_LEADING_BYTES; | 1345 int stop = start + NUM_LEADING_BYTES; |
1346 | 1346 |
1347 for (i = start, retval = 0; i < stop && retval == 0; i++) | 1347 for (i = start, retval = 0; i < stop && retval == 0; i++) |
1348 { | 1348 { |
1349 retval = map_over_other_charset (ct, i, fn, arg); | 1349 if (i != LEADING_BYTE_ASCII && i != LEADING_BYTE_CONTROL_1) |
1350 retval = map_over_other_charset (ct, i, fn, arg); | |
1350 } | 1351 } |
1351 } | 1352 } |
1352 #endif /* MULE */ | 1353 #endif /* MULE */ |
1353 return retval; | 1354 return retval; |
1354 } | 1355 } |
1359 XCHARSET_LEADING_BYTE (range->charset), | 1360 XCHARSET_LEADING_BYTE (range->charset), |
1360 fn, arg); | 1361 fn, arg); |
1361 | 1362 |
1362 case CHARTAB_RANGE_ROW: | 1363 case CHARTAB_RANGE_ROW: |
1363 { | 1364 { |
1364 Lisp_Object val = ct->level1[XCHARSET_LEADING_BYTE (range->charset) - MIN_LEADING_BYTE]; | 1365 Lisp_Object val = ct->level1[XCHARSET_LEADING_BYTE (range->charset) - |
1366 MIN_LEADING_BYTE]; | |
1365 if (!CHAR_TABLE_ENTRYP (val)) | 1367 if (!CHAR_TABLE_ENTRYP (val)) |
1366 { | 1368 { |
1367 struct chartab_range rainj; | 1369 struct chartab_range rainj; |
1368 | 1370 |
1369 rainj.type = CHARTAB_RANGE_ROW; | 1371 rainj.type = CHARTAB_RANGE_ROW; |