add Glib::Object::Introspection fake package

2 files changed, 33 insertions, 0 deletions

diff --git a/NEWS b/NEWS
index 0466be3..a3f89ff 100644
--- a/NEWS
+++ b/NEWS
@@ -1,4 +1,5 @@
 - fake packages:
+  o add Glib::Object::Introspection
   o update Glib & Gtk2 package
 
 Version 1.2.27 - 27 August 2016, by Thierry Vignaud
diff --git a/fake_packages/Glib/Object/Introspection.pm b/fake_packages/Glib/Object/Introspection.pm
new file mode 100644
index 0000000..ddcb1a6
--- /dev/null
+++ b/fake_packages/Glib/Object/Introspection.pm
@@ -0,0 +1,32 @@
+
+package Glib::Object::Introspection;
+our @ISA = qw();
+sub CHECK_VERSION { my ($_class, $_major, $_minor, $_micro) = @_ }
+sub _add_interface { my ($_class, $_basename, $_interface_name, $_target_package) = @_ }
+sub _construct_boxed { my ($_class, $_package) = @_ }
+sub _create_invoker_sub { my ($_o_handle_sentinel_boolean) = @_ }
+sub _fetch_constant { my ($_class, $_basename, $_constant) = @_ }
+sub _find_non_perl_parents { my ($_class, $_basename, $_object_name, $_target_package) = @_ }
+sub _find_vfuncs_with_implementation { my ($_class, $_object_package, $_target_package) = @_ }
+sub _get_field { my ($_class, $_basename, $_namespace, $_field, $_invocant) = @_ }
+sub _install_overrides { my ($_class, $_basename, $_object_name, $_target_package) = @_ }
+sub _invoke_fallback_vfunc { my ($_class, $_vfunc_package, $_vfunc_name, $_target_package, @_more_paras) = @_ }
+sub _load_library { my ($_class, $_namespace, $_version, $_o_search_path) = @_ }
+sub _register_boxed_synonym { my ($_class, $_reg_basename, $_reg_name, $_syn_gtype_function) = @_ }
+sub _register_types { my ($_class, $_namespace, $_package) = @_ }
+sub _set_field { my ($_class, $_basename, $_namespace, $_field, $_invocant, $_new_value) = @_ }
+sub _use_generic_signal_marshaller_for { my ($_class, $_package, $_signal, $_o_args_converter) = @_ }
+sub convert_enum_to_sv { my ($_class, $_package, $_n) = @_ }
+sub convert_sv_to_enum { my ($_class, $_package, $_sv) = @_ }
+sub invoke { my ($_class, $_basename, $_namespace, $_function, @_more_paras) = @_ }
+sub setup { my ($_class, @_more_paras) = @_ }
+
+package Glib::Object::Introspection::GValueWrapper;
+our @ISA = qw();
+sub DESTROY { my ($_sv) = @_ }
+sub new { my ($_class, $_type_package, $_perl_value) = @_ }
+
+package Glib::Object::Introspection::_FuncWrapper;
+our @ISA = qw();
+sub DESTROY { my ($_code) = @_ }
+sub _invoke { my ($_code, @_more_paras) = @_ }