BOAST 0.992 → 0.994

data/BOAST.gemspec

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

data/lib/BOAST/Algorithm.rb

@@ -16,6 +16,12 @@ module BOAST
     return BOAST::FORTRAN
   end
 
+  def BOAST::get_default_debug
+    debug = false
+    debug = ENV["DEBUG"] if ENV["DEBUG"]
+    return debug
+  end
+
   @@output = STDOUT
   @@lang = BOAST::get_default_lang
   @@replace_constants = true
@@ -27,6 +33,7 @@ module BOAST
   @@array_start = 1
   @@chain_code = false
   @@architecture = X86
+  @@debug = BOAST::get_default_debug
 
   @@env = Hash.new{|h, k| h[k] = []}
 
@@ -66,6 +73,14 @@ module BOAST
     a.close
   end
 
+  def BOAST::debug=(debug)
+    @@debug = debug
+  end
+
+  def BOAST::debug
+    return @@debug
+  end
+
   def BOAST::architecture=(arch)
     @@architecture = arch
   end

data/lib/BOAST/Parens.rb

@@ -12,9 +12,24 @@ class Object
     
     return klass.send(:parens, *a, &b)  if klass.respond_to? :parens
 
-    return BOAST::FuncCall::new(m,*a,&b) if s == BOAST
+    if s == BOAST then
+      STDERR.puts "Warning unkwown function #{m} generated as BOAST::FuncCall!" if BOAST::debug
+      return BOAST::FuncCall::new(m,*a,&b)
+    end
 
     orig_method_missing m, *a, &b
   end
 end
 
+module BOAST
+
+  def BOAST.register_funccall(name)
+    s =<<EOF
+    def BOAST.#{name}(*args)
+      return BOAST::FuncCall("#{name}", *args)
+    end
+EOF
+    eval s
+  end
+
+end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: BOAST
 version: !ruby/object:Gem::Version
-  version: '0.992'
+  version: '0.994'
   prerelease: 
 platform: ruby
 authors: