diff options
Diffstat (limited to 'lisp/progmodes/mixal-mode.el')
| -rw-r--r-- | lisp/progmodes/mixal-mode.el | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/lisp/progmodes/mixal-mode.el b/lisp/progmodes/mixal-mode.el index 60dcdc625a8..f4ab9e5e4f3 100644 --- a/lisp/progmodes/mixal-mode.el +++ b/lisp/progmodes/mixal-mode.el @@ -1091,15 +1091,19 @@ EXECUTION-TIME holds info about the time it takes, number or string.") (defun mixal-run () "Run mixal file in current buffer, assumes that file has been compiled." (interactive) - (mixvm (concat "mixvm -r -t -d " - (file-name-sans-extension (buffer-file-name))))) + (if (fboundp 'mixvm) + (mixvm (concat "mixvm -r -t -d " + (file-name-sans-extension (buffer-file-name)))) + (error "mixvm.el needs to be loaded to run `mixvm'"))) (defun mixal-debug () "Start mixvm for debugging. Assumes that file has been compiled with debugging support." (interactive) - (mixvm (concat "mixvm " - (file-name-sans-extension (buffer-file-name))))) + (if (fboundp 'mixvm) + (mixvm (concat "mixvm " + (file-name-sans-extension (buffer-file-name)))) + (error "mixvm.el needs to be loaded to run `mixvm'"))) ;;;###autoload (define-derived-mode mixal-mode fundamental-mode "mixal" |