* bug#20128: 24.4; Bad regex in composition-function-table hangs Emacs
@ 2015-03-17 19:45 Richard Wordingham
2019-08-02 12:35 ` Lars Ingebrigtsen
0 siblings, 1 reply; 2+ messages in thread
From: Richard Wordingham @ 2015-03-17 19:45 UTC (permalink / raw)
To: 20128
Loading an Emacs lisp file (e.g. by load-file in .emacs) containing the
commands:
(defvar tai-tham-composable-pattern
(let ((table
'(
("C" . "[\u1A20-\u1A54") ; Missing ']'!
("M" . "[\u1A55-\u1A5E\u1A61-\u1A7C\u1A7F]"); Mark
("H" . "\u1A60") ; sakot
("N" . "\u1A58"))) ; mai kang lai
(regexp "C\\(M|HC\\)*\\(NC\\(M|HC\\)*\\)*N?"))
(let ((case-fold-search nil))
(dolist (elt table)
(setq regexp (replace-regexp-in-string (car elt) (cdr elt)
regexp t t))))
regexp))
(let ((elt (list (vector tai-tham-composable-pattern 0
'font-shape-gstring)
(vector "." 0 'font-shape-gstring) )))
(set-char-table-range composition-function-table '(#x1A20 . #x1AAD)
elt))
causes Emacs to hang when a character in the range U+1A20 to U+1AAD
needs to be rendered. Now, the value of tai-tham-composable-pattern is
an unbalanced regex, so that may be the cause of the problem.
The problem also occurs in Emacs 23.3.
^ permalink raw reply [flat|nested] 2+ messages in thread* bug#20128: 24.4; Bad regex in composition-function-table hangs Emacs
2015-03-17 19:45 bug#20128: 24.4; Bad regex in composition-function-table hangs Emacs Richard Wordingham
@ 2019-08-02 12:35 ` Lars Ingebrigtsen
0 siblings, 0 replies; 2+ messages in thread
From: Lars Ingebrigtsen @ 2019-08-02 12:35 UTC (permalink / raw)
To: Richard Wordingham; +Cc: 20128
Richard Wordingham <richard.wordingham@ntlworld.com> writes:
> Loading an Emacs lisp file (e.g. by load-file in .emacs) containing the
> commands:
>
> (defvar tai-tham-composable-pattern
> (let ((table
> '(
> ("C" . "[\u1A20-\u1A54") ; Missing ']'!
> ("M" . "[\u1A55-\u1A5E\u1A61-\u1A7C\u1A7F]"); Mark
> ("H" . "\u1A60") ; sakot
> ("N" . "\u1A58"))) ; mai kang lai
> (regexp "C\\(M|HC\\)*\\(NC\\(M|HC\\)*\\)*N?"))
> (let ((case-fold-search nil))
> (dolist (elt table)
> (setq regexp (replace-regexp-in-string (car elt) (cdr elt)
> regexp t t))))
> regexp))
>
> (let ((elt (list (vector tai-tham-composable-pattern 0
> 'font-shape-gstring)
> (vector "." 0 'font-shape-gstring) )))
> (set-char-table-range composition-function-table '(#x1A20 . #x1AAD)
> elt))
>
> causes Emacs to hang when a character in the range U+1A20 to U+1AAD
> needs to be rendered. Now, the value of tai-tham-composable-pattern is
> an unbalanced regex, so that may be the cause of the problem.
(I'm going through old bug reports that unfortunately have not received
any responses yet.)
I don't think you can reasonably expect Emacs to work properly when you
have put invalid regexps into a function like that, so I'm closing this
bug as a "wontfix".
--
(domestic pets only, the antidote for overdose, milk.)
bloggy blog: http://lars.ingebrigtsen.no
^ permalink raw reply [flat|nested] 2+ messages in thread
end of thread, other threads:[~2019-08-02 12:35 UTC | newest]
Thread overview: 2+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2015-03-17 19:45 bug#20128: 24.4; Bad regex in composition-function-table hangs Emacs Richard Wordingham
2019-08-02 12:35 ` Lars Ingebrigtsen
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).