[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/smalltalk-mode 2633e7a 18/34: recognize class declarati
From: |
Stefan Monnier |
Subject: |
[elpa] externals/smalltalk-mode 2633e7a 18/34: recognize class declaration with explicit namespace in the superclass |
Date: |
Tue, 9 Apr 2019 22:30:44 -0400 (EDT) |
branch: externals/smalltalk-mode
commit 2633e7ab9b28d2dab28f27c943b82a4127ecacee
Author: Mathieu Suen <address@hidden>
Commit: Paolo Bonzini <address@hidden>
recognize class declaration with explicit namespace in the superclass
---
smalltalk-mode.el | 25 +++++++------------------
1 file changed, 7 insertions(+), 18 deletions(-)
diff --git a/smalltalk-mode.el b/smalltalk-mode.el
index 1af2f1d..fc5b7a3 100644
--- a/smalltalk-mode.el
+++ b/smalltalk-mode.el
@@ -51,21 +51,10 @@
(defvar smalltalk-mode-syntax-table
(let ((table (make-syntax-table)))
- (setq smalltalk-mode-syntax-table (make-syntax-table))
;; Make sure A-z0-9 are set to "w " for completeness
- (let ((c 0))
- (setq c ?0)
- (while (<= c ?9)
- (setq c (1+ c))
- (modify-syntax-entry c "w " table))
- (setq c ?A)
- (while (<= c ?Z)
- (setq c (1+ c))
- (modify-syntax-entry c "w " table))
- (setq c ?a)
- (while (<= c ?z)
- (setq c (1+ c))
- (modify-syntax-entry c "w " table)))
+ (modify-syntax-entry '(?0 . ?9) "w " table)
+ (modify-syntax-entry '(?a . ?z) "w " table)
+ (modify-syntax-entry '(?A . ?Z) "w " table)
(modify-syntax-entry 10 " > " table) ; Comment (generic)
(modify-syntax-entry ?: ". " table) ; Symbol-char
(modify-syntax-entry ?_ "_ " table) ; Symbol-char
@@ -959,7 +948,7 @@ Whitespace is defined as spaces, tabs, and comments."
curr-hit-point curr-hit new-hit-point new-hit)
(save-excursion
(if (setq curr-hit-point
- (search-backward-regexp "^![ \t]*\\(\\w+\\)[ \t]+" nil t))
+ (search-backward-regexp "^![ \t]*\\(\\(\\w+\\.\\)*\\w+)[ \t]+"
nil t))
(setq curr-hit (buffer-substring
(match-beginning 1)
(match-end 1)))))
@@ -992,10 +981,10 @@ Whitespace is defined as spaces, tabs, and comments."
(save-excursion
(if (setq new-hit-point
(search-backward-regexp
- "^[ \t]*\\w+[
\t]+\\(variable\\|variableWord\\|variableByte\\)?subclass:[ \t]+#?\\(\\w+\\)"
nil t))
+ "^[ \t]*\\(\\w+\\.\\)*\\w+[
\t]+\\(variable\\|variableWord\\|variableByte\\)?subclass:[ \t]+#?\\(\\w+\\)"
nil t))
(setq new-hit (buffer-substring
- (match-beginning 2)
- (match-end 2)))))
+ (match-beginning 3)
+ (match-end 3)))))
(if (and new-hit-point
(or (not curr-hit-point) (> new-hit-point curr-hit-point)))
(progn (setq curr-hit-point new-hit-point)
- [elpa] branch externals/smalltalk-mode created (now 453b7f5), Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 381d6ed 02/34: update FSF address, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode c39c42b 07/34: set comint-use-prompt-regexp, patch from Nick Gasson, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 71cd97f 11/34: update copyright years, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 6a18dea 23/34: change defun* to defun, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 2633e7a 18/34: recognize class declaration with explicit namespace in the superclass,
Stefan Monnier <=
- [elpa] externals/smalltalk-mode a7e8c36 14/34: fix smalltalk-scope-begin-of-defun, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 0448eaa 08/34: merge from stephen, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 320dcae 15/34: fix indent and smalltalk-at-begin-of-{defun|scope}, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode fb9072e 04/34: add gst-prog-name, patch from Stephen Compall, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode c8ce0e0 16/34: disable generational GC on sparc, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 4a29da5 31/34: Highlight ^ as a keyword, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 27c9a1a 09/34: update copyright from 2.3.6 release, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode c95682c 24/34: correct defun* -> defun patch, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 57c7cfa 20/34: fix smalltalk-mode.el to work in emacs 22, Stefan Monnier, 2019/04/09
- [elpa] externals/smalltalk-mode 4160554 12/34: simplify installation of Emacs modes, Stefan Monnier, 2019/04/09