anchor.diff:  ;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
   ;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
   
  -;; $Id: gtk.lisp,v 1.49 2006-02-06 19:16:17 espen Exp $
  +;; $Id: gtk.lisp,v 1.50 2006-02-08 15:22:33 espen Exp $
   
   
   (in-package "GTK")
  
positive.code:   (y int)
    (width int)
    (heigth int))
  
  (defbinding %window-get-icon-list () (glist (copy-of gdk:pixbuf))
    (window window))
  
  
  ;;; Window group
  
negative.code:   (window window)
    (left int :out) (top int :out) (rigth int :out) (bottom int :out))
  
  (defbinding %window-get-icon-list () (glist (copy-of gdk:pixbuf))
    (window window))
  
  (defbinding window-get-position () nil
  