home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 2: Applications / Linux Cubed Series 2 - Applications.iso / editors / emacs / xemacs / xemacs-1.006 / xemacs-1 / lib / xemacs-19.13 / lisp / ilisp / ilisp-sch.el < prev    next >
Encoding:
Text File  |  1995-01-26  |  1.4 KB  |  55 lines
  1. ;;; -*- Mode: Emacs-Lisp -*-
  2.  
  3. ;;; ilisp-sch.el --
  4.  
  5. ;;; This file is part of ILISP.
  6. ;;; Version: 5.7
  7. ;;;
  8. ;;; Copyright (C) 1990, 1991, 1992, 1993 Chris McConnell
  9. ;;;               1993, 1994 Ivan Vasquez
  10. ;;;               1994, 1995 Marco Antoniotti and Rick Busdiecker
  11. ;;;
  12. ;;; Other authors' names for which this Copyright notice also holds
  13. ;;; may appear later in this file.
  14. ;;;
  15. ;;; Send mail to 'ilisp-request@lehman.com' to be included in the
  16. ;;; ILISP mailing list. 'ilisp@lehman.com' is the general ILISP
  17. ;;; mailing list were bugs and improvements are discussed.
  18. ;;;
  19. ;;; ILISP is freely redistributable under the terms found in the file
  20. ;;; COPYING.
  21.  
  22.  
  23.  
  24. ;;; Scheme
  25.  
  26. (defdialect scheme "Scheme" ilisp
  27.   (setq ilisp-block-command "(begin \n%s)")
  28.   (setq ilisp-load-command "(load \"%s\")")
  29.   )
  30.  
  31. (if (not scheme-program) (setq scheme-program "scheme"))
  32.  
  33. ;;;Cscheme
  34. ;;; This has a problem since interrupts cause things to crash
  35. ;(defdialect cscheme "C Scheme"
  36. ;  scheme
  37. ;  (setq comint-prompt-regexp
  38. ;   "^[0-9]+ \\([\\]=]=>\\|Error->\\|Bkpt->\\|Debug->\\|Where->\\) ")
  39. ;  (setq ilisp-program "cscheme")
  40. ;  (setq ilisp-binary-extension "bin")
  41. ;  )
  42.  
  43.  
  44. ;;; Oaklisp
  45.  
  46. (defdialect oaklisp "Oaklisp Scheme"
  47.   scheme
  48.   (setq comint-prompt-regexp ">+ ")
  49.   (setq comint-fix-error "(ret 0)")
  50.   (setq ilisp-last-command "*")
  51.   (setq ilisp-describe-command "(describe %s)"))
  52.  
  53.  
  54. ;;; end of file -- ilisp-sch.el --
  55.