Function: preceding-char

preceding-char is a function defined in editfns.c.

Signature

(preceding-char)

Documentation

Return the character preceding point, as a number.

At the beginning of the buffer or accessible region, return 0.

Other relevant functions are documented in the buffer group.

View in manual

Shortdoc

;; buffer
(preceding-char)
    e.g. => 38

Source Code

// Defined in /usr/src/emacs/src/editfns.c
{
  Lisp_Object temp;
  if (PT <= BEGV)
    XSETFASTINT (temp, 0);
  else if (!NILP (BVAR (current_buffer, enable_multibyte_characters)))
    {
      ptrdiff_t pos = PT_BYTE;
      pos -= prev_char_len (pos);
      XSETFASTINT (temp, FETCH_CHAR (pos));
    }
  else
    XSETFASTINT (temp, FETCH_BYTE (PT_BYTE - 1));
  return temp;
}