;; -*- Mode: Emacs-Lisp -*-

; STk einbinden
; nur, falls /usr/local/bin nicht im Pfad ist und STk dort installiert ist
;(setq exec-path (cons "/usr/local/bin" exec-path))
(autoload 'run-scheme "cmuscheme" "Run an inferior Scheme process." t)
(setq scheme-program-name "stk -no-tk")
(setq inferior-scheme-mode-hook '(lambda() (split-window)))

; SWI-Prolog einbinden
(autoload 'run-prolog "prolog" "Run an inferior Prolog process." t)
(setq prolog-program-name "pl")
(setq inferior-prolog-mode-hook '(lambda() (split-window)))

; Modes anpassen
; Prolog-Files im Prolog-Mode editieren
; => Perl-Files brauchen zur Unterscheidung eine eigene Startzeile
(setq auto-mode-alist (cons '("\\.pl\\'" . prolog-mode) auto-mode-alist))
; Scheme-Files aller Art im Scheme-Mode editieren
(setq auto-mode-alist
      (append '(("\\.scm$" . scheme-mode)
	       ("\\.stk$" . scheme-mode)
	       ("\\.stklos$" . scheme-mode))
      auto-mode-alist))