windows-pr 1.1.3 → 1.2.0

data/test/tc_msvcrt_file.rb

@@ -1,80 +1,80 @@
-#####################################################################
-# tc_msvcrt_file.rb
-#
-# Test case for the Windows::MSVCRT::File module.
-#####################################################################
-require 'windows/msvcrt/file'
-require 'test/unit'
-
-class MFileFoo
-   include Windows::MSVCRT::File
-end
-
-class TC_Windows_MSVCRT_File < Test::Unit::TestCase
-   def setup
-      @foo = MFileFoo.new
-   end
-
-   def test_numeric_constants
-      assert_not_nil(MFileFoo::S_IFMT)
-      assert_not_nil(MFileFoo::S_IFDIR)
-      assert_not_nil(MFileFoo::S_IFCHR)
-      assert_not_nil(MFileFoo::S_IFIFO)
-      assert_not_nil(MFileFoo::S_IFREG)
-      assert_not_nil(MFileFoo::S_IREAD)
-      assert_not_nil(MFileFoo::S_IWRITE)
-      assert_not_nil(MFileFoo::S_IEXEC)
-   end
-   
-   def test_method_constants
-      assert_not_nil(MFileFoo::Chmod)
-      assert_not_nil(MFileFoo::Chsize)
-      assert_not_nil(MFileFoo::Mktemp)
-      assert_not_nil(MFileFoo::Stat)
-      assert_not_nil(MFileFoo::Stat64)
-      assert_not_nil(MFileFoo::Wchmod)
-      assert_not_nil(MFileFoo::Wmktemp)
-      assert_not_nil(MFileFoo::Wstat)
-      assert_not_nil(MFileFoo::Wstat64)
-   end
-   
-   def test_chmod
-      assert_respond_to(@foo, :chmod)
-   end
-
-   def test_chsize
-      assert_respond_to(@foo, :chsize)
-   end
-
-   def test_mktemp
-      assert_respond_to(@foo, :mktemp)
-   end
-
-   def test_stat
-      assert_respond_to(@foo, :stat)
-   end
-
-   def test_stat64
-      assert_respond_to(@foo, :stat64)
-   end
-
-   def test_wchmod
-      assert_respond_to(@foo, :wchmod)
-   end
-
-   def test_wmktemp
-      assert_respond_to(@foo, :wmktemp)
-   end
-
-   def test_wstat
-      assert_respond_to(@foo, :wstat)
-   end
-
-   def test_wstat64
-      assert_respond_to(@foo, :wstat64)
-   end
-   
-   def teardown
-      @foo  = nil
-   end
-end
+#####################################################################
+# tc_msvcrt_file.rb
+#
+# Test case for the Windows::MSVCRT::File module.
+#####################################################################
+require 'windows/msvcrt/file'
+require 'test/unit'
+
+class MFileFoo
+   include Windows::MSVCRT::File
+end
+
+class TC_Windows_MSVCRT_File < Test::Unit::TestCase
+   def setup
+      @foo = MFileFoo.new
+   end
+
+   def test_numeric_constants
+      assert_not_nil(MFileFoo::S_IFMT)
+      assert_not_nil(MFileFoo::S_IFDIR)
+      assert_not_nil(MFileFoo::S_IFCHR)
+      assert_not_nil(MFileFoo::S_IFIFO)
+      assert_not_nil(MFileFoo::S_IFREG)
+      assert_not_nil(MFileFoo::S_IREAD)
+      assert_not_nil(MFileFoo::S_IWRITE)
+      assert_not_nil(MFileFoo::S_IEXEC)
+   end
+   
+   def test_method_constants
+      assert_not_nil(MFileFoo::Chmod)
+      assert_not_nil(MFileFoo::Chsize)
+      assert_not_nil(MFileFoo::Mktemp)
+      assert_not_nil(MFileFoo::Stat)
+      assert_not_nil(MFileFoo::Stat64)
+      assert_not_nil(MFileFoo::Wchmod)
+      assert_not_nil(MFileFoo::Wmktemp)
+      assert_not_nil(MFileFoo::Wstat)
+      assert_not_nil(MFileFoo::Wstat64)
+   end
+   
+   def test_chmod
+      assert_respond_to(@foo, :chmod)
+   end
+
+   def test_chsize
+      assert_respond_to(@foo, :chsize)
+   end
+
+   def test_mktemp
+      assert_respond_to(@foo, :mktemp)
+   end
+
+   def test_stat
+      assert_respond_to(@foo, :stat)
+   end
+
+   def test_stat64
+      assert_respond_to(@foo, :stat64)
+   end
+
+   def test_wchmod
+      assert_respond_to(@foo, :wchmod)
+   end
+
+   def test_wmktemp
+      assert_respond_to(@foo, :wmktemp)
+   end
+
+   def test_wstat
+      assert_respond_to(@foo, :wstat)
+   end
+
+   def test_wstat64
+      assert_respond_to(@foo, :wstat64)
+   end
+   
+   def teardown
+      @foo  = nil
+   end
+end

data/test/tc_msvcrt_io.rb

