From 695510d60b1ce74cd2e298cb2a4fa754cdb15a4a Mon Sep 17 00:00:00 2001 From: espen Date: Tue, 28 Feb 2006 16:34:37 +0000 Subject: [PATCH] Duplicate definitions removed --- gtk/gtkobject.lisp | 8 +------- 1 file changed, 1 insertion(+), 7 deletions(-) diff --git a/gtk/gtkobject.lisp b/gtk/gtkobject.lisp index cdd4cc0..e88046c 100644 --- a/gtk/gtkobject.lisp +++ b/gtk/gtkobject.lisp @@ -20,7 +20,7 @@ ;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE ;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. -;; $Id: gtkobject.lisp,v 1.32 2006-02-26 15:22:07 espen Exp $ +;; $Id: gtkobject.lisp,v 1.33 2006-02-28 16:34:37 espen Exp $ (in-package "GTK") @@ -121,12 +121,6 @@ (call-next-method)) (call-next-method))) -(progn - #+cmu(declaim (optimize (inhibit-warnings 3))) - #+sbcl(declaim (muffle-conditions compiler-note)) - (defun %container-child-get-property (parent child pname gvalue)) - (defun %container-child-set-property (parent child pname gvalue))) - (defmethod initialize-internal-slot-functions ((slotd effective-child-slot-definition)) (let ((type (slot-definition-type slotd)) -- 2.11.0