Merge commit 'ae006838093cfeb67b3818526622fb5cb61d5300' of git://github.com/scymtym...
[cl-gtk2.git] / gtk / gtk.spinner.lisp
diff --git a/gtk/gtk.spinner.lisp b/gtk/gtk.spinner.lisp
new file mode 100644 (file)
index 0000000..5782858
--- /dev/null
@@ -0,0 +1,9 @@
+(in-package :gtk)
+
+(defcfun (spinner-start "gtk_spinner_start") :void
+  (spinner (g-object gtk:spinner)))
+
+(defcfun (spinner-stop "gtk_spinner_stop") :void
+  (spinner (g-object gtk:spinner)))
+
+(export '(spinner-start spinner-stop))