opal 0.11.4 → 1.0.0.beta1

data/stdlib/nodejs/node_modules/glob/node_modules/once/node_modules/wrappy/test/basic.js

@@ -1,51 +0,0 @@
-var test = require('tap').test
-var wrappy = require('../wrappy.js')
-
-test('basic', function (t) {
-  function onceifier (cb) {
-    var called = false
-    return function () {
-      if (called) return
-      called = true
-      return cb.apply(this, arguments)
-    }
-  }
-  onceifier.iAmOnce = {}
-  var once = wrappy(onceifier)
-  t.equal(once.iAmOnce, onceifier.iAmOnce)
-
-  var called = 0
-  function boo () {
-    t.equal(called, 0)
-    called++
-  }
-  // has some rando property
-  boo.iAmBoo = true
-
-  var onlyPrintOnce = once(boo)
-
-  onlyPrintOnce() // prints 'boo'
-  onlyPrintOnce() // does nothing
-  t.equal(called, 1)
-
-  // random property is retained!
-  t.equal(onlyPrintOnce.iAmBoo, true)
-
-  var logs = []
-  var logwrap = wrappy(function (msg, cb) {
-    logs.push(msg + ' wrapping cb')
-    return function () {
-      logs.push(msg + ' before cb')
-      var ret = cb.apply(this, arguments)
-      logs.push(msg + ' after cb')
-    }
-  })
-
-  var c = logwrap('foo', function () {
-    t.same(logs, [ 'foo wrapping cb', 'foo before cb' ])
-  })
-  c()
-  t.same(logs, [ 'foo wrapping cb', 'foo before cb', 'foo after cb' ])
-
-  t.end()
-})

data/stdlib/nodejs/node_modules/glob/node_modules/once/node_modules/wrappy/wrappy.js

@@ -1,33 +0,0 @@
-// Returns a wrapper function that returns a wrapped callback
-// The wrapper function should do some stuff, and return a
-// presumably different callback function.
-// This makes sure that own properties are retained, so that
-// decorations and such are not lost along the way.
-module.exports = wrappy
-function wrappy (fn, cb) {
-  if (fn && cb) return wrappy(fn)(cb)
-
-  if (typeof fn !== 'function')
-    throw new TypeError('need wrapper function')
-
-  Object.keys(fn).forEach(function (k) {
-    wrapper[k] = fn[k]
-  })
-
-  return wrapper
-
-  function wrapper() {
-    var args = new Array(arguments.length)
-    for (var i = 0; i < args.length; i++) {
-      args[i] = arguments[i]
-    }
-    var ret = fn.apply(this, args)
-    var cb = args[args.length-1]
-    if (typeof ret === 'function' && ret !== cb) {
-      Object.keys(cb).forEach(function (k) {
-        ret[k] = cb[k]
-      })
-    }
-    return ret
-  }
-}

data/stdlib/nodejs/node_modules/glob/node_modules/once/once.js

@@ -1,21 +0,0 @@
-var wrappy = require('wrappy')
-module.exports = wrappy(once)
-
-once.proto = once(function () {
-  Object.defineProperty(Function.prototype, 'once', {
-    value: function () {
-      return once(this)
-    },
-    configurable: true
-  })
-})
-
-function once (fn) {
-  var f = function () {
-    if (f.called) return f.value
-    f.called = true
-    return f.value = fn.apply(this, arguments)
-  }
-  f.called = false
-  return f
-}

data/stdlib/nodejs/node_modules/glob/node_modules/once/package.json

@@ -1,60 +0,0 @@
-{
-  "name": "once",
-  "version": "1.3.1",
-  "description": "Run a function exactly one time",
-  "main": "once.js",
-  "directories": {
-    "test": "test"
-  },
-  "dependencies": {
-    "wrappy": "1"
-  },
-  "devDependencies": {
-    "tap": "~0.3.0"
-  },
-  "scripts": {
-    "test": "tap test/*.js"
-  },
-  "repository": {
-    "type": "git",
-    "url": "git://github.com/isaacs/once"
-  },
-  "keywords": [
-    "once",
-    "function",
-    "one",
-    "single"
-  ],
-  "author": {
-    "name": "Isaac Z. Schlueter",
-    "email": "i@izs.me",
-    "url": "http://blog.izs.me/"
-  },
-  "license": "BSD",
-  "gitHead": "c90ac02a74f433ce47f6938869e68dd6196ffc2c",
-  "bugs": {
-    "url": "https://github.com/isaacs/once/issues"
-  },
-  "homepage": "https://github.com/isaacs/once",
-  "_id": "once@1.3.1",
-  "_shasum": "f3f3e4da5b7d27b5c732969ee3e67e729457b31f",
-  "_from": "once@>=1.3.0 <2.0.0",
-  "_npmVersion": "2.0.0",
-  "_nodeVersion": "0.10.31",
-  "_npmUser": {
-    "name": "isaacs",
-    "email": "i@izs.me"
-  },
-  "maintainers": [
-    {
-      "name": "isaacs",
-      "email": "i@izs.me"
-    }
-  ],
-  "dist": {
-    "shasum": "f3f3e4da5b7d27b5c732969ee3e67e729457b31f",
-    "tarball": "http://registry.npmjs.org/once/-/once-1.3.1.tgz"
-  },
-  "_resolved": "https://registry.npmjs.org/once/-/once-1.3.1.tgz",
-  "readme": "ERROR: No README data found!"
-}

