opal 1.6.0 → 1.7.0.rc1

data/opal/corelib/boolean.rb

@@ -90,13 +90,13 @@ class ::Boolean < `Boolean`
   # the methods defined on Boolean, but our implementation doesn't allow that,
   # unless you define them on Boolean and not on TrueClass/FalseClass.
   def method_missing(method, *args, &block)
-    `var body = self.$$class.$$prototype['$' + #{method}]`
+    `var body = self.$$class.$$prototype[Opal.jsid(#{method})]`
     super unless `typeof body !== 'undefined' && !body.$$stub`
     `Opal.send(self, body, #{args}, #{block})`
   end
 
   def respond_to_missing?(method, _include_all = false)
-    `var body = self.$$class.$$prototype['$' + #{method}]`
+    `var body = self.$$class.$$prototype[Opal.jsid(#{method})]`
     `typeof body !== 'undefined' && !body.$$stub`
   end
 

data/opal/corelib/class.rb

@@ -83,5 +83,16 @@ class ::Class
     }
   end
 
+  def attached_object
+    %x{
+      if (self.$$singleton_of != null) {
+        return self.$$singleton_of;
+      }
+      else {
+        #{::Kernel.raise ::TypeError, "`#{self}' is not a singleton class"}
+      }
+    }
+  end
+
   alias inspect to_s
 end

data/opal/corelib/constants.rb

@@ -1,8 +1,8 @@
 ::RUBY_PLATFORM       = 'opal'
 ::RUBY_ENGINE         = 'opal'
-::RUBY_VERSION        = '3.1.0'
-::RUBY_ENGINE_VERSION = '1.6.0'
-::RUBY_RELEASE_DATE   = '2022-11-24'
+::RUBY_VERSION        = '3.2.0'
+::RUBY_ENGINE_VERSION = '1.7.0.rc1'
+::RUBY_RELEASE_DATE   = '2022-12-22'
 ::RUBY_PATCHLEVEL     = 0
 ::RUBY_REVISION       = '0'
 ::RUBY_COPYRIGHT      = 'opal - Copyright (C) 2013-2022 Adam Beynon and the Opal contributors'

data/opal/corelib/enumerable.rb

@@ -1268,6 +1268,10 @@ module ::Enumerable
     }
   end
 
+  def to_set(klass = Set, *args, &block)
+    klass.new(self, *args, &block)
+  end
+
   def zip(*others, &block)
     to_a.zip(*others)
   end

data/opal/corelib/enumerator.rb

@@ -37,7 +37,7 @@ class ::Enumerator
     else
       @object = `arguments[0]`
       @method = `arguments[1] || "each"`
-      @args   = `$slice.call(arguments, 2)`
+      @args   = `$slice(arguments, 2)`
       @size   = nil
     end
   end

data/opal/corelib/hash.rb

@@ -1031,7 +1031,7 @@ class ::Hash
         return [key, $hash_delete(self, key)];
       }
 
-      return self.$default(nil);
+      return nil;
     }
   end
 
