diff options
| author | Kenichi Handa <handa@m17n.org> | 2008-11-10 00:47:08 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 2008-11-10 00:47:08 +0000 |
| commit | d5998e0317c1f425d1de83934891cb2340ec10e4 (patch) | |
| tree | 4ac877f48e7d170a91afb9e8921e7c3630de0ec5 /src/character.c | |
| parent | 47264a979962acc65dbcdb56f4e6604cb14521fe (diff) | |
| download | emacs-d5998e0317c1f425d1de83934891cb2340ec10e4.tar.gz | |
(Fget_byte): Fix and make it faster for unibyte target.
Diffstat (limited to 'src/character.c')
| -rw-r--r-- | src/character.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/character.c b/src/character.c index 38d4f6ac510..66e1b023919 100644 --- a/src/character.c +++ b/src/character.c @@ -1058,6 +1058,8 @@ character is not ASCII nor 8-bit character, an error is signalled. */) pos = XFASTINT (position); p = CHAR_POS_ADDR (pos); } + if (NILP (current_buffer->enable_multibyte_characters)) + return make_number (*p); } else { @@ -1074,6 +1076,8 @@ character is not ASCII nor 8-bit character, an error is signalled. */) pos = XFASTINT (position); p = SDATA (string) + string_char_to_byte (string, pos); } + if (! STRING_MULTIBYTE (string)) + return make_number (*p); } c = STRING_CHAR (p, 0); if (CHAR_BYTE8_P (c)) |