new files

diff --git a/gtk/gtk.dnd.lisp b/gtk/gtk.dnd.lisp
new file mode 100644 (file)
index 0000000..8a2b409
--- /dev/null
+++ b/gtk/gtk.dnd.lisp
@@ -0,0 +1,9 @@
+(in-package :gtk)
+
+(define-g-flags "GtkTargetFlags" target-flags
+    (:export t :type-initializer "gdk_target_flags_get_type")
+  (:same-app 1)
+  (:same-widget 2)
+  (:other-app 4)
+  (:other-widget 8))
+

diff --git a/gtk/gtk.selections.lisp b/gtk/gtk.selections.lisp
new file mode 100644 (file)
index 0000000..d97d014
--- /dev/null
+++ b/gtk/gtk.selections.lisp
@@ -0,0 +1,9 @@
+(in-package :gtk)
+
+(define-g-boxed-cstruct target-entry "GtkTargetEntry"
+  (target :string :initform 0)
+  (flags target-flags :initform 0)
+  (info :uint :initform 0))
+
+(export (boxed-related-symbols 'target-entry))
+