Pulled from rfc2616. Working on spec on windows

Author: clbustos

.gitignore

@@ -1,2 +1,3 @@
 pkg
 doc
+*~

lib/rinruby.rb

@@ -189,6 +189,7 @@ def initialize(*args)
   def quit
     begin 
       @writer.puts "q(save='no')"
+      # TODO: Verify if read is needed
       @socket.read()
       #@socket.close 
       @engine.close 

spec/rinruby_spec.rb

@@ -4,14 +4,25 @@
 describe RinRuby do
   describe "on init" do
     it "should accept parameters as specified on Dahl & Crawford(2009)" do
+      
+      platform = case RUBY_PLATFORM
+      when /mswin/ then 'windows'
+      when /mingw/ then 'windows'
+      when /bccwin/ then 'windows'
+      else 
+        "other"
+      end
+      if platform=='windows'
+        pending("Difficult to test without specific location of R executable on Windows")
+      else      
+      
       r=RinRuby.new(false, false, "R", 38500, 1)
       r.echo_enabled.should_not be_true
       r.interactive.should_not be_true
-      r.executable.should=='R'
+      r.executable.should=="R"
       r.port_number.should==38500
-      r.port_width.should==1
-      
-      
+      r.port_width.should==1      
+      end
     end
     it "should accept :echo and :interactive parameters" do
       r=RinRuby.new(:echo=>false, :interactive=>false)
@@ -113,7 +124,7 @@
       rx=R.x
       matrix.row_size.times {|i|
         matrix.column_size.times {|j|
-          matrix[i,j].should be_close(rx[i,j],1e-10)
+          matrix[i,j].should be_within(1e-10).of(rx[i,j])
         }
       }
     end

spec/spec_helper.rb

@@ -1,8 +1,7 @@
-$LOAD_PATH.unshift(File.dirname(__FILE__))
-$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+$LOAD_PATH.unshift(File.expand_path(File.dirname(__FILE__)))
+$LOAD_PATH.unshift(File.expand_path(File.join(File.dirname(__FILE__), '..', 'lib')))
 require 'rinruby'
-require 'spec'
-require 'spec/autorun'
+require 'rspec'
 
 require 'matrix'