steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

FUEL: use the right quot-char in pcases

char-rename
Björn Lindqvist 2016-08-16 03:23:41 +02:00
parent b5c6658ae5
commit a6544c0acb
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
misc/fuel/factor-smie.el
View File

@ -55,14 +55,14 @@
(defun factor-smie-token (dir)
(pcase dir
('forward (forward-comment (point-max)))
('backward (forward-comment (- (point)))))
(`forward (forward-comment (point-max)))
(`backward (forward-comment (- (point)))))
(let ((tok (buffer-substring-no-properties
(point)
(let ((syntax "w_\\\""))
(pcase dir
('forward (skip-syntax-forward syntax))
('backward (skip-syntax-backward syntax)))
(`forward (skip-syntax-forward syntax))
(`backward (skip-syntax-backward syntax)))
(point)))))
;; Token normalization. This way we only need one rule in
;; factor-smie-grammar.