opal 0.11.4 → 1.0.0.beta1

data/stdlib/pp.rb

@@ -4,9 +4,9 @@ module Kernel
   end
 
   def pp(*objs)
-    objs.each {|obj|
+    objs.each do |obj|
       PP.pp(obj)
-    }
+    end
     objs.size <= 1 ? objs.first : objs
   end
   module_function :pp
@@ -15,11 +15,11 @@ end
 class PP
   class << self
     if `(typeof(console) === "undefined" || typeof(console.log) === "undefined")`
-      def pp(obj, out=$stdout, width=79)
+      def pp(obj, out = $stdout, width = 79)
         p(*args)
       end
     else
-      def pp(obj, out=$stdout, width=79)
+      def pp(obj, out = $stdout, width = 79)
         if String === out
           out + obj.inspect + "\n"
         else
@@ -28,6 +28,6 @@ class PP
       end
     end
 
-    alias :singleline_pp :pp
+    alias singleline_pp pp
   end
 end

data/stdlib/promise.rb

@@ -134,7 +134,7 @@ class Promise
   end
 
   def act?
-    @action.has_key?(:success) || @action.has_key?(:always)
+    @action.key?(:success) || @action.key?(:always)
   end
 
   def action
@@ -146,7 +146,7 @@ class Promise
   end
 
   def realized?
-    !!@realized
+    @realized != false
   end
 
   def resolved?
@@ -159,7 +159,7 @@ class Promise
 
   def ^(promise)
     promise << self
-    self    >> promise
+    self >> promise
 
     promise
   end
@@ -178,7 +178,7 @@ class Promise
     elsif resolved?
       promise.resolve(@delayed ? @delayed[0] : value)
     elsif rejected?
-      if !@action.has_key?(:failure) || Promise === (@delayed ? @delayed[0] : @error)
+      if !@action.key?(:failure) || Promise === (@delayed ? @delayed[0] : @error)
         promise.reject(@delayed ? @delayed[0] : error)
       elsif promise.action.include?(:always)
         promise.reject(@delayed ? @delayed[0] : error)
@@ -198,7 +198,8 @@ class Promise
     end
 
     begin
-      if block = @action[:success] || @action[:always]
+      block = @action[:success] || @action[:always]
+      if block
         value = block.call(value)
       end
 
@@ -231,11 +232,12 @@ class Promise
     end
 
     begin
-      if block = @action[:failure] || @action[:always]
+      block = @action[:failure] || @action[:always]
+      if block
         value = block.call(value)
       end
 
-      if @action.has_key?(:always)
+      if @action.key?(:always)
         resolve!(value)
       else
         reject!(value)
@@ -326,11 +328,11 @@ class Promise
       result += " >> #{@next.inspect}"
     end
 
-    if realized?
-      result += ": #{(@value || @error).inspect}>"
-    else
-      result += ">"
-    end
+    result += if realized?
+                ": #{(@value || @error).inspect}>"
+              else
+                '>'
+              end
 
     result
   end
@@ -343,7 +345,8 @@ class Promise
         current.push(promise.value)
       end
 
-      if prev = promise.prev
+      prev = promise.prev
+      if prev
         current.concat(it(prev))
       else
         current
@@ -372,31 +375,31 @@ class Promise
 
       @wait = []
 
-      promises.each {|promise|
+      promises.each do |promise|
         wait promise
-      }
+      end
     end
 
     def each(&block)
       raise ArgumentError, 'no block given' unless block
 
-      self.then {|values|
+      self.then do |values|
         values.each(&block)
-      }
+      end
     end
 
     def collect(&block)
       raise ArgumentError, 'no block given' unless block
 
-      self.then {|values|
+      self.then do |values|
         When.new(values.map(&block))
-      }
+      end
     end
 
     def inject(*args, &block)
-      self.then {|values|
+      self.then do |values|
         values.reduce(*args, &block)
-      }
+      end
     end
 
     alias map collect
