1 files changed, 34 insertions, 0 deletions
diff --git a/spec/ruby/library/win32ole/win32ole/const_load_spec.rb b/spec/ruby/library/win32ole/win32ole/const_load_spec.rb
new file mode 100644
index 0000000000..a3c50f215e
--- /dev/null
+++ b/spec/ruby/library/win32ole/win32ole/const_load_spec.rb
@@ -0,0 +1,34 @@
+require File.expand_path('../../fixtures/classes', __FILE__)
+
+platform_is :windows do
+  require 'win32ole'
+
+  describe "WIN32OLE.const_load when passed Shell.Application OLE object" do
+    before :each do
+      @win32ole = WIN32OLESpecs.new_ole 'Shell.Application'
+    end
+
+    it "loads constant SsfWINDOWS into WIN32OLE namespace" do
+      WIN32OLE.const_defined?(:SsfWINDOWS).should be_false
+      WIN32OLE.const_load @win32ole
+      WIN32OLE.const_defined?(:SsfWINDOWS).should be_true
+    end
+  end
+
+  describe "WIN32OLE.const_load when namespace is specified" do
+    before :each do
+      module WIN32OLE_RUBYSPEC; end
+      @win32ole = WIN32OLESpecs.new_ole 'Shell.Application'
+    end
+
+    it "loads constants into given namespace" do
+      module WIN32OLE_RUBYSPEC; end
+
+      WIN32OLE_RUBYSPEC.const_defined?(:SsfWINDOWS).should be_false
+      WIN32OLE.const_load @win32ole, WIN32OLE_RUBYSPEC
+      WIN32OLE_RUBYSPEC.const_defined?(:SsfWINDOWS).should be_true
+
+    end
+  end
+
+end