gir_ffi 0.4.3 → 0.5.0

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: gir_ffi
 version: !ruby/object:Gem::Version
-  version: 0.4.3
+  version: 0.5.0
   prerelease: 
 platform: ruby
 authors:
@@ -9,7 +9,7 @@ authors:
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2012-11-02 00:00:00.000000000 Z
+date: 2013-01-19 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: ffi
@@ -18,7 +18,7 @@ dependencies:
     requirements:
     - - ~>
       - !ruby/object:Gem::Version
-        version: 1.0.8
+        version: 1.2.0
   type: :runtime
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
@@ -26,7 +26,7 @@ dependencies:
     requirements:
     - - ~>
       - !ruby/object:Gem::Version
-        version: 1.0.8
+        version: 1.2.0
 - !ruby/object:Gem::Dependency
   name: indentation
   requirement: !ruby/object:Gem::Requirement
@@ -48,17 +48,17 @@ dependencies:
   requirement: !ruby/object:Gem::Requirement
     none: false
     requirements:
-    - - ! '>='
+    - - ~>
       - !ruby/object:Gem::Version
-        version: 2.0.2
+        version: 4.3.3
   type: :development
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
     none: false
     requirements:
-    - - ! '>='
+    - - ~>
       - !ruby/object:Gem::Version
-        version: 2.0.2
+        version: 4.3.3
 - !ruby/object:Gem::Dependency
   name: rr
   requirement: !ruby/object:Gem::Requirement
@@ -66,7 +66,7 @@ dependencies:
     requirements:
     - - ~>
       - !ruby/object:Gem::Version
-        version: 1.0.2
+        version: 1.0.4
   type: :development
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
@@ -74,7 +74,7 @@ dependencies:
     requirements:
     - - ~>
       - !ruby/object:Gem::Version
-        version: 1.0.2
+        version: 1.0.4
 - !ruby/object:Gem::Dependency
   name: rake
   requirement: !ruby/object:Gem::Requirement
@@ -82,7 +82,7 @@ dependencies:
     requirements:
     - - ~>
       - !ruby/object:Gem::Version
-        version: 0.9.2
+        version: 10.0.3
   type: :development
   prerelease: false
   version_requirements: !ruby/object:Gem::Requirement
@@ -90,7 +90,7 @@ dependencies:
     requirements:
     - - ~>
       - !ruby/object:Gem::Version
-        version: 0.9.2
+        version: 10.0.3
 description: 
 email:
 - matijs@matijs.net
@@ -106,7 +106,6 @@ files:
 - lib/ffi-gobject_introspection.rb
 - lib/gir_ffi.rb
 - lib/gir_ffi/lib_c.rb
-- lib/gir_ffi/builder/function.rb
 - lib/gir_ffi/builder/type/constant.rb
 - lib/gir_ffi/builder/type/union.rb
 - lib/gir_ffi/builder/type/base.rb
@@ -125,35 +124,41 @@ files:
 - lib/gir_ffi/builder/type.rb
 - lib/gir_ffi/builder/module.rb
 - lib/gir_ffi/builder/property.rb
-- lib/gir_ffi/builder/argument.rb
-- lib/gir_ffi/builder/argument/base.rb
-- lib/gir_ffi/builder/argument/out_base.rb
-- lib/gir_ffi/builder/argument/in_out_base.rb
-- lib/gir_ffi/builder/argument/in_base.rb
 - lib/gir_ffi/method_stubber.rb
 - lib/gir_ffi/arg_helper.rb
+- lib/gir_ffi/info_ext.rb
 - lib/gir_ffi/allocation_helper.rb
 - lib/gir_ffi/type_map.rb
 - lib/gir_ffi/user_defined/i_property_info.rb
 - lib/gir_ffi/user_defined/i_base_info.rb
 - lib/gir_ffi/user_defined/i_object_info.rb
 - lib/gir_ffi/user_defined/i_registered_type_info.rb
+- lib/gir_ffi/callback.rb
+- lib/gir_ffi/argument_builder.rb
+- lib/gir_ffi/error_argument_builder.rb
 - lib/gir_ffi/ffi_ext/pointer.rb
+- lib/gir_ffi/setter_argument_info.rb
 - lib/gir_ffi/builder_helper.rb
 - lib/gir_ffi/variable_name_generator.rb
 - lib/gir_ffi/in_pointer.rb
