Defgenerics added to get rid of a few style warnings

diff --git a/gtk/gtkcontainer.lisp b/gtk/gtkcontainer.lisp
index 4cd200e4de9c8bd7458fedf6ffc0f1738b212c7f..7e50f1cbd023168cadffd7d0899d863e24eff1c5 100644 (file)
--- a/gtk/gtkcontainer.lisp
+++ b/gtk/gtkcontainer.lisp
@@ -20,10 +20,16 @@
 ;; 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: gtkcontainer.lisp,v 1.19 2006-02-19 19:31:14 espen Exp $
+;; $Id: gtkcontainer.lisp,v 1.20 2006-02-28 16:32:18 espen Exp $

 
 (in-package "GTK")
 
 
 (in-package "GTK")
 

+(defgeneric container-add (container widget &rest args))
+(defgeneric container-remove (container widget))
+(defgeneric container-children (container))
+(defgeneric (setf container-children) (children container))
+
+

 (defmethod shared-initialize ((container container) names &rest initargs 
                              &key child children child-args 
                                   (show-children nil show-children-p))
 (defmethod shared-initialize ((container container) names &rest initargs 
                              &key child children child-args 
                                   (show-children nil show-children-p))