haskell 1.0.0 → 1.0.1

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: ac0c087788b1e471523aed86d8dfd0c42be2503d
-  data.tar.gz: 610eff264b8bdc1903ea519e857a5346f461aad6
+  metadata.gz: 106e2d1ecfffa78f4b146b64b741837d50810192
+  data.tar.gz: ea8a1d9025c75c76149a88d8af374df6d0d0f8d2
 SHA512:
-  metadata.gz: 788e9b367f36ec0420f44fa89166768073332e8748aab5acd65f9c1796e1953367a2e9ed9bc5b738e0fdf53f6eb329237205e6a6dd819851f437b92264f7ccd5
-  data.tar.gz: ae3aa09d9fd3af02d5361bccc45f33d27f6e153b5f9a2a2810693493bd18c5fc8a33f4d35ccd5e19f6be4ff179346376f9533753fad70665614055f42081f174
+  metadata.gz: b96e36faecf94815fe22aa9c48c1953f7f0035c5712d58acc57d13aea23a67c7fd694ee33d94ae0313c3d767f29e34259f37be17e8f5bb46663b6593bac2336d
+  data.tar.gz: cb6c972936b1d25eee624da68c200c22ae94033658c40cbc01df2c7ef99369ae34781902a90182b7804e0e425b46291aaf5867a105b184a9200f5e8479c41012

data/README.md

@@ -2,6 +2,10 @@
 
 ```rb
 require 'haskell'
+
+# Invoke sandbox for executing ghc
+Haskell.invoke_sandbox!(File.expand_path('../', __FILE__))
+
 Haskell.compile %{
   add :: Integer -> Integer -> Integer
   add x y = x + y
@@ -9,9 +13,12 @@ Haskell.compile %{
 }
 
 while Haskell.compiling?
-...
+  # wait for....
 end
 
 p Haskell.execute
 #=> 3
+
+# Don't forget to revoke sandbox
+Haskell.revoke_sandbox!
 ```

data/haskell_executing_sandbox/tmp.hs

@@ -0,0 +1,7 @@
+module Main where
+
+add :: Integer -> Integer -> Integer
+add x y = x + y
+result = add 1 2
+
+main = do putStrLn $ show result

data/lib/haskell.rb

@@ -3,45 +3,42 @@ module Haskell
   class HaskellCompileError < StandardError; end
 
   class << self
-    def invoke_sandbox!
-      file_path = File.expand_path('../', __FILE__)
-      $sandbox_path = "#{file_path}/haskell_executing_sandbox"
-      FileUtils.mkdir($sandbox_path) unless Dir.exist?($sandbox_path)
+    def invoke_sandbox!(dir_path)
+      @@sandbox_path = "#{dir_path}/haskell_executing_sandbox"
+      FileUtils.mkdir(@@sandbox_path) unless Dir.exist?(@@sandbox_path)
     end
 
     def revoke_sandbox!
-      FileUtils.rm_rf($sandbox_path)
+      FileUtils.rm_rf(@@sandbox_path)
     end
 
     def compile(hs_code)
-      FileUtils.touch("#{$sandbox_path}/COMPILING")
+      FileUtils.touch("#{@@sandbox_path}/COMPILING")
       #TODO: need inform user prefer message
       Thread.abort_on_exception = true
       Thread.new do
         begin
           executable_code = executable_code(hs_code)
           puts_notation(executable_code)
-          File.write("#{$sandbox_path}/tmp.hs", executable_code)
-          Kernel.system("ghc #{$sandbox_path}/tmp.hs")
+          File.write("#{@@sandbox_path}/tmp.hs", executable_code)
+          Kernel.system("ghc #{@@sandbox_path}/tmp.hs")
           raise HaskellCompileError unless compiled?
         ensure
-          FileUtils.rm("#{$sandbox_path}/COMPILING")
+          FileUtils.rm("#{@@sandbox_path}/COMPILING")
         end
       end
-    rescue
-      raise "Something wrong...https://github.com/Azabuhs/Ruby/issues"
     end
 
     def compiling?
-      File.exist?("#{$sandbox_path}/COMPILING")
+      File.exist?("#{@@sandbox_path}/COMPILING")
     end
 
     def compiled?
-      File.exist?("#{$sandbox_path}/tmp")
+      File.exist?("#{@@sandbox_path}/tmp")
     end
 
     def execute
-      `#{$sandbox_path}/tmp`.gsub(/\n\z/, '')
+      `#{@@sandbox_path}/tmp`.gsub(/\n\z/, '')
     end
 
   private

data/lib/haskell/version.rb

@@ -1,3 +1,3 @@
 module Haskell
-  VERSION = "1.0.0"
+  VERSION = "1.0.1"
 end

data/test/test_haskell.rb

@@ -27,7 +27,7 @@ class TestHaskell < MiniTest::Unit::TestCase
 
   private
     def assert_equal_execute(str, &block)
-      Haskell.invoke_sandbox!
+      Haskell.invoke_sandbox!(File.expand_path('../', __FILE__))
       Haskell.compile(block.call)
       nil while Haskell.compiling?
       assert_equal str, Haskell.execute
@@ -35,7 +35,7 @@ class TestHaskell < MiniTest::Unit::TestCase
     end
 
     def assert_raise_compile_error(&block)
-      Haskell.invoke_sandbox!
+      Haskell.invoke_sandbox!(File.expand_path('../', __FILE__))
       Haskell.compile(block.call)
       nil while Haskell.compiling?
     # TODO: more prefer test

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: haskell
 version: !ruby/object:Gem::Version
-  version: 1.0.0
+  version: 1.0.1
 platform: ruby
 authors:
 - gogotanaka
@@ -81,6 +81,9 @@ files:
 - README.md
 - Rakefile
 - bin/rubype
+- haskell_executing_sandbox/tmp
+- haskell_executing_sandbox/tmp.hi
+- haskell_executing_sandbox/tmp.hs
 - lib/haskell.rb
 - lib/haskell/version.rb
 - rubype.gemspec