@@ -1136,7 +1136,7 @@ class ::Hash
     %x{
       $deny_frozen_access(self);
 
-      var keys = Opal.slice.call(self.$$keys),
+      var keys = Opal.slice(self.$$keys),
           i, length = keys.length, key, value, new_key;
 
       for (i = 0; i < length; i++) {

data/opal/corelib/helpers.rb

@@ -147,7 +147,7 @@ module ::Opal
       var method_name, method;
       for (var i = method_names.length - 1; i >= 0; i--) {
         method_name = method_names[i];
-        method = owner_class.$$prototype['$'+method_name];
+        method = owner_class.$$prototype[Opal.jsid(method_name)];
 
         if (method && !method.$$stub) {
           method.$$pristine = true;

data/opal/corelib/kernel.rb

@@ -1,4 +1,4 @@
-# helpers: truthy, coerce_to, respond_to, Opal, deny_frozen_access, freeze, freeze_props
+# helpers: truthy, coerce_to, respond_to, Opal, deny_frozen_access, freeze, freeze_props, jsid
 # use_strict: true
 
 module ::Kernel
@@ -31,7 +31,7 @@ module ::Kernel
 
   def method(name)
     %x{
-      var meth = self['$' + name];
+      var meth = self[$jsid(name)];
 
       if (!meth || meth.$$stub) {
         #{::Kernel.raise ::NameError.new("undefined method `#{name}' for class `#{self.class}'", name)};
@@ -662,7 +662,7 @@ module ::Kernel
 
   def respond_to?(name, include_all = false)
     %x{
-      var body = self['$' + name];
+      var body = self[$jsid(name)];
 
       if (typeof(body) === "function" && !body.$$stub) {
         return true;

data/opal/corelib/method.rb

@@ -53,7 +53,7 @@ class ::Method
       var proc = self.$call.bind(self);
       proc.$$unbound = #{@method};
       proc.$$is_lambda = true;
-      proc.$$arity = #{@method}.$$arity;
+      proc.$$arity = #{@method}.$$arity == null ? #{@method}.length : #{@method}.$$arity;
       proc.$$parameters = #{@method}.$$parameters;
       return proc;
     }

data/opal/corelib/module.rb

@@ -1,4 +1,4 @@
-# helpers: truthy, coerce_to, const_set, Object, return_ivar, assign_ivar, ivar, deny_frozen_access, freeze, prop
+# helpers: truthy, coerce_to, const_set, Object, return_ivar, assign_ivar, ivar, deny_frozen_access, freeze, prop, jsid
 
 class ::Module
   def self.allocate
@@ -138,7 +138,7 @@ class ::Module
 
       for (var i = names.length - 1; i >= 0; i--) {
         var name = names[i],
-            id   = '$' + name,
+            id   = $jsid(name),
             ivar = $ivar(name);
 
         var body = $return_ivar(ivar);
@@ -164,7 +164,7 @@ class ::Module
 
       for (var i = names.length - 1; i >= 0; i--) {
         var name = names[i],
-            id   = '$' + name + '=',
+            id   = $jsid(name + '='),
             ivar = $ivar(name);
 
         var body = $assign_ivar(ivar)
@@ -200,6 +200,10 @@ class ::Module
         }
         Opal.const_cache_version++;
         self.$$autoload[#{const}] = { path: #{path}, loaded: false, required: false, success: false, exception: false };
+
+        if (self.$const_added && !self.$const_added.$$pristine) {
+          self.$const_added(#{const});
+        }
       }
       return nil;
     }
@@ -246,6 +250,10 @@ class ::Module
     `Opal.class_variables(self).hasOwnProperty(name)`
   end
 
+  def const_added(name)
+  end
+  ::Opal.pristine self, :const_added
+
   def remove_class_variable(name)
     `$deny_frozen_access(self)`
 
@@ -424,7 +432,7 @@ class ::Module
       block.$$def         = block;
       block.$$define_meth = true;
 
-      return Opal.defn(self, '$' + name, block);
+      return Opal.defn(self, $jsid(name), block);
     }
   end
 
@@ -503,7 +511,7 @@ class ::Module
 
   def instance_method(name)
     %x{
-      var meth = self.$$prototype['$' + name];
+      var meth = self.$$prototype[$jsid(name)];
 
       if (!meth || meth.$$stub) {
         #{::Kernel.raise ::NameError.new("undefined method `#{name}' for class `#{self.name}'", name)};
@@ -589,7 +597,7 @@ class ::Module
 
   def method_defined?(method)
     %x{
-      var body = self.$$prototype['$' + method];
+      var body = self.$$prototype[$jsid(method)];
       return (!!body) && !body.$$stub;
     }
   end
@@ -605,7 +613,7 @@ class ::Module
       else {
         for (var i = 0, length = methods.length; i < length; i++) {
           var meth = methods[i],
-              id   = '$' + meth,
+              id   = $jsid(meth),
               func = self.$$prototype[id];
 
           Opal.defs(self, id, func);
@@ -754,7 +762,7 @@ class ::Module
     %x{
       klass_id = Opal.id(klass);
       if (typeof self.$$refine_modules === "undefined") {
-        self.$$refine_modules = {};
+        self.$$refine_modules = Object.create(null);
       }
       if (typeof self.$$refine_modules[klass_id] === "undefined") {
         m = self.$$refine_modules[klass_id] = #{::Refinement.new};
@@ -769,6 +777,17 @@ class ::Module
     m
   end
 
+  def refinements
+    %x{
+      var refine_modules = self.$$refine_modules, hash = #{{}};;
+      if (typeof refine_modules === "undefined") return hash;
+      for (var id in refine_modules) {
+        hash['$[]='](refine_modules[id].refined_class, refine_modules[id]);
+      }
+      return hash;
+    }
+  end
+
   # Compiler overrides this method
   def using(mod)
     ::Kernel.raise 'Module#using is not permitted in methods'
@@ -780,6 +799,8 @@ class ::Module
 end
 
 class ::Refinement < ::Module
+  attr_reader :refined_class
+
   def inspect
     if @refinement_module
       "#<refinement:#{@refined_class.inspect}@#{@refinement_module.inspect}>"

data/opal/corelib/proc.rb

@@ -81,8 +81,10 @@ class ::Proc < `Function`
     %x{
       if (self.$$is_curried) {
         return -1;
-      } else {
+      } else if (self.$$arity != null) {
         return self.$$arity;
+      } else {
+        return self.length;
       }
     }
   end
@@ -100,12 +102,12 @@ class ::Proc < `Function`
     end
   end
 
-  def parameters
+  def parameters(lambda: undefined)
     %x{
       if (self.$$is_curried) {
         return #{[[:rest]]};
       } else if (self.$$parameters) {
-        if (self.$$is_lambda) {
+        if (lambda == null ? self.$$is_lambda : lambda) {
           return self.$$parameters;
         } else {
           var result = [], i, length;
@@ -142,7 +144,7 @@ class ::Proc < `Function`
       }
 
       function curried () {
-        var args = $slice.call(arguments),
+        var args = $slice(arguments),
             length = args.length,
             result;
 
@@ -156,7 +158,7 @@ class ::Proc < `Function`
 
         result = function () {
           return curried.apply(null,
-            args.concat($slice.call(arguments)));
+            args.concat($slice(arguments)));
         }
         result.$$is_lambda = self.$$is_lambda;
         result.$$is_curried = true;