update Glib fake package

2 files changed, 9 insertions, 5 deletions

diff --git a/NEWS b/NEWS
index 196a5a8..cd3a199 100644
--- a/NEWS
+++ b/NEWS
@@ -1,3 +1,5 @@
+- update Glib fake package
+
 Version 1.2.24 - 14 October 2012, by Thierry Vignaud
 
 - recognize /r modifier for regexpes
diff --git a/fake_packages/Glib.pm b/fake_packages/Glib.pm
index e182eb5..e45e1e1 100644
--- a/fake_packages/Glib.pm
+++ b/fake_packages/Glib.pm
@@ -8,6 +8,8 @@ sub MICRO_VERSION() {}
 sub MINOR_VERSION() {}
 sub critical { my ($_class, $_domain, $_message) = @_ }
 sub dl_load_flags() {}
+sub enable_exceptions2 { my ($_class) = @_ }
+sub enable_exceptions3 { my ($_class) = @_ }
 sub error { my ($_class, $_domain, $_message) = @_ }
 sub filename_display_basename { my ($_filename) = @_ }
 sub filename_display_name { my ($_filename) = @_ }
@@ -481,10 +483,10 @@ sub register_object { my ($_class, $_parent_package, $_new_package, @_more_paras
 
 package MY;
 our @ISA = qw();
-sub c_o() {}
+sub c_o { my ($__) = @_ }
 sub const_cccmd() {}
-sub dynamic_lib() {}
+sub dynamic_lib { my ($__) = @_ }
 sub quiet_rule() {}
-sub static_lib() {}
-sub xs_c() {}
-sub xs_o() {}
+sub static_lib { my ($__) = @_ }
+sub xs_c { my ($__) = @_ }
+sub xs_o { my ($__) = @_ }