X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/clg/blobdiff_plain/a92553bd87d94b64654a70a7293b3d46cfec4595..b22f5374ff6ec897e05fca6711b3498be063e5d4:/gtk/gtkcontainer.lisp?ds=inline diff --git a/gtk/gtkcontainer.lisp b/gtk/gtkcontainer.lisp index 0f14ffc..6c66e62 100644 --- 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. -;; $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") +(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))