(use-modules (oop goops) (gnome gobject) (gnome glib) (gnome gtk) (os process) (gnome gobject utils))

(define (test-func3 param3)
  (let* ((gtksck (make <gtk-socket>)) 
         (gtk-socket-get-id gtksck))))

Add a code snippet to your website: www.paste.org