data/stdlib/nodejs/node_modules/glob/node_modules/once/test/once.js

@@ -1,23 +0,0 @@
-var test = require('tap').test
-var once = require('../once.js')
-
-test('once', function (t) {
-  var f = 0
-  function fn (g) {
-    t.equal(f, 0)
-    f ++
-    return f + g + this
-  }
-  fn.ownProperty = {}
-  var foo = once(fn)
-  t.equal(fn.ownProperty, foo.ownProperty)
-  t.notOk(foo.called)
-  for (var i = 0; i < 1E3; i++) {
-    t.same(f, i === 0 ? 0 : 1)
-    var g = foo.call(1, 1)
-    t.ok(foo.called)
-    t.same(g, 3)
-    t.same(f, 1)
-  }
-  t.end()
-})

data/stdlib/nodejs/rubygems.rb

@@ -1,68 +0,0 @@
-require 'json'
-
-module Gem
-  class Install
-    def initialize(name, version)
-      @name = name
-      @version = version
-    end
-
-    def version
-      @version ||= latest_version(name)
-    end
-
-    def latest_version(name)
-      command = curl("https://rubygems.org/api/v1/versions/#{name}.json")
-      versions = JSON.parse system(command)
-      versions.first['number']
-    end
-
-    def full_name
-      "#{name}-#{version}"
-    end
-
-    def gem_home
-      ENV['HOME']+'/.opal-node/opal-gems/#{RUBY_ENGINE_VERSION}'
-    end
-
-    def gems_dir
-      File.join(gem_home, :gems)
-    end
-
-    def specs_dir
-      File.join(gem_home, :specs)
-    end
-
-    def perform
-      gem_dir = File.join(gems_dir, full_name)
-      spec_dir = File.join(specs_dir, full_name+'.yml')
-      system "mkdir -p #{gem_dir} #{spec_dir}"
-
-      Dir.chdir gem_dir do
-        system curl("https://rubygems.org/downloads/#{name}-#{version}.gem") + '| tar -xv'
-        system "gunzip metadata.gz --stdout > #{specs_dir}/#{full_name}.yml"
-        system "gunzip data.tar.gz"
-        system "tar -xvf data.tar"
-      end
-    end
-
-    def curl url
-      "curl -L #{url}"
-    end
-  end
-end
-
-command = ARGV.shift
-case command
-when 'install'
-  name = ARGV.shift
-  if ARGV.include? '-v'
-    version = ARGV[ ARGV.index('-v')+1 ]
-  else
-    version = nil
-  end
-  install = Gem::Install.new(name, version)
-  install.perform
-else
-  raise NotImplementedError, "sorry, the #{command.inspect} is not implemented."
-end

data/stdlib/source_map.rb

@@ -1,5 +0,0 @@
-require 'source_map/map'
-require 'source_map/mapping'
-require 'source_map/offset'
-require 'source_map/version'
-require 'source_map/vlq'

data/stdlib/source_map/map.rb