@@ -414,9 +417,9 @@ class Promise
 
       @wait << promise
 
-      promise.always {
+      promise.always do
         try if @next.any?
-      }
+      end
 
       self
     end
@@ -424,14 +427,15 @@ class Promise
     alias and wait
 
     def >>(*)
-      super.tap {
+      super.tap do
         try
-      }
+      end
     end
 
     def try
       if @wait.all?(&:realized?)
-        if promise = @wait.find(&:rejected?)
+        promise = @wait.find(&:rejected?)
+        if promise
           reject(promise.error)
         else
           resolve(@wait.map(&:value))

data/stdlib/rbconfig/sizeof.rb

@@ -0,0 +1,50 @@
+# This file is not intended for real checks,
+# but just to make happy libraries needing it.
+
+RbConfig::SIZEOF = {
+  'clock_t'              => 8,
+  'double _Complex'      => 16,
+  'double'               => 8,
+  'float _Complex'       => 8,
+  'float'                => 4,
+  'int'                  => 4,
+  'int128_t'             => 16,
+  'int16_t'              => 2,
+  'int32_t'              => 4,
+  'int64_t'              => 8,
+  'int8_t'               => 1,
+  'intmax_t'             => 8,
+  'intptr_t'             => 8,
+  'int_fast16_t'         => 2,
+  'int_fast32_t'         => 4,
+  'int_fast64_t'         => 8,
+  'int_fast8_t'          => 1,
+  'int_least16_t'        => 2,
+  'int_least32_t'        => 4,
+  'int_least64_t'        => 8,
+  'int_least8_t'         => 1,
+  'long double _Complex' => 32,
+  'long double'          => 16,
+  'long long'            => 8,
+  'long'                 => 8,
+  'off_t'                => 8,
+  'ptrdiff_t'            => 8,
+  'short'                => 2,
+  'sig_atomic_t'         => 4,
+  'size_t'               => 8,
+  'ssize_t'              => 8,
+  'time_t'               => 8,
+  'uint128_t'            => 16,
+  'uint16_t'             => 2,
+  'uint32_t'             => 4,
+  'uint64_t'             => 8,
+  'uint8_t'              => 1,
+  'uintptr_t'            => 8,
+  'void*'                => 8,
+  'wchar_t'              => 4,
+  'wctrans_t'            => 4,
+  'wctype_t'             => 4,
+  'wint_t'               => 4,
+  '_Bool'                => 1,
+  '__int128'             => 16,
+}

data/stdlib/securerandom.rb

@@ -1,6 +1,6 @@
 module SecureRandom
   def self.uuid