@@ -1,48 +1,48 @@
-#####################################################################
-# tc_msvcrt_io.rb
-#
-# Test case for the Windows::MSVCRT::IO module.
-#####################################################################
-require 'windows/msvcrt/io'
-require 'test/unit'
-
-class MIOFoo
-   include Windows::MSVCRT::IO
-end
-
-class TC_Windows_MSVCRT_IO < Test::Unit::TestCase
-   def setup
-      @foo = MIOFoo.new
-   end
-
-   def test_numeric_constants
-      assert_not_nil(MIOFoo::S_IFMT)
-   end
-   
-   def test_method_constants
-      assert_not_nil(MIOFoo::Clearerr)
-      assert_not_nil(MIOFoo::Close)
-      assert_not_nil(MIOFoo::Fclose)
-      assert_not_nil(MIOFoo::Fileno)
-   end
-   
-   def test_clearerr
-      assert_respond_to(@foo, :clearerr)
-   end
-
-   def test_close
-      assert_respond_to(@foo, :close)
-   end
-
-   def test_fclose
-      assert_respond_to(@foo, :fclose)
-   end
-
-   def test_fileno
-      assert_respond_to(@foo, :fileno)
-   end
-   
-   def teardown
-      @foo  = nil
-   end
-end
+#####################################################################
+# tc_msvcrt_io.rb
+#
+# Test case for the Windows::MSVCRT::IO module.
+#####################################################################
+require 'windows/msvcrt/io'
+require 'test/unit'
+
+class MIOFoo
+   include Windows::MSVCRT::IO
+end
+
+class TC_Windows_MSVCRT_IO < Test::Unit::TestCase
+   def setup
+      @foo = MIOFoo.new
+   end
+
+   def test_numeric_constants
+      assert_not_nil(MIOFoo::S_IFMT)
+   end
+   
+   def test_method_constants
+      assert_not_nil(MIOFoo::Clearerr)
+      assert_not_nil(MIOFoo::Close)
+      assert_not_nil(MIOFoo::Fclose)
+      assert_not_nil(MIOFoo::Fileno)
+   end
+   
+   def test_clearerr
+      assert_respond_to(@foo, :clearerr)
+   end
+
+   def test_close
+      assert_respond_to(@foo, :close)
+   end
+
+   def test_fclose
+      assert_respond_to(@foo, :fclose)
+   end
+
+   def test_fileno
+      assert_respond_to(@foo, :fileno)
+   end
+   
+   def teardown
+      @foo  = nil
+   end
+end

data/test/tc_msvcrt_string.rb

