BOAST 1.3.1 → 1.3.2

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: ea64b71758e5e5a415024b05dffe731bf990a1ff
-  data.tar.gz: 6ecb5d7acdae700d5e9521491e3dd71ef751e550
+  metadata.gz: ce1471079358a166a828d428d014c785ac0a6b08
+  data.tar.gz: a9b317526e6589ee928c41fa4f78b469a0d0a1b7
 SHA512:
-  metadata.gz: c827fa7966599f2f807f1f123c2b5a0781260092701d63767da7b75638142ab062b5469f1d14c4d760e1c11f3f693f66fadb085d6a494d5f64188de050433888
-  data.tar.gz: bbef18791ef66fd3b25ad9aaf7b75892e169204b5bb4fbe1da82eb43286b968c7da2e6cec46914aff6a072e27e203f05fe998084657e9d6dd87d86ac3cefe09e
+  metadata.gz: ff7690a6d81dd4d1b1c258d65da70ea326532a2968c618f471c83faf8ddb21dab9602156a6b495f06aca1cc3adfcd7bf0b76a6f4b32aa3983e182b0a535f8f45
+  data.tar.gz: 27107abb8e7166fac2593b2e78b5275f44bcbf54be4b065d2c024cf9ab6e9b5070bb971fdf09b39a491aafe1b4cf4a41aeebcfc96f91c43c891f8f688cef2fb1

data/BOAST.gemspec

@@ -1,6 +1,6 @@
 Gem::Specification.new do |s|
   s.name = 'BOAST'
-  s.version = "1.3.1"
+  s.version = "1.3.2"
   s.author = "Brice Videau"
   s.email = "brice.videau@imag.fr"
   s.homepage = "https://github.com/Nanosim-LIG/boast"

data/lib/BOAST/Language/Index.rb

@@ -70,8 +70,16 @@ module BOAST
     private
 
     def to_s_fortran
+      indexes_dup = []
+      @source.dimension.each_with_index { |d,i|
+        if d.size.nil? and get_array_start != 1 then
+           indexes_dup.push( @indexes[i] - d.start + 1 )
+        else
+           indexes_dup.push( @indexes[i] )
+        end
+      }
       s = ""
-      s += "#{@source}(#{@indexes.join(", ")})"
+      s += "#{@source}(#{indexes_dup.join(", ")})"
       return s
     end
 

data/lib/BOAST/Language/Procedure.rb

@@ -190,9 +190,14 @@ module BOAST
       s = indent + to_s_fortran
       s += "\n"
       increment_indent_level
-      parameters.each { |p|
-        p.type.define if p.type.kind_of? CStruct
+      tmp_buff = StringIO::new
+      push_env( :output => tmp_buff ) {
+        parameters.each { |p|
+          p.type.define if p.type.kind_of? CStruct
+        }
       }
+      tmp_buff.rewind
+      s += tmp_buff.read
       s += indent + "integer, parameter :: wp=kind(1.0d0)"
       output.puts s
       constants.each { |c|

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: BOAST
 version: !ruby/object:Gem::Version
-  version: 1.3.1
+  version: 1.3.2
 platform: ruby
 authors:
 - Brice Videau