-    "xxxxxxxx-xxxx-4xxx-yxxx-xxxxxxxxxxxx".gsub(/[xy]/) do |ch,|
+    'xxxxxxxx-xxxx-4xxx-yxxx-xxxxxxxxxxxx'.gsub(/[xy]/) do |ch,|
       %x{
         var r = Math.random() * 16 | 0,
             v = ch == "x" ? r : (r & 3 | 8);

data/stdlib/set.rb

@@ -7,13 +7,13 @@ class Set
   end
 
   def initialize(enum = nil, &block)
-    @hash = Hash.new
+    @hash = {}
 
     return if enum.nil?
     raise ArgumentError, 'value must be enumerable' unless Enumerable === enum
 
     if block
-      enum.each { |item| add block.call(item) }
+      enum.each { |item| add yield(item) }
     else
       merge(enum)
     end
@@ -26,7 +26,7 @@ class Set
 
   def -(enum)
     unless enum.respond_to? :each
-      raise ArgumentError, "value must be enumerable"
+      raise ArgumentError, 'value must be enumerable'
     end
 
     dup.subtract(enum)
@@ -38,11 +38,11 @@ class Set
   end
 
   def ==(other)
-    if self.equal?(other)
+    if equal?(other)
       true
     elsif other.instance_of?(self.class)
       @hash == other.instance_variable_get(:@hash)
-    elsif other.is_a?(Set) && self.size == other.size
+    elsif other.is_a?(Set) && size == other.size
       other.all? { |o| @hash.include?(o) }
     else
       false
@@ -82,13 +82,11 @@ class Set
     if include?(o)
       delete(o)
       self
-    else
-      nil
     end
   end
 
   def delete_if
-    block_given? or return enum_for(__method__)
+    return enum_for(:delete_if) unless block_given?
     # @hash.delete_if should be faster, but using it breaks the order
     # of enumeration in subclasses.
     select { |o| yield o }.each { |o| @hash.delete(o) }
@@ -104,7 +102,7 @@ class Set
   end
 
   def each(&block)
-    return enum_for :each unless block_given?
+    return enum_for(:each) unless block_given?
     @hash.each_key(&block)
     self
   end
@@ -148,46 +146,46 @@ class Set
     enum.each { |item| delete item }
     self
   end
-  
+
   def |(enum)
     unless enum.respond_to? :each
-      raise ArgumentError, "value must be enumerable"
+      raise ArgumentError, 'value must be enumerable'
     end
     dup.merge(enum)
   end
-  
+
   def superset?(set)
-    set.is_a?(Set) or raise ArgumentError, "value must be a set"
+    set.is_a?(Set) || raise(ArgumentError, 'value must be a set')
     return false if size < set.size
     set.all? { |o| include?(o) }
   end
-  
+
   alias >= superset?
-  
+
   def proper_superset?(set)
-    set.is_a?(Set) or raise ArgumentError, "value must be a set"
+    set.is_a?(Set) || raise(ArgumentError, 'value must be a set')
     return false if size <= set.size
     set.all? { |o| include?(o) }
   end
-    
+
   alias > proper_superset?
-  
+
   def subset?(set)
-    set.is_a?(Set) or raise ArgumentError, "value must be a set"
+    set.is_a?(Set) || raise(ArgumentError, 'value must be a set')
     return false if set.size < size
     all? { |o| set.include?(o) }
   end
-  
+
   alias <= subset?
 
   def proper_subset?(set)
-    set.is_a?(Set) or raise ArgumentError, "value must be a set"
+    set.is_a?(Set) || raise(ArgumentError, 'value must be a set')
     return false if set.size <= size
     all? { |o| set.include?(o) }
   end
-  
+
   alias < proper_subset?
-  
+
   alias + |
   alias union |
 

data/stdlib/singleton.rb

@@ -8,7 +8,6 @@ module Singleton
   end
 
   module SingletonClassMethods
-
     def clone
       Singleton.__init__(super)
     end
@@ -21,12 +20,12 @@ module Singleton
 
   class << Singleton
     def __init__(klass)
-      klass.instance_eval {
+      klass.instance_eval do
         @singleton__instance__ = nil
-      }
+      end
       def klass.instance
         return @singleton__instance__ if @singleton__instance__
-        @singleton__instance__ = new()
+        @singleton__instance__ = new
       end
       klass
     end

data/stdlib/stringio.rb

@@ -96,6 +96,39 @@ class StringIO < IO
     self
   end
 
+  def each(separator = $/)
+    return enum_for :each_line unless block_given?
+    check_readable
+    chomp_lines = false
+    if ::Hash === separator
+      separator = (chomp_lines = separator[:chomp]) ? /\r?\n/ : $/
+    elsif separator
+      separator = separator.to_str
+    else
+      separator = `undefined`
+    end
+    %x{
+      var str = self.string, stringLength = str.length;
+      if (self.position < stringLength) str = str.substr(self.position);
+      if (separator) {
+        var chomped = #{`str`.chomp}, trailing = str.length !== chomped.length, splitted = chomped.split(separator);
+        for (var i = 0, len = splitted.length; i < len; i++) {
+          var line = chomp_lines ? splitted[i] : (i < len - 1 || trailing ? splitted[i] + separator : splitted[i]);
+          #{yield `line`};
+        }
+      } else if (separator === undefined) {
+        #{yield `str`};
+      } else {
+        var m, re = /(.+(?:\n\n|$))\n*/g;
+        while ((m = re.exec(str))) #{yield `m[1]`};
+      }
+      self.position = stringLength;
+    }
+    self
+  end
+
+  alias each_line each
+
   def write(string)
     check_writable
 

data/stdlib/strscan.rb

@@ -13,7 +13,7 @@ class StringScanner
   attr_reader :string
 
   def beginning_of_line?
-    `#@pos === 0 || #@string.charAt(#@pos - 1) === "\n"`
+    `#{@pos} === 0 || #{@string}.charAt(#{@pos} - 1) === "\n"`
   end
 
   alias bol? beginning_of_line?
@@ -22,23 +22,23 @@ class StringScanner
     pattern = anchor(pattern)
 
     %x{
-      var result = pattern.exec(#@working);
+      var result = pattern.exec(#{@working});
 
       if (result == null) {
-        return #@matched = nil;
+        return #{@matched} = nil;
       }
       else if (typeof(result) === 'object') {
-        #@prev_pos = #@pos;
-        #@pos     += result[0].length;
-        #@working  = #@working.substring(result[0].length);
-        #@matched  = result[0];
-        #@match    = result;
+        #{@prev_pos} = #{@pos};
+        #{@pos}     += result[0].length;
+        #{@working}  = #{@working}.substring(result[0].length);
+        #{@matched}  = result[0];
+        #{@match}    = result;
 
         return result[0];
       }
       else if (typeof(result) === 'string') {
-        #@pos     += result.length;
-        #@working  = #@working.substring(result.length);
+        #{@pos}     += result.length;
+        #{@working}  = #{@working}.substring(result.length);
 
         return result;
       }
@@ -52,8 +52,8 @@ class StringScanner
     pattern = anchor(pattern)
 
     %x{
-      var pos     = #@pos,
-          working = #@working,
+      var pos     = #{@pos},
+          working = #{@working},
           result;
 
       while (true) {
@@ -63,26 +63,25 @@ class StringScanner
 
         if (result == null) {
           if (working.length === 0) {
-            return #@matched = nil;
+            return #{@matched} = nil;
           }
 
           continue;
         }
 
-        #@matched  = #@string.substr(#@pos, pos - #@pos - 1 + result[0].length);
-        #@prev_pos = pos - 1;
-        #@pos      = pos;
-        #@working  = working.substr(result[0].length);
+        #{@matched}  = #{@string}.substr(#{@pos}, pos - #{@pos} - 1 + result[0].length);
+        #{@prev_pos} = pos - 1;
+        #{@pos}      = pos;
+        #{@working}  = working.substr(result[0].length);
 
-        return #@matched;
+        return #{@matched};
       }
     }
   end
 
-
   def [](idx)
     %x{
-      var match = #@match;
+      var match = #{@match};
 
       if (idx < 0) {
         idx += match.length;
@@ -104,46 +103,46 @@ class StringScanner
     pattern = anchor(pattern)
 
     %x{
-      var result = pattern.exec(#@working);
+      var result = pattern.exec(#{@working});
 
       if (result == null) {
-        return #@matched = nil;
+        return #{@matched} = nil;
       }
 
-      return #@matched = result[0];
+      return #{@matched} = result[0];
     }
   end
 
   def check_until(pattern)
     %x{
-      var prev_pos = #@prev_pos,
-          pos      = #@pos;
+      var prev_pos = #{@prev_pos},
+          pos      = #{@pos};
 
       var result = #{scan_until(pattern)};
 
       if (result !== nil) {
-        #@matched = result.substr(-1);
-        #@working = #@string.substr(pos);
+        #{@matched} = result.substr(-1);
+        #{@working} = #{@string}.substr(pos);
       }
 
-      #@prev_pos = prev_pos;
-      #@pos      = pos;
+      #{@prev_pos} = prev_pos;
+      #{@pos}      = pos;
 
       return result;
     }
   end
 
   def peek(length)
-    `#@working.substring(0, length)`
+    `#{@working}.substring(0, length)`
   end
 
   def eos?
-    `#@working.length === 0`
+    `#{@working}.length === 0`
   end
 
   def exist?(pattern)
     %x{
-      var result = pattern.exec(#@working);
+      var result = pattern.exec(#{@working});
 
       if (result == null) {
         return nil;
@@ -161,19 +160,19 @@ class StringScanner
     pattern = anchor(pattern)
 
     %x{
-      var result = pattern.exec(#@working);
+      var result = pattern.exec(#{@working});
 
       if (result == null) {
-        return #@matched = nil;
+        return #{@matched} = nil;
       }
       else {
         var match_str = result[0];
         var match_len = match_str.length;
 
-        #@matched   = match_str;
-        #@prev_pos  = #@pos;
-        #@pos      += match_len;
-        #@working   = #@working.substring(match_len);
+        #{@matched}   = match_str;
+        #{@prev_pos}  = #{@pos};
+        #{@pos}      += match_len;
+        #{@working}   = #{@working}.substring(match_len);
 
         return match_len;
       }
@@ -188,7 +187,7 @@ class StringScanner
         return nil;
       }
       else {
-        #@matched = result.substr(-1);
+        #{@matched} = result.substr(-1);
 
         return result.length;
       }
@@ -199,14 +198,14 @@ class StringScanner
     %x{
       var result = nil;
 
-      if (#@pos < #@string.length) {
-        #@prev_pos  = #@pos;
-        #@pos      += 1;
-        result      = #@matched = #@working.substring(0, 1);
-        #@working   = #@working.substring(1);
+      if (#{@pos} < #{@string}.length) {
+        #{@prev_pos}  = #{@pos};
+        #{@pos}      += 1;
+        result      = #{@matched} = #{@working}.substring(0, 1);
+        #{@working}   = #{@working}.substring(1);
       }
       else {
-        #@matched = nil;
+        #{@matched} = nil;
       }
 
       return result;
@@ -220,13 +219,13 @@ class StringScanner
     pattern = anchor(pattern)
 
     %x{
-      var result = pattern.exec(#@working);
+      var result = pattern.exec(#{@working});
 
       if (result == null) {
         return nil;
       }
       else {
-        #@prev_pos = #@pos;
+        #{@prev_pos} = #{@pos};
 
         return result[0].length;
       }
@@ -246,31 +245,31 @@ class StringScanner
 
   def matched_size
     %x{
-      if (#@matched === nil) {
+      if (#{@matched} === nil) {
         return nil;
       }
 
-      return #@matched.length
+      return #{@matched}.length
     }
   end
 
   def post_match
     %x{
-      if (#@matched === nil) {
+      if (#{@matched} === nil) {
         return nil;
       }
 
-      return #@string.substr(#@pos);
+      return #{@string}.substr(#{@pos});
     }
   end
 
   def pre_match
     %x{
-      if (#@matched === nil) {
+      if (#{@matched} === nil) {
         return nil;
       }
 
-      return #@string.substr(0, #@prev_pos);
+      return #{@string}.substr(0, #{@prev_pos});
     }
   end
 
@@ -285,7 +284,7 @@ class StringScanner
   end
 
   def rest?
-    `#@working.length !== 0`
+    `#{@working}.length !== 0`
   end
 
   def rest_size
@@ -305,7 +304,8 @@ class StringScanner
     self
   end
 
-private
+  private
+
   def anchor(pattern)
     %x{
       var flags = pattern.toString().match(/\/([^\/]+)$/);