File 2668-Add-underscores-in-numeric-literals-suppor... of Package erlang

Overview Repositories Revisions Requests Users Attributes Meta

File 2668-Add-underscores-in-numeric-literals-support-to-emacs.patch of Package erlang (Revision 865d2e25c8b9e0a1b23f89d693ffd991)

Currently displaying revision 865d2e25c8b9e0a1b23f89d693ffd991 , Show latest

From 9d545d4a78d887b662448950cc260674228071ae Mon Sep 17 00:00:00 2001
From: Sergey Prokhorov <seriy.pr@gmail.com>
Date: Thu, 17 Oct 2019 02:18:47 +0200
Subject: [PATCH 8/8] Add underscores in numeric literals support to emacs mode

---
 lib/tools/emacs/erlang.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/tools/emacs/erlang.el b/lib/tools/emacs/erlang.el
index 0b3a2319e2..7e16377d29 100644
--- a/lib/tools/emacs/erlang.el
+++ b/lib/tools/emacs/erlang.el
@@ -1224,8 +1224,8 @@ This must be placed in front of `erlang-font-lock-keywords-vars'.")
          1 'font-lock-type-face)
    ;; Don't highlight numerical constants.
    (list (if erlang-regexp-modern-p
-             "\\_<[0-9]+#\\([0-9a-zA-Z]+\\)"
-           "\\<[0-9]+#\\([0-9a-zA-Z]+\\)")
+             "\\_<\\([0-9]+\\(_[0-9]+\\)*#[0-9a-zA-Z]+\\(_[0-9a-zA-Z]+\\)*\\)"
+              "\\<\\([0-9]+\\(_[0-9]+\\)*#[0-9a-zA-Z]+\\(_[0-9a-zA-Z]+\\)*\\)")
          1 nil t)
    (list (concat "^-record\\s-*(\\s-*" erlang-atom-regexp)
          1 'font-lock-type-face))
-- 
2.16.4

Places

File 2668-Add-underscores-in-numeric-literals-support-to-emacs.patch of Package erlang (Revision 865d2e25c8b9e0a1b23f89d693ffd991)

Places