[Gtk2hs-commit] gtk2hs/gtk/layout HButtonBox.chs,NONE,1.1 VButtonBox.chs,NONE,1.1

[Duncan C. <dun...@us...>]

Update of /cvsroot/gtk2hs/gtk2hs/gtk/layout
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13720/gtk/layout

Added Files:
	HButtonBox.chs VButtonBox.chs 
Log Message:
add new widgets & demo contributed by Matthew Walton
also add Bin abstract class (just for completeness - it's pretty pointless)


--- NEW FILE: VButtonBox.chs ---
-- -*-haskell-*-
--  GIMP Toolkit (GTK) @entry Widget VButtonBox@
--
--  Author : Matthew Walton
--          
--  Created: 28 April 2004
--
--  Version $Revision: 1.1 $ from $Date: 2004/04/30 13:45:32 $
--
--  Copyright (c) 2004 Matthew Walton
--
--  This file is free software; you can redistribute it and/or modify
--  it under the terms of the GNU General Public License as published by
--  the Free Software Foundation; either version 2 of the License, or
--  (at your option) any later version.
--
--  This file 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 General Public License for more details.
--
-- @description@ --------------------------------------------------------------
--
--
-- @documentation@ ------------------------------------------------------------
--
--
-- @todo@ ---------------------------------------------------------------------

module VButtonBox (
  VButtonBox,
  VButtonBoxClass,
  castToVButtonBox,
  vButtonBoxNew
  ) where

import Monad (liftM)
import FFI

import Object (makeNewObject)
{#import Hierarchy#}
{#import Signal#}

{# context lib="gtk" prefix="gtk" #}

--methods

-- @constructor vButtonBoxNew@
--
vButtonBoxNew :: IO VButtonBox
vButtonBoxNew = makeNewObject mkVButtonBox $
  liftM castPtr {#call unsafe vbutton_box_new#}


--- NEW FILE: HButtonBox.chs ---
-- -*-haskell-*-
--  GIMP Toolkit (GTK) @entry Widget HButtonBox@
--
--  Author : Matthew Walton
--          
--  Created: 29 April 2004
--
--  Version $Revision: 1.1 $ from $Date: 2004/04/30 13:45:32 $
--
--  Copyright (c) 2004 Matthew Walton
--
--  This file is free software; you can redistribute it and/or modify
--  it under the terms of the GNU General Public License as published by
--  the Free Software Foundation; either version 2 of the License, or
--  (at your option) any later version.
--
--  This file 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 General Public License for more details.
--
-- @description@ --------------------------------------------------------------
--
--
-- @documentation@ ------------------------------------------------------------
--
--
-- @todo@ ---------------------------------------------------------------------

module HButtonBox(
  HButtonBox,
  HButtonBoxClass,
  castToHButtonBox,
  hButtonBoxNew
  ) where

import Monad (liftM)
import FFI

import Object (makeNewObject)
{#import Hierarchy#}
{#import Signal#}

{# context lib="gtk" prefix="gtk" #}

--methods

-- @constructor hButtonBoxNew@
--
hButtonBoxNew :: IO HButtonBox
hButtonBoxNew = makeNewObject mkHButtonBox $
  liftM castPtr {#call unsafe hbutton_box_new#}