+- lib/gir_ffi/return_value_builder.rb
 - lib/gir_ffi/in_out_pointer.rb
 - lib/gir_ffi/version.rb
+- lib/gir_ffi/null_argument_builder.rb
 - lib/gir_ffi/callback_helper.rb
 - lib/gir_ffi/builder.rb
 - lib/gir_ffi/interface_base.rb
 - lib/gir_ffi/info_ext/i_type_info.rb
 - lib/gir_ffi/info_ext/i_field_info.rb
+- lib/gir_ffi/info_ext/safe_constant_name.rb
 - lib/gir_ffi/info_ext/i_property_info.rb
+- lib/gir_ffi/info_ext/safe_function_name.rb
 - lib/gir_ffi/info_ext/i_registered_type_info.rb
 - lib/gir_ffi/module_base.rb
+- lib/gir_ffi/base_argument_builder.rb
 - lib/gir_ffi/class_base.rb
 - lib/gir_ffi/object_base.rb
+- lib/gir_ffi/function_builder.rb
 - lib/gir_ffi-base/gobject/lib.rb
 - lib/gir_ffi-base/glib/strv.rb
 - lib/ffi-gobject/ruby_style.rb
@@ -208,7 +213,6 @@ files:
 - test/integration/method_lookup_test.rb
 - test/integration/generated_gimarshallingtests_test.rb
 - test/integration/generated_gio_test.rb
-- test/integration/pretty_print_test.rb
 - test/integration/generated_gobject_test.rb
 - test/gir_ffi/builder/type/user_defined_test.rb
 - test/gir_ffi/builder/type/enum_test.rb
@@ -220,8 +224,6 @@ files:
 - test/gir_ffi/builder/type/unintrospectable_test.rb
 - test/gir_ffi/builder/type/interface_test.rb
 - test/gir_ffi/builder/module_test.rb
-- test/gir_ffi/builder/function_test.rb
-- test/gir_ffi/builder/argument/base_test.rb
 - test/gir_ffi/object_base_test.rb
 - test/gir_ffi/user_defined/i_registered_type_info_test.rb
 - test/gir_ffi/user_defined/i_object_info_test.rb
@@ -230,10 +232,16 @@ files:
 - test/gir_ffi/in_pointer_test.rb
 - test/gir_ffi/in_out_pointer_test.rb
 - test/gir_ffi/arg_helper_test.rb
+- test/gir_ffi/function_builder_test.rb
 - test/gir_ffi/variable_name_generator_test.rb
 - test/gir_ffi/callback_helper_test.rb
+- test/gir_ffi/base_argument_builder_test.rb
 - test/gir_ffi/class_base_test.rb
+- test/gir_ffi/argument_builder_test.rb
+- test/gir_ffi/return_value_builder_test.rb
 - test/gir_ffi/info_ext/i_type_info_test.rb
+- test/gir_ffi/info_ext/safe_constant_name_test.rb
+- test/gir_ffi/info_ext/safe_function_name_test.rb
 - test/gir_ffi/info_ext/i_field_info_test.rb
 - test/gir_ffi/interface_base_test.rb
 - test/gir_ffi-base/glib/strv_test.rb
@@ -324,8 +332,8 @@ test_files:
 - test/ffi-gobject_test.rb
 - test/gir_ffi-base/glib/strv_test.rb
 - test/gir_ffi/arg_helper_test.rb
-- test/gir_ffi/builder/argument/base_test.rb
-- test/gir_ffi/builder/function_test.rb
+- test/gir_ffi/argument_builder_test.rb
+- test/gir_ffi/base_argument_builder_test.rb
 - test/gir_ffi/builder/module_test.rb
 - test/gir_ffi/builder/type/callback_test.rb
 - test/gir_ffi/builder/type/constant_test.rb
@@ -339,12 +347,16 @@ test_files:
 - test/gir_ffi/builder_test.rb
 - test/gir_ffi/callback_helper_test.rb
 - test/gir_ffi/class_base_test.rb
+- test/gir_ffi/function_builder_test.rb
 - test/gir_ffi/in_out_pointer_test.rb
 - test/gir_ffi/in_pointer_test.rb
 - test/gir_ffi/info_ext/i_field_info_test.rb
 - test/gir_ffi/info_ext/i_type_info_test.rb
