summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2015-05-25 14:37:47 -0400
committerThierry Vignaud <thierry.vignaud@gmail.com>2015-05-25 14:37:47 -0400
commitbedfb8e2fc58ea7898e7c1bcfaa0fcc5196dd1e6 (patch)
treec62caf0ace8f036398f303e0a237185de8024e6e
parentec9684ea330aff629bc830fcce9e431348184f5b (diff)
downloadperl_checker-bedfb8e2fc58ea7898e7c1bcfaa0fcc5196dd1e6.tar
perl_checker-bedfb8e2fc58ea7898e7c1bcfaa0fcc5196dd1e6.tar.gz
perl_checker-bedfb8e2fc58ea7898e7c1bcfaa0fcc5196dd1e6.tar.bz2
perl_checker-bedfb8e2fc58ea7898e7c1bcfaa0fcc5196dd1e6.tar.xz
perl_checker-bedfb8e2fc58ea7898e7c1bcfaa0fcc5196dd1e6.zip
update Glib
-rw-r--r--fake_packages/Glib.pm85
1 files changed, 85 insertions, 0 deletions
diff --git a/fake_packages/Glib.pm b/fake_packages/Glib.pm
index e45e1e1..b24d29a 100644
--- a/fake_packages/Glib.pm
+++ b/fake_packages/Glib.pm
@@ -481,6 +481,91 @@ sub register_enum { my ($_class, $_name, @_more_paras) = @_ }
sub register_flags { my ($_class, $_name, @_more_paras) = @_ }
sub register_object { my ($_class, $_parent_package, $_new_package, @_more_paras) = @_ }
+package Glib::Variant;
+our @ISA = qw();
+sub DESTROY { my ($_variant) = @_ }
+sub byteswap { my ($_value) = @_ }
+sub classify { my ($_value) = @_ }
+sub compare { my ($_one, $_two) = @_ }
+sub equal { my ($_one, $_two) = @_ }
+sub get { my ($_v, $_o_format) = @_ }
+sub get_boolean { my ($_value) = @_ }
+sub get_byte { my ($_value) = @_ }
+sub get_bytestring { my ($_value) = @_ }
+sub get_child_value { my ($_value, $_index_) = @_ }
+sub get_double { my ($_value) = @_ }
+sub get_handle { my ($_value) = @_ }
+sub get_int16 { my ($_value) = @_ }
+sub get_int32 { my ($_value) = @_ }
+sub get_int64 { my ($_value) = @_ }
+sub get_maybe { my ($_value) = @_ }
+sub get_normal_form { my ($_value) = @_ }
+sub get_size { my ($_value) = @_ }
+sub get_string { my ($_value) = @_ }
+sub get_type { my ($_value) = @_ }
+sub get_type_string { my ($_value) = @_ }
+sub get_uint16 { my ($_value) = @_ }
+sub get_uint32 { my ($_value) = @_ }
+sub get_uint64 { my ($_value) = @_ }
+sub get_variant { my ($_value) = @_ }
+sub hash { my ($_value) = @_ }
+sub is_container { my ($_value) = @_ }
+sub is_normal_form { my ($_value) = @_ }
+sub is_object_path { my ($_string) = @_ }
+sub is_of_type { my ($_value, $_type) = @_ }
+sub is_signature { my ($_string) = @_ }
+sub lookup_value { my ($_dictionary, $_key, $_expected_type) = @_ }
+sub n_children { my ($_value) = @_ }
+sub new { my ($_class, $_format, @_more_paras) = @_ }
+sub new_array { my ($_class, $_child_type, $_children) = @_ }
+sub new_boolean { my ($_class, $_value) = @_ }
+sub new_byte { my ($_class, $_value) = @_ }
+sub new_bytestring { my ($_class, $_string) = @_ }
+sub new_dict_entry { my ($_class, $_key, $_value) = @_ }
+sub new_double { my ($_class, $_value) = @_ }
+sub new_handle { my ($_class, $_value) = @_ }
+sub new_int16 { my ($_class, $_value) = @_ }
+sub new_int32 { my ($_class, $_value) = @_ }
+sub new_int64 { my ($_class, $_value) = @_ }
+sub new_maybe { my ($_class, $_child_type, $_child) = @_ }
+sub new_object_path { my ($_class, $_object_path) = @_ }
+sub new_signature { my ($_class, $_signature) = @_ }
+sub new_string { my ($_class, $_string) = @_ }
+sub new_tuple { my ($_class, $_children) = @_ }
+sub new_uint16 { my ($_class, $_value) = @_ }
+sub new_uint32 { my ($_class, $_value) = @_ }
+sub new_uint64 { my ($_class, $_value) = @_ }
+sub new_variant { my ($_class, $_value) = @_ }
+sub parse { my ($_type, $_text) = @_ }
+
+package Glib::VariantType;
+our @ISA = qw();
+sub element { my ($_type) = @_ }
+sub equal { my ($_type1, $_type2) = @_ }
+sub first { my ($_type) = @_ }
+sub get_string { my ($_type) = @_ }
+sub hash { my ($_type) = @_ }
+sub is_array { my ($_type) = @_ }
+sub is_basic { my ($_type) = @_ }
+sub is_container { my ($_type) = @_ }
+sub is_definite { my ($_type) = @_ }
+sub is_dict_entry { my ($_type) = @_ }
+sub is_maybe { my ($_type) = @_ }
+sub is_subtype_of { my ($_type, $_supertype) = @_ }
+sub is_tuple { my ($_type) = @_ }
+sub is_variant { my ($_type) = @_ }
+sub key { my ($_type) = @_ }
+sub n_items { my ($_type) = @_ }
+sub new { my ($_class, $_type_string) = @_ }
+sub new_array { my ($_class, $_element) = @_ }
+sub new_dict_entry { my ($_class, $_key, $_value) = @_ }
+sub new_maybe { my ($_class, $_element) = @_ }
+sub new_tuple { my ($_class, $_items) = @_ }
+sub next { my ($_type) = @_ }
+sub string_is_valid { my ($_type_string) = @_ }
+sub string_scan { my ($_string) = @_ }
+sub value { my ($_type) = @_ }
+
package MY;
our @ISA = qw();
sub c_o { my ($__) = @_ }