cleanup and trying to catch frames

gtk-playground.lisp

@@ -21,3 +21,13 @@
 
 ;; yay, this works. good.
 
+;; this https://www.crategus.com/books/cl-gtk/gtk-tutorial.html#idp3
+
+;; and how could i integrate with out node of pipewire?
+(defun start-ffmpeg ()
+  (uiop:run-program '("ffmpeg" "-f" "pipewire" "-i" "out-node" "-f" "rawvideo" "-pix_fmt" "rgb24" "-")
+						  :output :lines
+                    :error-output :lines
+                    :input :interactive
+                    :wait nil
+						  ))