+- test/gir_ffi/info_ext/safe_constant_name_test.rb
+- test/gir_ffi/info_ext/safe_function_name_test.rb
 - test/gir_ffi/interface_base_test.rb
 - test/gir_ffi/object_base_test.rb
+- test/gir_ffi/return_value_builder_test.rb
 - test/gir_ffi/user_defined/i_object_info_test.rb
 - test/gir_ffi/user_defined/i_property_info_test.rb
 - test/gir_ffi/user_defined/i_registered_type_info_test.rb
@@ -357,7 +369,6 @@ test_files:
 - test/integration/generated_gobject_test.rb
 - test/integration/generated_regress_test.rb
 - test/integration/method_lookup_test.rb
-- test/integration/pretty_print_test.rb
 - test/introspection_test_helper.rb
 - test/lib/Makefile.am
 - test/lib/autogen.sh

data/lib/gir_ffi/builder/argument.rb

@@ -1,569 +0,0 @@
-require 'forwardable'
-
-require 'gir_ffi/in_pointer'
-require 'gir_ffi/in_out_pointer'
-
-require 'gir_ffi/builder/argument/base'
-require 'gir_ffi/builder/argument/in_base'
-require 'gir_ffi/builder/argument/out_base'
-require 'gir_ffi/builder/argument/in_out_base'
-
-module GirFFI::Builder
-  module Argument
-    def self.build var_gen, arginfo, libmodule
-      {
-        :inout => InOutArgument,
-        :in => InArgument,
-        :out => OutArgument
-      }[arginfo.direction].build var_gen, arginfo, libmodule
-    end
-  end
-
-  module InArgument
-    def self.build var_gen, arginfo, libmodule
-      type = arginfo.argument_type
-      builder_for var_gen, arginfo.name, type, arginfo.direction, libmodule
-    end
-
-    def self.builder_for var_gen, name, type, direction, libmodule
-      klass = case type.tag
-              when :interface
-                case type.interface.info_type
-                when :callback
-                  return CallbackInArgument.new var_gen, name, type, libmodule
-                else
-                  RegularArgument
-                end
-              else
-                RegularArgument
-              end
-      return klass.new var_gen, name, type, direction
-    end
-  end
-
-  # Implements argument processing for callback arguments with direction
-  # :in.
-  class CallbackInArgument < Argument::InBase
-    def initialize var_gen, name, type, libmodule
-      super var_gen, name, type, :in
-      @libmodule = libmodule
-    end
-
-    def pre
-      iface = type_info.interface
-      [ "#{callarg} = GirFFI::CallbackHelper.wrap_in_callback_args_mapper \"#{iface.namespace}\", \"#{iface.name}\", #{@name}",
-        "#{@libmodule}::CALLBACKS << #{callarg}" ]
-    end
-  end
-
-  # Implements argument processing for arguments with direction :in whose
-  # type-specific processing is left to FFI (e.g., ints and floats, and
-  # objects that implement to_ptr.).
-  #
-  # Implements argument processing for arguments with direction :in that
-  # are GObjects.
-  #
-  # Implements argument processing for UTF8 string arguments with direction
-  # :in.
-  #
-  # Implements argument processing for void pointer arguments with
-  # direction :in.
-  #
-  # Implements argument processing for interface arguments with direction
-  # :inout (structs, objects, etc.).
-  #
-  # Implements argument processing for arguments with direction
-  # :out that are neither arrays nor 'interfaces'.
-  class RegularArgument < Argument::Base
-    def initialize var_gen, name, typeinfo, direction
-      super var_gen, name, typeinfo, direction
-      @direction = direction
-    end
-
-    def inarg
-      if has_input_value?
-        @array_arg.nil? ? @name : nil
-      end
-    end
-
-    def retname
-      if has_output_value?
-        @retname ||= @var_gen.new_var
-      end
-    end
-
-    def pre
-      pr = []
-      if has_input_value?
-        pr << fixed_array_size_check if needs_size_check?
-        pr << array_length_assignment if is_array_length_parameter?
-      end
-      pr << set_function_call_argument
-      pr
-    end
-
-    def post
-      result = []
-      if has_output_value?
-        value = case @direction
-                when :inout
-                  "#{argument_class_name}.wrap(#{output_conversion_arguments})"
-                when :out
-                  "#{callarg}.to_value"
-                end
-        result << "#{retname} = #{value}"
-      end
-      result
-    end
-
-    private
-
-    def is_array_length_parameter?
-      @array_arg
-    end
-
-    def needs_size_check?
-      if type_tag == :array
-        size = type_info.array_fixed_size
-        if size > -1
-          true
-        end
-      end
-    end
-
-    def fixed_array_size_check
-      size = type_info.array_fixed_size
-      "GirFFI::ArgHelper.check_fixed_array_size #{size}, #{@name}, \"#{@name}\""
-    end
-
-    def has_output_value?
-      @direction == :inout || @direction == :out
-    end
-
-    def has_input_value?
-      @direction == :inout || @direction == :in
-    end
-
-    def array_length_assignment
-      arrname = @array_arg.name
-      "#{@name} = #{arrname}.nil? ? 0 : #{arrname}.length"
-    end
-
-    def set_function_call_argument
-      value = if @direction == :out
-                "GirFFI::InOutPointer.for #{type_tag.inspect}"
-              else
-                if needs_ingoing_parameter_conversion?
-                  parameter_conversion
-                else
-                  @name
-                end
-              end
-      "#{callarg} = #{value}"
-    end
-
-    def needs_outgoing_parameter_conversion?
-      case specialized_type_tag
-      when :object, :struct, :utf8, :void, :glist, :gslist, :ghash, :array, :c, :strv
-        true
-      else
-        false
-      end
-    end
-
-    def needs_ingoing_parameter_conversion?
-      case specialized_type_tag
-      when :object, :struct, :utf8, :void, :glist, :gslist, :ghash, :array, :c, :strv
-        true
-      else
-        false
-      end
-    end
-
-    def parameter_conversion
-      base = "#{argument_class_name}.from(#{parameter_conversion_arguments})"
-      if has_output_value?
-        "GirFFI::InOutPointer.from :pointer, #{base}"
-      else
-        base
-      end
-    end
-
-    def output_conversion_arguments
-      conversion_arguments "#{callarg}.to_value"
-    end
-
-    def parameter_conversion_arguments
-      conversion_arguments @name
-    end
-
-    def conversion_arguments name
-      case specialized_type_tag
-      when :utf8, :void
-        "#{self_t}, #{name}"
-      when :glist, :gslist, :ghash, :array
-        "#{elm_t}, #{name}"
-      when :c
-        "#{type_specification}, #{name}"
-      when :strv
-        "#{name}"
-      else
-        "#{name}"
-      end
-    end
-
-    def self_t
-      type_tag.inspect
-    end
-  end
-
-  # Implements argument processing for arguments with direction :out.
-  module OutArgument
-    def self.build var_gen, arginfo, libmodule
-      type = arginfo.argument_type
-      direction = arginfo.direction
-      klass = case type.tag
-              when :interface
-                case type.interface.info_type
-                when :enum, :flags
-                  EnumOutArgument
-                else
-                  if arginfo.caller_allocates?
-                    AllocatedInterfaceOutArgument
-                  else
-                    InterfaceOutArgument
-                  end
-                end
-              when :array
-                if type.zero_terminated?
-                  InterfaceOutArgument
-                else
-                  case type.array_type
-                  when :c
-                    CArrayOutArgument
-                  when :array
-                    it = PointerLikeOutArgument.new var_gen, arginfo.name, type, direction
-                    it.extend WithTypedContainerPostMethod
-                    return it
-                  end
-                end
-              when :glist, :gslist, :ghash
-                it = PointerLikeOutArgument.new var_gen, arginfo.name, type, direction
-                it.extend WithTypedContainerPostMethod
-                return it
-              else
-                RegularArgument
-              end
-      klass.new var_gen, arginfo.name, type, direction
-    end
-  end
-
-  # Implements argument processing for arguments with direction
-  # :out that are enums
-  class EnumOutArgument < Argument::OutBase
-    def pre
-      [ "#{callarg} = GirFFI::InOutPointer.for :gint32" ]
-    end
-
-    def post
-      [ "#{retname} = #{argument_class_name}[#{callarg}.to_value]" ]
-    end
-  end
-
-  # Implements argument processing for interface arguments with direction
-  # :out (structs, objects, etc.), allocated by the caller.
-  class AllocatedInterfaceOutArgument < Argument::OutBase
-    def pre
-      [ "#{callarg} = #{argument_class_name}.allocate" ]
-    end
-
-    def post
-      [ "#{retname} = #{callarg}" ]
-    end
-  end
-
-  # Implements argument processing for array arguments with direction
-  # :out.
-  class CArrayOutArgument < Argument::OutBase
-    def pre
-      [ "#{callarg} = GirFFI::InOutPointer.for_array #{subtype_tag_or_class_name}" ]
-    end
-
-    def postpost
-      [ "#{retname} = #{callarg}.to_sized_array_value #{array_size}" ]
-    end
-  end
-
-  # Base class for arguments with direction :out for which the base type is
-  # a pointer: For these, a pointer to a pointer needs to be passed to the
-  # C function.
-  class PointerLikeOutArgument < Argument::OutBase
-    def pre
-      [ "#{callarg} = GirFFI::InOutPointer.for :pointer" ]
-    end
-  end
-
-  # Implements argument processing for interface arguments with direction
-  # :out (structs, objects, etc.).
-  #
-  # Implements argument processing for strv arguments with direction
-  # :out.
-  class InterfaceOutArgument < PointerLikeOutArgument
-    def post
-      [ "#{retname} = #{argument_class_name}.wrap #{callarg}.to_value" ]
-    end
-  end
-
-  module WithTypedContainerPostMethod
-    def post
-      [ "#{retname} = #{argument_class_name}.wrap #{elm_t}, #{callarg}.to_value" ]
-    end
-  end
-
-  # Implements argument processing for arguments with direction :inout.
-  module InOutArgument
-    def self.build var_gen, arginfo, libmodule
-      type = arginfo.argument_type
-      direction = arginfo.direction
-      klass = case type.tag
-              when :interface
-                case type.interface.info_type
-                when :enum, :flags
-                  EnumInOutArgument
-                else
-                  RegularArgument
-                end
-              when :array
-                if type.zero_terminated?
-                  StrvInOutArgument
-                else
-                  case type.array_type
-                  when :c
-                    CArrayInOutArgument
-                  when :array
-                    RegularArgument
-                  end
-                end
-              when :glist, :gslist, :ghash
-                RegularArgument
-              else
-                RegularInOutArgument
-              end
-
-      klass.new var_gen, arginfo.name, type, direction
-    end
-  end
-
-  # Implements argument processing for arguments with direction
-  # :inout that are enums.
-  class EnumInOutArgument < Argument::InOutBase
-    def pre
-      pr = []
-      pr << "#{callarg} = GirFFI::InOutPointer.from :gint32, #{argument_class_name}[#{@name}]"
-      pr
-    end
-
-    def post
-      [ "#{retname} = #{argument_class_name}[#{callarg}.to_value]" ]
-    end
-  end
-
-  # Implements argument processing for strv arguments with direction
-  # :inout.
-  class StrvInOutArgument < Argument::InOutBase
-    def pre
-      [ "#{callarg} = GirFFI::InOutPointer.from #{type_specification}, #{@name}" ]
-    end
-
-    def post
-      [ "#{retname} = GLib::Strv.wrap(#{callarg}.to_value)" ]
-    end
-  end
-
-  # Implements argument processing for array arguments with direction
-  # :inout.
-  class CArrayInOutArgument < Argument::InOutBase
-    def pre
-      [ "#{callarg} = GirFFI::InOutPointer.from_array #{elm_t}, #{@name}" ]
-    end
-
-    def postpost
-      size = array_size
-      pst = [ "#{retname} = #{callarg}.to_sized_array_value #{size}" ]
-      pst
-    end
-  end
-
-  # Implements argument processing for arguments with direction
-  # :inout that are neither arrays nor 'interfaces'.
-  class RegularInOutArgument < Argument::InOutBase
-    def pre
-      pr = []
-      if @array_arg
-        pr << "#{@name} = #{@array_arg.name}.length"
-      end
-      pr << "#{callarg} = GirFFI::InOutPointer.from #{type_tag.inspect}, #{@name}"
-      pr
-    end
-
-    def post
-      [ "#{retname} = #{callarg}.to_value" ]
-    end
-  end
-
-  module ReturnValueFactory
-    def self.build var_gen, arginfo
-      builder_for(var_gen,
-                  arginfo.name,
-                  arginfo.return_type,
-                  :return,
-                  arginfo.constructor?)
-    end
-
-    def self.builder_for var_gen, name, type, direction, is_constructor
-      if type.tag == :interface and
-        [:interface, :object].include? type.interface.info_type
-        klass = if is_constructor
-                  ConstructorReturnValue
-                else
-                  WrappingReturnValue
-                end
-        klass.new var_gen, name, type, direction
-      else
-        builder_for_field_getter var_gen, name, type, direction
-      end
-    end
-
-    def self.builder_for_field_getter var_gen, name, type, direction
-      klass = case type.tag
-              when :void
-                if type.pointer?
-                  RegularReturnValue
-                else
-                  VoidReturnValue
-                end
-              when :interface
-                case type.interface.info_type
-                when :struct, :union, :interface, :object
-                  WrappingReturnValue
-                else
-                  RegularReturnValue
-                end
-              when :array
-                if type.zero_terminated?
-                  WrappingReturnValue
-                else
-                  case type.array_type
-                  when :c
-                    CArrayReturnValue
-                  when :array
-                    it = ReturnValue.new var_gen, name, type, direction
-                    it.extend WithTypedContainerPostMethod
-                    return it
-                  else
-                    WrappingReturnValue
-                  end
-                end
-              when :glist, :gslist, :ghash
-                it = ReturnValue.new var_gen, name, type, direction
-                it.extend WithTypedContainerPostMethod
-                return it
-              when :utf8
-                Utf8ReturnValue
-              else
-                RegularReturnValue
-              end
-      klass.new var_gen, name, type, direction
-    end
-  end
-
-  # Implements argument processing for return values.
-  class ReturnValue < Argument::Base
-    def cvar
-      callarg
-    end
-
-    def retname
-      @retname ||= @var_gen.new_var
-    end
-
-    def inarg
-      nil
-    end
-  end
-
-  # Null object to represent the case where no actual value is returned.
-  class VoidReturnValue < ReturnValue
-    def cvar; end
-    def retname; end
-  end
-
-  # Implements argument processing for interface return values (interfaces
-  # and structs, but not objects, which need special handling for
-  # polymorphism and constructors).
-  #
-  # Implements argument processing for object return values when the method is
-  # not a constructor.
-  #
-  # Implements argument processing for NULL-terminated string array return values.
-  #
-  # Implements argument processing for GByteArray return values.
-  #
-  # Implements argument processing for GPtrArray return values.
-  class WrappingReturnValue < ReturnValue
-    def post
-      [ "#{retname} = #{argument_class_name}.wrap(#{cvar})" ]
-    end
-  end
-
-  # Implements argument processing for object constructors.
-  class ConstructorReturnValue < ReturnValue
-    def post
-      [ "#{retname} = self.constructor_wrap(#{cvar})" ]
-    end
-  end
-
-  # Implements argument processing for array return values.
-  class CArrayReturnValue < ReturnValue
-    def post
-      size = array_size
-
-      [ "#{retname} = GirFFI::ArgHelper.ptr_to_typed_array #{subtype_tag_or_class_name}, #{cvar}, #{size}" ]
-    end
-  end
-
-  # Implements argument processing for UTF8 string return values.
-  class Utf8ReturnValue < ReturnValue
-    def post
-      [ "#{retname} = GirFFI::ArgHelper.ptr_to_utf8 #{cvar}" ]
-    end
-  end
-
-  # Implements argument processing for other return values.
-  class RegularReturnValue < ReturnValue
-    def retval
-      @callarg
-    end
-  end
-
-  # Implements argument processing for error handling arguments. These
-  # arguments are not part of the introspected signature, but their
-  # presence is indicated by the 'throws' attribute of the function.
-  class ErrorArgument < Argument::Base
-    def pre
-      [ "#{callarg} = FFI::MemoryPointer.new(:pointer).write_pointer nil" ]
-    end
-
-    def post
-      [ "GirFFI::ArgHelper.check_error(#{callarg})" ]
-    end
-  end
-
-  # Argument builder that does nothing. Implements Null Object pattern.
-  class NullArgument
-    def initialize *args; end
-    def pre; []; end
-    def post; []; end
-    def callarg; end
-  end
-end