BOAST 0.997 → 0.998

data/BOAST.gemspec

@@ -1,6 +1,6 @@
 Gem::Specification.new do |s|
   s.name = 'BOAST'
-  s.version = "0.997"
+  s.version = "0.998"
   s.author = "Brice Videau"
   s.email = "brice.videau@imag.fr"
   s.homepage = "https://forge.imag.fr/projects/boast/"

data/lib/BOAST/CKernel.rb

@@ -294,21 +294,21 @@ def self.run(*args)
     if @procedure.parameters[i].dimension then
       if @procedure.parameters[i].direction == :in then
         flags = OpenCL::Mem::Flags::READ_ONLY
-      elsif @procedure.parameters[i].direction == :out
+      elsif @procedure.parameters[i].direction == :out then
         flags = OpenCL::Mem::Flags::WRITE_ONLY
       else
-        flags = nil
+        flags = OpenCL::Mem::Flags::READ_WRITE
       end
       if @procedure.parameters[i].texture then
-        params[i] = @context.create_image_2D( OpenCL::ImageFormat::new( OpenCL::ChannelOrder::R, OpenCL::ChannelType::UNORM_INT8 ), args[i].size * args[i].element_size, 1, :flags => nil )
-        if @procedure.parameters[i].direction == :inout or @procedure.parameters[i].direction == :in then
+        params[i] = @context.create_image_2D( OpenCL::ImageFormat::new( OpenCL::ChannelOrder::R, OpenCL::ChannelType::UNORM_INT8 ), args[i].size * args[i].element_size, 1, :flags => flags )
+#        if @procedure.parameters[i].direction == :inout or @procedure.parameters[i].direction == :in then
           @queue.enqueue_write_image( params[i], args[i], :blocking => true )
-        end
+#        end
       else
-        params[i] = @context.create_buffer( args[i].size * args[i].element_size, :flags => nil )
-        if @procedure.parameters[i].direction == :inout or @procedure.parameters[i].direction == :in then
+        params[i] = @context.create_buffer( args[i].size * args[i].element_size, :flags => flags )
+#        if @procedure.parameters[i].direction == :inout or @procedure.parameters[i].direction == :in then
           @queue.enqueue_write_buffer( params[i], args[i], :blocking => true )
-        end
+#        end
       end
     else
       if @procedure.parameters[i].type.is_a?(Real) then
@@ -532,11 +532,11 @@ EOF
     array_size = n_ary->total * na_sizeof[n_ary->type];
     cudaMalloc( (void **) &#{param.name}, array_size);
 EOF
-            if param.direction == :in then
+#            if param.direction == :in then
             module_file.print <<EOF
     cudaMemcpy(#{param.name}, (void *) n_ary->ptr, array_size, cudaMemcpyHostToDevice);
 EOF
-            end
+#            end
             module_file.print <<EOF
   } else
     rb_raise(rb_eArgError, "wrong type of argument %d", #{i});
@@ -638,7 +638,7 @@ EOF
             module_file.print <<EOF
   if ( IsNArray(rb_ptr) ) {
 EOF
-            if param.direction == :out then
+            if param.direction == :out or param.direction == :inout then
             module_file.print <<EOF
     struct NARRAY *n_ary;
     size_t array_size;

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: BOAST
 version: !ruby/object:Gem::Version
-  version: '0.997'
+  version: '0.998'
   prerelease: 
 platform: ruby
 authors:
@@ -9,7 +9,7 @@ authors:
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2014-07-09 00:00:00.000000000 Z
+date: 2014-07-10 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: narray