From 208132ca0485df62688e21dcfb043756965294bb Mon Sep 17 00:00:00 2001
From: Mark Cox <markcox80@gmail.com>
Date: Thu, 25 Oct 2012 20:53:44 +1000
Subject: [PATCH 2/2] Update cells to be compatible with ECL.

---
 cells.asd       | 2 +-
 defpackage.lisp | 5 +++--
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/cells.asd b/cells.asd
index 7693e04..8c5e0f3 100755
--- a/cells.asd
+++ b/cells.asd
@@ -1,6 +1,6 @@
 ;;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Base: 10 -*-
 
-#+(or allegro lispworks cmu mcl clisp cormanlisp sbcl scl)
+#+(or allegro lispworks cmu mcl clisp cormanlisp sbcl scl ecl)
 (progn
 (declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0)))
 
diff --git a/defpackage.lisp b/defpackage.lisp
index 30b5aea..278cdac 100755
--- a/defpackage.lisp
+++ b/defpackage.lisp
@@ -35,8 +35,9 @@
    #+sbcl #:sb-mop
    #+openmcl-partial-mop #:openmcl-mop
    #+(and mcl (not openmcl-partial-mop)) #:ccl
-   
-   #-(or allegro clisp cmu cormanlisp lispworks mcl sbcl)
+   #+ecl #:clos
+
+   #-(or allegro clisp cmu cormanlisp lispworks mcl sbcl ecl)
    #.(cerror "Provide a package name."
        "Don't know how to find the MOP package for this Lisp.")
    
-- 
1.8.0