@@ -1,93 +1,94 @@
-#####################################################################
-# tc_msvcrt_string.rb
-#
-# Test case for the Windows::MSVCRT::String module.
-#####################################################################
-require 'windows/msvcrt/string'
-require 'test/unit'
-
-class TC_Windows_MSVCRT_String < Test::Unit::TestCase
-  include Windows::MSVCRT::String
-
-  def setup
-    @buf = 0.chr * 260
-    @str = 'hello'
-  end
-
-  def test_method_constants
-    assert_not_nil(Strcmp)
-    assert_not_nil(Strcpy)
-    assert_not_nil(Strcspn)
-    assert_not_nil(Strlen)
-    assert_not_nil(Strncpy)
-    assert_not_nil(Strrchr)
-    assert_not_nil(Strrev)
-    assert_not_nil(Strtok)
-  end
-
-  def test_strchr
-    assert_respond_to(self, :strchr)
-    assert_equal('llo', strchr('hello', 108))
-    assert_equal(nil, strchr('hello', 120))
-  end
-
-  def test_strchr_with_zero
-    assert_nil(strchr(0, 'l'[0]))
-    assert_nil(strchr('hello', 0))
-  end
-
-  def test_strchr_expected_errors
-    assert_raise(ArgumentError){ strchr }
-    assert_raise(ArgumentError){ strchr('hello') }
-  end
-
-  def test_strcmp
-    assert_respond_to(self, :strcmp)
-    assert_equal(-1, strcmp('alpha', 'beta'))
-    assert_equal(1, strcmp('beta', 'alpha'))
-    assert_equal(0, strcmp('alpha', 'alpha'))
-  end
-
-  def test_strcmp_expected_errors
-    assert_raise(ArgumentError){ strcmp }
-    assert_raise(ArgumentError){ strcmp('alpha') }
-  end
-
-  def test_strcpy
-    assert_respond_to(self, :strcpy)
-    assert_kind_of(Fixnum, strcpy(@buf, ['hello'].pack('p*').unpack('L')[0]))
-    assert_equal('hello', @buf.strip)
-  end
-
-  def test_strcspn
-    assert_respond_to(self, :strcspn)
-    assert_equal(3, strcspn('abcxyz123', '&^(x'))
-    assert_equal(9, strcspn('abcxyz123', '&^(('))
-  end
-
-  def test_strcspn_expected_errors
-    assert_raise(ArgumentError){ strcspn }
-    assert_raise(ArgumentError){ strcspn('alpha') }
-  end
-
-  def test_strlen
-    assert_respond_to(self, :strlen)
-    assert_equal(5, strlen('hello'))
-    assert_equal(0, strlen(''))
-  end
-
-  def test_strlen_expected_errors
-    assert_raise(ArgumentError){ strlen }
-    assert_raise(ArgumentError){ strlen('a', 'b') }
-  end
-
-  def test_strncpy
-    assert_respond_to(self, :strncpy)
-    assert_equal('alp', strncpy(@buf, 'alpha', 3))
-    assert_equal('alp', @buf.strip)
-  end
-
-  def teardown
-    @buf = nil
-  end
-end
+#####################################################################
+# tc_msvcrt_string.rb
+#
+# Test case for the Windows::MSVCRT::String module.
+#####################################################################
+require 'windows/msvcrt/string'
+require 'test/unit'
+
+class TC_Windows_MSVCRT_String < Test::Unit::TestCase
+  include Windows::MSVCRT::String
+
+  def setup
+    @buf = 0.chr * 260
+    @str = 'hello'
+  end
+
+  def test_method_constants
+    assert_not_nil(Strcmp)
+    assert_not_nil(Strcpy)
+    assert_not_nil(Strcspn)
+    assert_not_nil(Strlen)
+    assert_not_nil(Strncpy)
+    assert_not_nil(Strrchr)
+    assert_not_nil(Strrev)
+    assert_not_nil(Strtok)
+  end
+
+  def test_strchr
+    assert(self.respond_to?(:strchr, true))
+    assert_equal('llo', strchr('hello', 108))
+    assert_equal(nil, strchr('hello', 120))
+  end
+
+  def test_strchr_with_zero
+    assert_nil(strchr(0, 'l'[0]))
+    assert_nil(strchr('hello', 0))
+  end
+
+  def test_strchr_expected_errors
+    assert_raise(ArgumentError){ strchr }
+    assert_raise(ArgumentError){ strchr('hello') }
+  end
+
+  def test_strcmp
+    assert(self.respond_to?(:strcmp, true))
+    assert_equal(-1, strcmp('alpha', 'beta'))
+    assert_equal(1, strcmp('beta', 'alpha'))
+    assert_equal(0, strcmp('alpha', 'alpha'))
+  end
+
+  def test_strcmp_expected_errors
+    assert_raise(ArgumentError){ strcmp }
+    assert_raise(ArgumentError){ strcmp('alpha') }
+  end
+
+  def test_strcpy
+    assert(self.respond_to?(:strcpy, true))
+    assert_kind_of(Fixnum, strcpy(@buf, ['hello'].pack('p*').unpack('L')[0]))
+    assert_equal('hello', @buf.strip)
+  end
+
+  def test_strcspn
+    assert(self.respond_to?(:strcspn, true))
+    assert_equal(3, strcspn('abcxyz123', '&^(x'))
+    assert_equal(9, strcspn('abcxyz123', '&^(('))
+  end
+
+  def test_strcspn_expected_errors
+    assert_raise(ArgumentError){ strcspn }
+    assert_raise(ArgumentError){ strcspn('alpha') }
+  end
+
+  def test_strlen
+    assert(self.respond_to?(:strlen, true))
+    assert_equal(5, strlen('hello'))
+    assert_equal(0, strlen(''))
+  end
+
+  def test_strlen_expected_errors
+    assert_raise(ArgumentError){ strlen }
+    assert_raise(ArgumentError){ strlen('a', 'b') }
+  end
+
+  def test_strncpy
+    assert(self.respond_to?(:strncpy, true))
+    assert_equal('alp', strncpy(@buf, 'alpha', 3))
+    assert_equal('alp', @buf.strip)
+  end
+
+  def teardown
+    @buf = nil
+    @str = nil
+  end
+end

data/test/tc_msvcrt_time.rb

@@ -1,29 +1,19 @@
-#####################################################################
-# tc_msvcrt_time.rb
-#
-# Test case for the Windows::MSVCRT::Time module.
-#####################################################################
-require 'windows/msvcrt/time'
-require 'test/unit'
-
-class MTimeFoo
-   include Windows::MSVCRT::Time
-end
-
-class TC_Windows_MSVCRT_Time < Test::Unit::TestCase
-   def setup
-      @foo = MTimeFoo.new
-   end
-   
-   def test_method_constants
-      assert_not_nil(MTimeFoo::Asctime)
-   end
-   
-   def test_asctime
-      assert_respond_to(@foo, :asctime)
-   end
-   
-   def teardown
-      @foo  = nil
-   end
-end
+#####################################################################
+# tc_msvcrt_time.rb
+#
+# Test case for the Windows::MSVCRT::Time module.
+#####################################################################
+require 'windows/msvcrt/time'
+require 'test/unit'
+
+class TC_Windows_MSVCRT_Time < Test::Unit::TestCase
+  include Windows::MSVCRT::Time
+
+  def test_method_constants
+    assert_not_nil(Asctime)
+  end
+   
+  def test_asctime
+    assert(self.respond_to?(:asctime, true))
+  end
+end