(py-parse-partial-sexp-works-p): Removed as obsolete. All current

Emacs and XEmacs versions should have working parse-partial-sexp's.

(py-emacs-features): Defined as future placeholder.
This commit is contained in:
Barry Warsaw 1997-09-04 04:18:07 +00:00
parent dc5d07d952
commit c12c62ee5a
1 changed files with 10 additions and 20 deletions

View File

@ -241,26 +241,16 @@ the Emacs bell is also rung as a warning."
;; ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ ;; ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
;; NO USER DEFINABLE VARIABLES BEYOND THIS POINT ;; NO USER DEFINABLE VARIABLES BEYOND THIS POINT
;; As of 30-Jan-1997, Emacs 19.34 works but XEmacs 19.15b90 and (defconst py-emacs-features ()
;; previous does not. It is suspected that Emacsen before 19.34 are "A list of features extant in the Emacs you are using.
;; also broken. There are many flavors of Emacs out there, each with different
(defvar py-parse-partial-sexp-works-p features supporting those needed by CC Mode. Here's the current
(let ((buf (get-buffer-create " ---*---pps---*---")) supported list, along with the values for this variable:
state status)
(save-excursion XEmacs 19: ()
(set-buffer buf) XEmacs 20: ()
(erase-buffer) Emacs 19: ()
(insert "(line1\n line2)\nline3") ")
(lisp-mode)
(goto-char (point-min))
(setq state (parse-partial-sexp (point) (save-excursion
(forward-line 1)
(point))))
(parse-partial-sexp (point) (point-max) 0 nil state)
(setq status (not (= (point) (point-max))))
(kill-buffer buf)
status))
"Does `parse-partial-sexp' work in this Emacs?")
(defvar python-font-lock-keywords (defvar python-font-lock-keywords
(let* ((keywords '("and" "break" "class" (let* ((keywords '("and" "break" "class"