[nongnu] elpa/forth-mode 244c416c4d 013/153: Variable for secifying Forth executable.

[ELPA Syncer]

branch: elpa/forth-mode
commit 244c416c4d2a61448ae2619b19c5c0229fa7733e
Author: Lars Brinkhoff <lars.brinkhoff@delphi.com>
Commit: Lars Brinkhoff <lars.brinkhoff@delphi.com>

    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)