From f0f58a9a893f6c331aa59091651853a990b7ae29 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Bj=C3=B6rn=20Lindqvist?= Date: Mon, 23 May 2016 02:23:21 +0200 Subject: [PATCH] FUEL: highlight of SLOT: syntax and backslashes in names --- misc/fuel/factor-mode.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/misc/fuel/factor-mode.el b/misc/fuel/factor-mode.el index 7d72e7656b..a8422c4545 100644 --- a/misc/fuel/factor-mode.el +++ b/misc/fuel/factor-mode.el @@ -229,7 +229,6 @@ these lines in your .emacs: "METHOD:" "PRIVATE>" "PROTOCOL:" "PROVIDE:" "read-only" - "SLOT:" "STRING:" "SYNTAX:" "UNIFORM-TUPLE:" "VARIANT:" "VERTEX-FORMAT:")) @@ -301,7 +300,7 @@ these lines in your .emacs: (defconst factor-symbol-definition-regex (syntax-and-1-symbol '("&" "CONSTANT" "DESTRUCTOR" "FORGET" "GAME" "HELP" "LIBRARY" - "MAIN" "MAIN-WINDOW" "STRING" "SYMBOL" "VAR"))) + "MAIN" "MAIN-WINDOW" "SLOT" "STRING" "SYMBOL" "VAR"))) ;; [parsing-word] [symbol-word]* ; (defconst factor-symbols-lines-regex @@ -882,6 +881,7 @@ With prefix, non-existing files will be created." (modify-syntax-entry ?# "_" table) (modify-syntax-entry ?! "_" table) (modify-syntax-entry ?\n "> " table) + (modify-syntax-entry ?\\ "_" table) (modify-syntax-entry ?$ "_" table) (modify-syntax-entry ?@ "_" table) (modify-syntax-entry ?? "_" table)