8 lines
189 B
Forth
8 lines
189 B
Forth
namespace GtkNamespace
|
|
|
|
open Gtk
|
|
|
|
type Gtk_Widget (builder : Builder) =
|
|
inherit Box(builder.GetObject("Gtk_Widget").Handle)
|
|
|
|
new() = new Gtk_Widget(new Builder("Gtk_Widget.glade"))
|