{-# LINE 2 "./Graphics/UI/Gtk/Misc/Accessible.chs" #-}-- -*-haskell-*--- GIMP Toolkit (GTK) Widget accessible---- Author : Andy Stewart---- Created: 23 Oct 2010---- Copyright (C) 2010 Andy Stewart---- This library is free software; you can redistribute it and/or-- modify it under the terms of the GNU Lesser General Public-- License as published by the Free Software Foundation; either-- version 2.1 of the License, or (at your option) any later version.---- This library is distributed in the hope that it will be useful,-- but WITHOUT ANY WARRANTY; without even the implied warranty of-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU-- Lesser General Public License for more details.---- |-- Maintainer : gtk2hs-users@lists.sourceforge.net-- Stability : provisional-- Portability : portable (depends on GHC)---- A 'Object' representing an adjustable bounded value--moduleGraphics.UI.Gtk.Misc.Accessible(-- * Detail---- | Accessible accessibility support for widgets.---- * Class Hierarchy-- |-- @-- | 'GObject'-- | +----'AtkObject'-- | +----Accessible-- @-- * TypesAccessible,AccessibleClass,castToAccessible,gTypeAccessible,toAccessible,-- * MethodsaccessibleGetWidget,accessibleSetWidget)whereimportControl.Monad(liftM)importSystem.Glib.FFIimportSystem.Glib.AttributesimportSystem.Glib.PropertiesimportGraphics.UI.Gtk.Abstract.Object(makeNewObject)importGraphics.UI.Gtk.Types{-# LINE 62 "./Graphics/UI/Gtk/Misc/Accessible.chs" #-}importGraphics.UI.Gtk.Signals{-# LINE 63 "./Graphics/UI/Gtk/Misc/Accessible.chs" #-}{-# LINE 65 "./Graphics/UI/Gtk/Misc/Accessible.chs" #-}---------------------- Methods-- | Gets the 'Widget' corresponding to the 'Accessible'.---- * Available since Gtk+ version 2.22--accessibleGetWidget::AccessibleClassself=>self->IO(MaybeWidget)-- ^ returns the 'Widget' corresponding to the 'Accessible', or 'Nothing'.accessibleGetWidgetself=maybeNull(makeNewObjectmkWidget)$(\(Accessiblearg1)->withForeignPtrarg1$\argPtr1->gtk_accessible_get_widgetargPtr1){-# LINE 79 "./Graphics/UI/Gtk/Misc/Accessible.chs" #-}(toAccessibleself)-- | Sets the 'Widget' corresponding to the 'Accessible'.---- * Available since Gtk+ version 2.22--accessibleSetWidget::(AccessibleClassself,WidgetClasswidget)=>self-- ^ @accessible@ a 'Accessible'->widget-- ^ @widget@ a 'Widget'->IO()accessibleSetWidgetselfwidget=(\(Accessiblearg1)(Widgetarg2)->withForeignPtrarg1$\argPtr1->withForeignPtrarg2$\argPtr2->gtk_accessible_set_widgetargPtr1argPtr2){-# LINE 91 "./Graphics/UI/Gtk/Misc/Accessible.chs" #-}(toAccessibleself)(toWidgetwidget)foreignimportccallsafe"gtk_accessible_get_widget"gtk_accessible_get_widget::((PtrAccessible)->(IO(PtrWidget)))foreignimportccallsafe"gtk_accessible_set_widget"gtk_accessible_set_widget::((PtrAccessible)->((PtrWidget)->(IO())))