@@ -1,220 +0,0 @@
-require 'json'
-
-require 'source_map/offset'
-require 'source_map/mapping'
-require 'source_map/vlq'
-
-module SourceMap
-  class Map
-    include Enumerable
-
-    def self.from_json(json)
-      from_hash JSON.parse(json)
-    end
-
-    def self.from_hash(hash)
-      str     = hash['mappings']
-      sources = hash['sources']
-      names   = hash['names']
-
-      mappings = decode_vlq_mappings(str, sources, names)
-      new(mappings, hash['file'])
-    end
-
-    # Internal: Decode VLQ mappings and match up sources and symbol names.
-    #
-    # str     - VLQ string from 'mappings' attribute
-    # sources - Array of Strings from 'sources' attribute
-    # names   - Array of Strings from 'names' attribute
-    #
-    # Returns an Array of Mappings.
-    def self.decode_vlq_mappings(str, sources = [], names = [])
-      mappings = []
-
-      source_id       = 0
-      original_line   = 1
-      original_column = 0
-      name_id         = 0
-
-      VLQ.decode_mappings(str).each_with_index do |group, index|
-        generated_column = 0
-        generated_line   = index + 1
-
-        group.each do |segment|
-          generated_column += segment[0]
-          generated = Offset.new(generated_line, generated_column)
-
-          if segment.size >= 4
-            source_id        += segment[1]
-            original_line    += segment[2]
-            original_column  += segment[3]
-
-            source   = sources[source_id]
-            original = Offset.new(original_line, original_column)
-          else
-            # TODO: Research this case
-            next
-          end
-
-          if segment[4]
-            name_id += segment[4]
-            name     = names[name_id]
-          end
-
-          mappings << Mapping.new(source, generated, original, name)
-        end
-      end
-
-      mappings
-    end
-
-    def initialize(mappings = [], filename = nil)
-      @mappings, @filename = mappings, filename
-    end
-
-    attr_reader :filename
-
-    def size
-      @mappings.size
-    end
-
-    def [](i)
-      @mappings[i]
-    end
-
-    def each(&block)
-      @mappings.each(&block)
-    end
-
-    def to_s
-      @string ||= build_vlq_string
-    end
-
-    def sources
-      @sources ||= @mappings.map(&:source).uniq.compact
-    end
-
-    def names
-      @names ||= @mappings.map(&:name).uniq.compact
-    end
-
-    def ==(other)
-      eql?(other)
-    end
-
-    def eql?(other)
-      other.is_a?(self.class) &&
-        self.mappings == other.mappings &&
-        self.filename == other.filename
-    end
-
-    def +(other)
-      mappings = @mappings.dup
-      offset   = @mappings.any? ? @mappings.last.generated.line+1 : 0
-      other.each do |m|
-        mappings << Mapping.new(
-          m.source, m.generated + offset,
-          m.original, m.name
-        )
-      end
-      self.class.new(mappings, other.filename)
-    end
-
-    def |(other)
-      return other.dup if self.mappings.empty?
-
-      mappings = []
-
-      other.each do |m|
-        om = bsearch(m.original)
-        next unless om
-
-        mappings << Mapping.new(
-          om.source, m.generated,
-          om.original, om.name
-        )
-      end
-
-      self.class.new(mappings, other.filename)
-    end
-
-    def bsearch(offset, from = 0, to = size - 1)
-      mid = (from + to) / 2
-
-      # We haven't found a match
-      if from > to
-        return from < 1 ? nil : self[from-1]
-      end
-
-      # We found an exact match
-      if offset == self[mid].generated
-        self[mid]
-
-      # We need to filter more
-      elsif offset < self[mid].generated
-        bsearch(offset, from, mid - 1)
-      elsif offset > self[mid].generated
-        bsearch(offset, mid + 1, to)
-      end
-    end
-
-    def as_json
-      {
-        "version"   => 3,
-        "file"      => filename,
-        "mappings"  => to_s,
-        "sources"   => sources,
-        "names"     => names
-      }
-    end
-
-    # Public: Get a pretty inspect output for debugging purposes.
-    #
-    # Returns a String.
-    def inspect
-      str = "#<#{self.class}"
-      str << " filename=#{filename.inspect}" if filename
-      str << " mappings=#{mappings.map(&:to_s).inspect}" if mappings.any?
-      str << ">"
-      str
-    end
-
-    protected
-      attr_reader :mappings
-
-      def build_vlq_string
-        source_id        = 0
-        source_line      = 1
-        source_column    = 0
-        name_id          = 0
-
-        by_lines = @mappings.group_by { |m| m.generated.line }
-
-        sources_index = Hash[sources.each_with_index.to_a]
-        names_index   = Hash[names.each_with_index.to_a]
-
-        ary = (1..(by_lines.keys.max || 1)).map do |line|
-          generated_column = 0
-
-          (by_lines[line] || []).map do |mapping|
-            group = []
-            group << mapping.generated.column - generated_column
-            group << sources_index[mapping.source] - source_id
-            group << mapping.original.line - source_line
-            group << mapping.original.column - source_column
-            group << names_index[mapping.name] - name_id if mapping.name
-
-            generated_column = mapping.generated.column
-            source_id        = sources_index[mapping.source]
-            source_line      = mapping.original.line
-            source_column    = mapping.original.column
-            name_id          = names_index[mapping.name] if mapping.name
-
-            group
-          end
-        end
-
-        VLQ.encode_mappings(ary)
-      end
-  end
-end