Mercurial > emacs
comparison lisp/emacs-lisp/syntax.el @ 83353:532e0a9335a9
Merged in changes from CVS trunk. Plus added lisp/term tweaks.
Patches applied:
* lorentey@elte.hu--2004/emacs--cvs-trunk--0--base-0
tag of miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-474
* lorentey@elte.hu--2004/emacs--cvs-trunk--0--patch-1
Add CVS metadata files.
* lorentey@elte.hu--2004/emacs--cvs-trunk--0--patch-2
Update from CVS.
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-393
author | Karoly Lorentey <lorentey@elte.hu> |
---|---|
date | Sun, 04 Sep 2005 03:48:17 +0000 |
parents | 364fe66bab84 |
children | f15e775dfb97 a3716f7538f2 |
comparison
equal
deleted
inserted
replaced
83352:b258b3492423 | 83353:532e0a9335a9 |
---|---|
1 ;;; syntax.el --- helper functions to find syntactic context | 1 ;;; syntax.el --- helper functions to find syntactic context |
2 | 2 |
3 ;; Copyright (C) 2000, 2003 Free Software Foundation, Inc. | 3 ;; Copyright (C) 2000, 2001, 2002, 2003, 2004, |
4 ;; 2005 Free Software Foundation, Inc. | |
4 | 5 |
5 ;; Maintainer: FSF | 6 ;; Maintainer: FSF |
6 ;; Keywords: internal | 7 ;; Keywords: internal |
7 | 8 |
8 ;; This file is part of GNU Emacs. | 9 ;; This file is part of GNU Emacs. |
43 ;;; Code: | 44 ;;; Code: |
44 | 45 |
45 ;; Note: PPSS stands for `parse-partial-sexp state' | 46 ;; Note: PPSS stands for `parse-partial-sexp state' |
46 | 47 |
47 (eval-when-compile (require 'cl)) | 48 (eval-when-compile (require 'cl)) |
49 | |
50 (defvar font-lock-beginning-of-syntax-function) | |
48 | 51 |
49 (defsubst syntax-ppss-depth (ppss) | 52 (defsubst syntax-ppss-depth (ppss) |
50 (nth 0 ppss)) | 53 (nth 0 ppss)) |
51 | 54 |
52 (defsubst syntax-ppss-context (ppss) | 55 (defsubst syntax-ppss-context (ppss) |