PageRenderTime 5ms CodeModel.GetById 1ms app.highlight 1ms RepoModel.GetById 1ms app.codeStats 0ms

/src/wrappers/gtk/library/gtk_vbox.e

http://github.com/tybor/Liberty
Specman e | 49 lines | 37 code | 7 blank | 5 comment | 2 complexity | dab32a50589b40b48e52960c8cd963cd MD5 | raw file
 1indexing
 2	description: "GtkVBox -- A vertical container box."
 3	copyright: "[
 4					Copyright (C) 2006 eiffel-libraries team, GTK+ team
 5					
 6					This library is free software; you can redistribute it and/or
 7					modify it under the terms of the GNU Lesser General Public License
 8					as published by the Free Software Foundation; either version 2.1 of
 9					the License, or (at your option) any later version.
10					
11					This library is distributed in the hope that it will be useful, but
12					WITHOUT ANY WARRANTY; without even the implied warranty of
13					MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14					Lesser General Public License for more details.
15
16					You should have received a copy of the GNU Lesser General Public
17					License along with this library; if not, write to the Free Software
18					Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
19					02110-1301 USA
20					]"
21	date: "$Date:$"
22	revision: "$Revision:$"
23
24class GTK_VBOX
25inherit
26	GTK_BOX
27		-- GtkHBox implements AtkImplementorIface.
28insert
29	GTK_VBOX_EXTERNALS
30		
31creation make, from_external_pointer
32
33feature {} -- Creation
34	make (an_homogeneous: BOOLEAN; a_spacing: INTEGER) is
35			-- Creates a new GtkVBox. If `an_homogeneous' is True all
36			-- children are to be given equal space
37			-- allotments. `a_spacing' is the number of pixels to place
38			-- by default between children.
39		require gtk_initialized: gtk.is_initialized
40		do
41			from_external_pointer (gtk_vbox_new (an_homogeneous.to_integer, a_spacing))
42		end
43	
44feature -- struct size
45	struct_size: INTEGER is
46		external "C inline use <gtk/gtk.h>"
47		alias "sizeof(GtkVBox)"
48		end
49end