From 5d3b7815ebfa9e14b8e8e8d40b2451b9eefe9de3 Mon Sep 17 00:00:00 2001
From: Gerd Heber <gheber@hdfgroup.org>
Date: Fri, 17 Jul 2015 06:16:07 -0500
Subject: [PATCH] Added ECL feature expressions.

---
 examples/overview.lisp | 2 +-
 src/cat-init.lisp      | 6 +++---
 2 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/examples/overview.lisp b/examples/overview.lisp
index b00f38e..060bf6e 100644
--- a/examples/overview.lisp
+++ b/examples/overview.lisp
@@ -160,5 +160,5 @@
 
 (format t "~%~%Hence, pi_5(Moore(Z/2Z)) is Z/4Z. QED~%")
 
-#+ccl (quit)
+#+(or ccl ecl) (quit)
 #+sbcl (sb-ext:exit)
diff --git a/src/cat-init.lisp b/src/cat-init.lisp
index 58de261..0b29c93 100644
--- a/src/cat-init.lisp
+++ b/src/cat-init.lisp
@@ -61,14 +61,14 @@
 
 (DEFCONSTANT +SOURCE-EXTENSION+
   #+(or allegro clisp lispworks) "cl"
-  #+(or ccl sbcl) "lisp"
-  #-(or allegro ccl clisp lispworks sbcl)
+  #+(or ccl ecl sbcl) "lisp"
+  #-(or allegro ccl clisp ecl lispworks sbcl)
     (error "Not an Allegro or CCL or CLisp or LispWorks or SBCL environment."))
 
 (DEFCONSTANT +COMPILED-EXTENSION+ 
     #+(or allegro sbcl) "fasl"
     #+ccl "lafsl"
-    #+clisp "fas"
+    #+ (or clisp ecl) "fas"
     #+lispworks "ofasl")
 
 (DEFUN LOAD-SFILES ()