From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Orm Finnendahl Newsgroups: gmane.emacs.help Subject: no connection lisp-mode buffer and *inferior-lisp* Date: Wed, 15 Oct 2003 12:34:36 +0200 Organization: Folkwang-Hochschule, Essen, Germany Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Message-ID: <20031015103435.GC2097@finnendahl.de> NNTP-Posting-Host: deer.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=iso-8859-1 X-Trace: sea.gmane.org 1066214481 17981 80.91.224.253 (15 Oct 2003 10:41:21 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Wed, 15 Oct 2003 10:41:21 +0000 (UTC) Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Wed Oct 15 12:41:19 2003 Return-path: Original-Received: from monty-python.gnu.org ([199.232.76.173]) by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 1A9j5j-00062v-00 for ; Wed, 15 Oct 2003 12:41:19 +0200 Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org) by monty-python.gnu.org with esmtp (Exim 4.24) id 1A9j4g-0005Vc-5e for geh-help-gnu-emacs@m.gmane.org; Wed, 15 Oct 2003 06:40:14 -0400 Original-Received: from list by monty-python.gnu.org with tmda-scanned (Exim 4.24) id 1A9j3d-0005UM-8d for help-gnu-emacs@gnu.org; Wed, 15 Oct 2003 06:39:09 -0400 Original-Received: from mail by monty-python.gnu.org with spam-scanned (Exim 4.24) id 1A9j36-0005Ny-Hd for help-gnu-emacs@gnu.org; Wed, 15 Oct 2003 06:39:07 -0400 Original-Received: from [193.175.156.129] (helo=icemserv.folkwang-hochschule.de) by monty-python.gnu.org with esmtp (TLSv1:DES-CBC3-SHA:168) (Exim 4.24) id 1A9izP-0004dZ-3N for help-gnu-emacs@gnu.org; Wed, 15 Oct 2003 06:34:47 -0400 Original-Received: from grisey.local (root@icemserv.folkwang-hochschule.de [193.175.156.129]) by icemserv.folkwang-hochschule.de (8.11.6/8.11.6) with ESMTP id h9FAf3S04491 for ; Wed, 15 Oct 2003 12:41:03 +0200 (CEST) (envelope-from finnendahl@folkwang-hochschule.de) Original-Received: from orm by grisey.local with local (Exim 3.36 #1 (Debian)) id 1A9izE-0000ye-00 for ; Wed, 15 Oct 2003 12:34:36 +0200 Original-To: help-gnu-emacs-mailing-list Mail-Followup-To: help-gnu-emacs-mailing-list Content-Disposition: inline User-Agent: Mutt/1.5.4i X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.2 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: main.gmane.org gmane.emacs.help:13195 X-Report-Spam: http://spam.gmane.org/gmane.emacs.help:13195 Hi, I posted the message below a couple of days ago and didn't get any response. I guess not many people on this list are using ilisp but maybe someone can redirect me to some place where I could get help? -- Orm ---------------------- Begin forwarded message ------------------- since upgrading to emacs 21.3 I can't get the connection between a source lisp file and an inferior lisp buffer. It used to work fine before. I started up an inferior lisp with "M-x run-lisp", which establishes an *inferior-lisp* buffer. Trying to evaluate an expression in a lisp-mode buffer, I get the error "You must start an inferior LISP with run-ilisp" in the command buffer. Doing that and specifying "lisp" as the Dialect won't help either. Below is my configuration concerning lisp/scheme in my .emacs. I had the same problem with scheme but found out that this goes away if I switch to scheme-mode in an arbitrary buffer *before* issuing "M-x run-scheme". After that it works with all scheme-mode buffers. I suspect some scheme-mode hook taking care of establishing a link between scheme mode buffers and the scheme process but couldn't find the culprit. Now I just have (scheme-mode) in my .emacs as a workaround. I'd rather solve that cleaner though. Thanx for any hints, Orm -------------------------------------------------------------------- (setq inferior-lisp-program "/usr/local/bin/clisp") (load-library "ilisp-scheme-easy-menu") (setq scheme-program-name "guile -l /usr/share/guile/site/siteinit.scm") (setq guile-program "guile -l /usr/share/guile/site/siteinit.scm") ;; Add new keybindings: C-x C-e evaluates the *next* form, ;; C-x C-m macroexpands the next form. (defun lisp-eval-sexp (&optional and-go) "Send the next sexp to the inferior Lisp process. Prefix argument means switch to the Lisp buffer afterwards." (interactive "P") (lisp-eval-region (point) (save-excursion (forward-sexp) (point)) and-go ) ) (defun lisp-macroexpand-region (start end &optional and-go) "Macroexpand the current region in the inferior Lisp process. Prefix argument means switch to the Lisp buffer afterwards." (interactive "r\nP") (comint-send-string (inferior-lisp-proc) (format "(macroexpand-1 (quote %s))\n" (buffer-substring start end)) ) (if and-go (switch-to-lisp t)) ) (defun lisp-macroexpand-sexp (&optional and-go) "Macroexpand the next sexp in the inferior Lisp process. Prefix argument means switch to the Lisp buffer afterwards." (interactive "P") (lisp-macroexpand-region (point) (save-excursion (forward-sexp) (point)) and-go ) ) ;; Define the great keybindings. (inferior-lisp-install-letter-bindings) ------------------------------------------------------------------------ ---------------------- End forwarded message --------------------------