(in-package :gobject)
-(define-g-object-class "GInitiallyUnowned" g-initially-unowned (g-object) ())
\ No newline at end of file
+(defclass g-initially-unowned (g-object)
+ ()
+ (:metaclass gobject-class)
+ (:g-type-name . "GInitiallyUnowned")
+ (:documentation "Base class that has initial \"floating\" reference."))