branch: elpa/forth-mode
commit 244c416c4d2a61448ae2619b19c5c0229fa7733e
Author: Lars Brinkhoff <[email protected]>
Commit: Lars Brinkhoff <[email protected]>
Variable for secifying Forth executable.
---
forth-interaction-mode.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/forth-interaction-mode.el b/forth-interaction-mode.el
index 2d2f7784c8..e8529af451 100644
--- a/forth-interaction-mode.el
+++ b/forth-interaction-mode.el
@@ -30,6 +30,8 @@
(message "Forth: %s" arg)
(forth-interaction-kill (process-buffer proc)))
+(defvar forth-executable "gforth")
+
;;;### autoload
(defun forth ()
"Start an interactive forth session."
@@ -37,7 +39,7 @@
(let ((buffer (get-buffer-create "*forth*")))
(pop-to-buffer-same-window buffer)
(unless (comint-check-proc buffer)
- (make-comint-in-buffer "forth" buffer "forth")
+ (make-comint-in-buffer "forth" buffer forth-executable)
(set-process-sentinel (get-buffer-process buffer)
'forth-interaction-sentinel)
(forth-interaction-mode)
