--- a/lisp/ilisp/ilisp-kcl.el	Mon Aug 13 08:46:35 2007 +0200
+++ b/lisp/ilisp/ilisp-kcl.el	Mon Aug 13 08:46:56 2007 +0200
@@ -3,17 +3,18 @@
 ;;; ilisp-kcl.el --
 
 ;;; This file is part of ILISP.
-;;; Version: 5.7
+;;; Version: 5.8
 ;;;
 ;;; Copyright (C) 1990, 1991, 1992, 1993 Chris McConnell
 ;;;               1993, 1994 Ivan Vasquez
-;;;               1994, 1995 Marco Antoniotti and Rick Busdiecker
+;;;               1994, 1995, 1996 Marco Antoniotti and Rick Busdiecker
+;;;               1996 Marco Antoniotti and Rick Campbell
 ;;;
 ;;; Other authors' names for which this Copyright notice also holds
 ;;; may appear later in this file.
 ;;;
-;;; Send mail to 'ilisp-request@lehman.com' to be included in the
-;;; ILISP mailing list. 'ilisp@lehman.com' is the general ILISP
+;;; Send mail to 'ilisp-request@naggum.no' to be included in the
+;;; ILISP mailing list. 'ilisp@naggum.no' is the general ILISP
 ;;; mailing list were bugs and improvements are discussed.
 ;;;
 ;;; ILISP is freely redistributable under the terms found in the file
@@ -43,8 +44,10 @@
 ;;;
 (defdialect kcl "Kyoto Common LISP" clisp
   (setq comint-prompt-regexp "^>+"
-        ilisp-error-regexp "Error: "
+        ilisp-error-regexp "Error: [^\n]*"
         ilisp-binary-extension "o"
+        ilisp-init-binary-extension "o"
+	ilisp-binary-command "\"o\""
         comint-fix-error ":q"
         comint-continue ":r"
 	comint-prompt-status
@@ -64,19 +67,36 @@
         comint-interrupt-regexp ">>Condition: Terminal Interrupt"
         comint-continue ":q"
         ilisp-reset ":q!"
-        ilisp-error-regexp ">>Error:"))
+        ilisp-error-regexp ">>Error:[^\n]*"))
 (if (not ibcl-program) (setq ibcl-program "ibcl"))
 
 
+;;; GCL and ECL (at least) have slightly different compilers and
+;;; runtimes, hence we need to provide different extensions for their
+;;; init files.
+;;; Marco Antoniotti <marcoxa@icsi.berkeley.edu> 19951028.
+
 ;;; GCL -- I assume it is exactly as AKCL.
 ;;; Should check whether it is similar to IBUKI.
-(defdialect gcl "GNU Common LISP" akcl)
+(defdialect gcl "GNU Common LISP" akcl
+  (setq comint-prompt-regexp "^>+"
+	ilisp-binary-extension "o"
+        ilisp-init-binary-extension "gcl.o"
+	ilisp-binary-command "\"o\""
+	ilisp-init-binary-command "\"gcl.o\""
+	))
 (if (not gcl-program) (setq gcl-program "gcl"))
 
 
 ;;; ECL -- Beppe Attardi's developments over AKCL
 
-(defdialect ecl "EcoLisp Common LISP" akcl)
-(if (not ecl-program) (setq gcl-program "ecl"))
+(defdialect ecl "EcoLisp Common LISP" akcl
+  (setq comint-prompt-regexp "^>+"
+	ilisp-binary-extension "o"
+        ilisp-init-binary-extension "ecl.o"
+	ilisp-binary-command "\"o\""
+	ilisp-init-binary-command "\"ecl.o\""
+	))
+(if (not ecl-program) (setq ecl-program "ecl"))
 
 ;;; end of file -- ilisp-kcl.el --