branch: elpa/forth-mode
commit b40ffb3127856dbe8e5f17818ed4083bca7101b9
Author: Lars Brinkhoff <[email protected]>
Commit: Lars Brinkhoff <[email protected]>
Fix building with Emacs 23.
---
forth-mode.el | 3 ++-
forth-smie.el | 4 ++++
2 files changed, 6 insertions(+), 1 deletion(-)
diff --git a/forth-mode.el b/forth-mode.el
index abd8ace805..c4b3678f5a 100644
--- a/forth-mode.el
+++ b/forth-mode.el
@@ -141,7 +141,8 @@
(forth-block-mode))
(setq font-lock-defaults '(forth-font-lock-keywords))
(setq-local completion-at-point-functions '(forth-expand-symbol))
- (setq-local syntax-propertize-function #'forth--syntax-propertize)
+ (when (boundp 'syntax-propertize-function)
+ (setq-local syntax-propertize-function #'forth--syntax-propertize))
(setq-local parse-sexp-lookup-properties t)
(forth-smie-setup)
(setq ;; font-lock-defaults
diff --git a/forth-smie.el b/forth-smie.el
index 20bf06cad8..94c17ea7be 100644
--- a/forth-smie.el
+++ b/forth-smie.el
@@ -22,6 +22,10 @@
(defvar forth-smie--basic-indent 2)
+(unless (fboundp 'pcase)
+ (defmacro pcase (form &rest forms)
+ 0))
+
(defun forth-smie--indentation-rules (kind token)
(pcase (cons kind token)
(`(:elem . basic) forth-smie--basic-indent)
