Expose classes, modules and methods to js

elia · elia · commit c682171c399b · 2013-11-14T15:31:02.000+01:00
diff --git a/spec/stdlib/native/exposure_spec.rb b/spec/stdlib/native/exposure_spec.rb
@@ -0,0 +1,33 @@
+require 'native'
+
+describe 'Native exposure' do
+  describe Class do
+    describe '#native_alias' do
+      it 'exposes a method to javascript' do
+        c = Class.new do
+          def ruby_method
+            :ruby
+          end
+
+          native_alias :rubyMethod, :ruby_method
+        end
+
+        `#{c.new}.rubyMethod()`.should == :ruby
+      end
+    end
+
+    describe '#native_class' do
+      it 'exposes a Class on the JS global object' do
+        c = Class.new do
+          def self.name
+            'Pippo'
+          end
+
+          native_class
+        end
+
+        `Pippo`.should == c
+      end
+    end
+  end
+end
diff --git a/stdlib/native.rb b/stdlib/native.rb
@@ -479,5 +479,19 @@ def to_n
   end
 end
 
+class Module
+  def native_module
+    `Opal.global[#{self.name}] = #{self}`
+  end
+end
+
+class Class
+  def native_alias(jsid, mid)
+    `#{self}._proto[#{jsid}] = #{self}._proto['$' + #{mid}]`
+  end
+
+  alias native_class native_module
+end
+
 # native global
 $$ = $global = Native(`Opal.global`)
diff --git a/stdlib/native_exposure.rb b/stdlib/native_exposure.rb
@@ -0,0 +1,13 @@
+class Module
+  def native_module
+    `Opal.global[#{self.name}] = #{self}`
+  end
+end
+
+class Class
+  def native_alias(jsid, mid)
+    `#{self}._proto[#{jsid}] = #{self}._proto['$' + #{mid}]`
+  end
+
+  alias native_class native_module
+end
