~mdw
/
clg
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
5f0ccd6
)
Duplicate definitions removed
author
espen
<espen>
Tue, 28 Feb 2006 16:34:37 +0000
(16:34 +0000)
committer
espen
<espen>
Tue, 28 Feb 2006 16:34:37 +0000
(16:34 +0000)
gtk/gtkobject.lisp
patch
|
blob
|
blame
|
history
diff --git
a/gtk/gtkobject.lisp
b/gtk/gtkobject.lisp
index
cdd4cc0
..
e88046c
100644
(file)
--- 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.
;; 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.3
2 2006-02-26 15:22:0
7 espen Exp $
+;; $Id: gtkobject.lisp,v 1.3
3 2006-02-28 16:34:3
7 espen Exp $
(in-package "GTK")
(in-package "GTK")
@@
-121,12
+121,6
@@
(call-next-method))
(call-next-method)))
(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))
(defmethod initialize-internal-slot-functions ((slotd effective-child-slot-definition))
(let ((type (slot-definition-type slotd))