RubyGems - wallaby - Versions diffs - 7.0.0.beta2 → 7.0.0 - Mend

wallaby 7.0.0.beta2 → 7.0.0

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.

Files changed (423) hide show

data/vendor/assets/javascripts/codemirror/5.49.2/mode/dylan/index.html DELETED Viewed

@@ -1,407 +0,0 @@
-<!doctype html>
-<title>CodeMirror: Dylan mode</title>
-<meta charset="utf-8"/>
-<link rel=stylesheet href="../../doc/docs.css">
-<link rel="stylesheet" href="../../lib/codemirror.css">
-<script src="../../lib/codemirror.js"></script>
-<script src="../../addon/edit/matchbrackets.js"></script>
-<script src="../../addon/comment/continuecomment.js"></script>
-<script src="../../addon/comment/comment.js"></script>
-<script src="dylan.js"></script>
-<style>.CodeMirror {border-top: 1px solid black; border-bottom: 1px solid black;}</style>
-<div id=nav>
-  <a href="https://codemirror.net"><h1>CodeMirror</h1><img id=logo src="../../doc/logo.png" alt=""></a>
-  <ul>
-    <li><a href="../../index.html">Home</a>
-    <li><a href="../../doc/manual.html">Manual</a>
-    <li><a href="https://github.com/codemirror/codemirror">Code</a>
-  </ul>
-  <ul>
-    <li><a href="../index.html">Language modes</a>
-    <li><a class=active href="#">Dylan</a>
-  </ul>
-</div>
-<article>
-<h2>Dylan mode</h2>
-<div><textarea id="code" name="code">
-Module:       locators-internals
-Synopsis:     Abstract modeling of locations
-Author:       Andy Armstrong
-Copyright:    Original Code is Copyright (c) 1995-2004 Functional Objects, Inc.
-              All rights reserved.
-License:      See License.txt in this distribution for details.
-Warranty:     Distributed WITHOUT WARRANTY OF ANY KIND
-define open generic locator-server
-    (locator :: <locator>) => (server :: false-or(<server-locator>));
-define open generic locator-host
-    (locator :: <locator>) => (host :: false-or(<string>));
-define open generic locator-volume
-    (locator :: <locator>) => (volume :: false-or(<string>));
-define open generic locator-directory
-    (locator :: <locator>) => (directory :: false-or(<directory-locator>));
-define open generic locator-relative?
-    (locator :: <locator>) => (relative? :: <boolean>);
-define open generic locator-path
-    (locator :: <locator>) => (path :: <sequence>);
-define open generic locator-base
-    (locator :: <locator>) => (base :: false-or(<string>));
-define open generic locator-extension
-    (locator :: <locator>) => (extension :: false-or(<string>));
-/// Locator classes
-define open abstract class <directory-locator> (<physical-locator>)
-end class <directory-locator>;
-define open abstract class <file-locator> (<physical-locator>)
-end class <file-locator>;
-define method as
-    (class == <directory-locator>, string :: <string>)
- => (locator :: <directory-locator>)
-  as(<native-directory-locator>, string)
-end method as;
-define method make
-    (class == <directory-locator>,
-     #key server :: false-or(<server-locator>) = #f,
-          path :: <sequence> = #[],
-          relative? :: <boolean> = #f,
-          name :: false-or(<string>) = #f)
- => (locator :: <directory-locator>)
-  make(<native-directory-locator>,
-       server:    server,
-       path:      path,
-       relative?: relative?,
-       name:      name)
-end method make;
-define method as
-    (class == <file-locator>, string :: <string>)
- => (locator :: <file-locator>)
-  as(<native-file-locator>, string)
-end method as;
-define method make
-    (class == <file-locator>,
-     #key directory :: false-or(<directory-locator>) = #f,
-          base :: false-or(<string>) = #f,
-          extension :: false-or(<string>) = #f,
-          name :: false-or(<string>) = #f)
- => (locator :: <file-locator>)
-  make(<native-file-locator>,
-       directory: directory,
-       base:      base,
-       extension: extension,
-       name:      name)
-end method make;
-/// Locator coercion
-//---*** andrewa: This caching scheme doesn't work yet, so disable it.
-define constant $cache-locators?        = #f;
-define constant $cache-locator-strings? = #f;
-define constant $locator-to-string-cache = make(<object-table>, weak: #"key");
-define constant $string-to-locator-cache = make(<string-table>, weak: #"value");
-define open generic locator-as-string
-    (class :: subclass(<string>), locator :: <locator>)
- => (string :: <string>);
-define open generic string-as-locator
-    (class :: subclass(<locator>), string :: <string>)
- => (locator :: <locator>);
-define sealed sideways method as
-    (class :: subclass(<string>), locator :: <locator>)
- => (string :: <string>)
-  let string = element($locator-to-string-cache, locator, default: #f);
-  if (string)
-    as(class, string)
-  else
-    let string = locator-as-string(class, locator);
-    if ($cache-locator-strings?)
-      element($locator-to-string-cache, locator) := string;
-    else
-      string
-    end
-  end
-end method as;
-define sealed sideways method as
-    (class :: subclass(<locator>), string :: <string>)
- => (locator :: <locator>)
-  let locator = element($string-to-locator-cache, string, default: #f);
-  if (instance?(locator, class))
-    locator
-  else
-    let locator = string-as-locator(class, string);
-    if ($cache-locators?)
-      element($string-to-locator-cache, string) := locator;
-    else
-      locator
-    end
-  end
-end method as;
-/// Locator conditions
-define class <locator-error> (<format-string-condition>, <error>)
-end class <locator-error>;
-define function locator-error
-    (format-string :: <string>, #rest format-arguments)
-  error(make(<locator-error>,
-             format-string:    format-string,
-             format-arguments: format-arguments))
-end function locator-error;
-/// Useful locator protocols
-define open generic locator-test
-    (locator :: <directory-locator>) => (test :: <function>);
-define method locator-test
-    (locator :: <directory-locator>) => (test :: <function>)
-  \=
-end method locator-test;
-define open generic locator-might-have-links?
-    (locator :: <directory-locator>) => (links? :: <boolean>);
-define method locator-might-have-links?
-    (locator :: <directory-locator>) => (links? :: singleton(#f))
-  #f
-end method locator-might-have-links?;
-define method locator-relative?
-    (locator :: <file-locator>) => (relative? :: <boolean>)
-  let directory = locator.locator-directory;
-  ~directory | directory.locator-relative?
-end method locator-relative?;
-define method current-directory-locator?
-    (locator :: <directory-locator>) => (current-directory? :: <boolean>)
-  locator.locator-relative?
-    & locator.locator-path = #[#"self"]
-end method current-directory-locator?;
-define method locator-directory
-    (locator :: <directory-locator>) => (parent :: false-or(<directory-locator>))
-  let path = locator.locator-path;
-  unless (empty?(path))
-    make(object-class(locator),
-         server:    locator.locator-server,
-         path:      copy-sequence(path, end: path.size - 1),
-         relative?: locator.locator-relative?)
-  end
-end method locator-directory;
-/// Simplify locator
-define open generic simplify-locator
-    (locator :: <physical-locator>)
- => (simplified-locator :: <physical-locator>);
-define method simplify-locator
-    (locator :: <directory-locator>)
- => (simplified-locator :: <directory-locator>)
-  let path = locator.locator-path;
-  let relative? = locator.locator-relative?;
-  let resolve-parent? = ~locator.locator-might-have-links?;
-  let simplified-path
-    = simplify-path(path,
-                    resolve-parent?: resolve-parent?,
-                    relative?: relative?);
-  if (path ~= simplified-path)
-    make(object-class(locator),
-         server:    locator.locator-server,
-         path:      simplified-path,
-         relative?: locator.locator-relative?)
-  else
-    locator
-  end
-end method simplify-locator;
-define method simplify-locator
-    (locator :: <file-locator>) => (simplified-locator :: <file-locator>)
-  let directory = locator.locator-directory;
-  let simplified-directory = directory & simplify-locator(directory);
-  if (directory ~= simplified-directory)
-    make(object-class(locator),
-         directory: simplified-directory,
-         base:      locator.locator-base,
-         extension: locator.locator-extension)
-  else
-    locator
-  end
-end method simplify-locator;
-/// Subdirectory locator
-define open generic subdirectory-locator
-    (locator :: <directory-locator>, #rest sub-path)
- => (subdirectory :: <directory-locator>);
-define method subdirectory-locator
-    (locator :: <directory-locator>, #rest sub-path)
- => (subdirectory :: <directory-locator>)
-  let old-path = locator.locator-path;
-  let new-path = concatenate-as(<simple-object-vector>, old-path, sub-path);
-  make(object-class(locator),
-       server:    locator.locator-server,
-       path:      new-path,
-       relative?: locator.locator-relative?)
-end method subdirectory-locator;
-/// Relative locator
-define open generic relative-locator
-    (locator :: <physical-locator>, from-locator :: <physical-locator>)
- => (relative-locator :: <physical-locator>);
-define method relative-locator
-    (locator :: <directory-locator>, from-locator :: <directory-locator>)
- => (relative-locator :: <directory-locator>)
-  let path = locator.locator-path;
-  let from-path = from-locator.locator-path;
-  case
-    ~locator.locator-relative? & from-locator.locator-relative? =>
-      locator-error
-        ("Cannot find relative path of absolute locator %= from relative locator %=",
-         locator, from-locator);
-    locator.locator-server ~= from-locator.locator-server =>
-      locator;
-    path = from-path =>
-      make(object-class(locator),
-           path: vector(#"self"),
-           relative?: #t);
-    otherwise =>
-      make(object-class(locator),
-           path: relative-path(path, from-path, test: locator.locator-test),
-           relative?: #t);
-  end
-end method relative-locator;
-define method relative-locator
-    (locator :: <file-locator>, from-directory :: <directory-locator>)
- => (relative-locator :: <file-locator>)
-  let directory = locator.locator-directory;
-  let relative-directory = directory & relative-locator(directory, from-directory);
-  if (relative-directory ~= directory)
-    simplify-locator
-      (make(object-class(locator),
-            directory: relative-directory,
-            base:      locator.locator-base,
-            extension: locator.locator-extension))
-  else
-    locator
-  end
-end method relative-locator;
-define method relative-locator
-    (locator :: <physical-locator>, from-locator :: <file-locator>)
- => (relative-locator :: <physical-locator>)
-  let from-directory = from-locator.locator-directory;
-  case
-    from-directory =>
-      relative-locator(locator, from-directory);
-    ~locator.locator-relative? =>
-      locator-error
-        ("Cannot find relative path of absolute locator %= from relative locator %=",
-         locator, from-locator);
-    otherwise =>
-      locator;
-  end
-end method relative-locator;
-/// Merge locators
-define open generic merge-locators
-    (locator :: <physical-locator>, from-locator :: <physical-locator>)
- => (merged-locator :: <physical-locator>);
-/// Merge locators
-define method merge-locators
-    (locator :: <directory-locator>, from-locator :: <directory-locator>)
- => (merged-locator :: <directory-locator>)
-  if (locator.locator-relative?)
-    let path = concatenate(from-locator.locator-path, locator.locator-path);
-    simplify-locator
-      (make(object-class(locator),
-            server:    from-locator.locator-server,
-            path:      path,
-            relative?: from-locator.locator-relative?))
-  else
-    locator
-  end
-end method merge-locators;
-define method merge-locators
-    (locator :: <file-locator>, from-locator :: <directory-locator>)
- => (merged-locator :: <file-locator>)
-  let directory = locator.locator-directory;
-  let merged-directory
-    = if (directory)
-        merge-locators(directory, from-locator)
-      else
-        simplify-locator(from-locator)
-      end;
-  if (merged-directory ~= directory)
-    make(object-class(locator),
-         directory: merged-directory,
-         base:      locator.locator-base,
-         extension: locator.locator-extension)
-  else
-    locator
-  end
-end method merge-locators;
-define method merge-locators
-    (locator :: <physical-locator>, from-locator :: <file-locator>)
- => (merged-locator :: <physical-locator>)
-  let from-directory = from-locator.locator-directory;
-  if (from-directory)
-    merge-locators(locator, from-directory)
-  else
-    locator
-  end
-end method merge-locators;
-/// Locator protocols
-define sideways method supports-open-locator?
-    (locator :: <file-locator>) => (openable? :: <boolean>)
-  ~locator.locator-relative?
-end method supports-open-locator?;
-define sideways method open-locator
-    (locator :: <file-locator>, #rest keywords, #key, #all-keys)
- => (stream :: <stream>)
-  apply(open-file-stream, locator, keywords)
-end method open-locator;
-</textarea></div>
-    <script>
-      var editor = CodeMirror.fromTextArea(document.getElementById("code"), {
-        mode: "text/x-dylan",
-        lineNumbers: true,
-        matchBrackets: true,
-        continueComments: "Enter",
-        extraKeys: {"Ctrl-Q": "toggleComment"},
-        tabMode: "indent",
-        indentUnit: 2
-      });
-    </script>
-    <p><strong>MIME types defined:</strong> <code>text/x-dylan</code>.</p>
-</article>

data/vendor/assets/javascripts/codemirror/5.49.2/mode/dylan/test.js DELETED Viewed

@@ -1,88 +0,0 @@
-// CodeMirror, copyright (c) by Marijn Haverbeke and others
-// Distributed under an MIT license: https://codemirror.net/LICENSE
-(function() {
-  var mode = CodeMirror.getMode({indentUnit: 2}, "dylan");
-  function MT(name) { test.mode(name, mode, Array.prototype.slice.call(arguments, 1)); }
-  MT('comments',
-     '[comment // This is a line comment]',
-     '[comment /* This is a block comment */]',
-     '[comment /* This is a multi]',
-     '[comment line comment]',
-     '[comment */]',
-     '[comment /* And this is a /*]',
-     '[comment /* nested */ comment */]');
-  MT('unary_operators',
-     '[operator -][variable a]',
-     '[operator -] [variable a]',
-     '[operator ~][variable a]',
-     '[operator ~] [variable a]');
-  MT('binary_operators',
-     '[variable a] [operator +] [variable b]',
-     '[variable a] [operator -] [variable b]',
-     '[variable a] [operator *] [variable b]',
-     '[variable a] [operator /] [variable b]',
-     '[variable a] [operator ^] [variable b]',
-     '[variable a] [operator =] [variable b]',
-     '[variable a] [operator ==] [variable b]',
-     '[variable a] [operator ~=] [variable b]',
-     '[variable a] [operator ~==] [variable b]',
-     '[variable a] [operator <] [variable b]',
-     '[variable a] [operator <=] [variable b]',
-     '[variable a] [operator >] [variable b]',
-     '[variable a] [operator >=] [variable b]',
-     '[variable a] [operator &] [variable b]',
-     '[variable a] [operator |] [variable b]',
-     '[variable a] [operator :=] [variable b]');
-  MT('integers',
-     '[number 1]',
-     '[number 123]',
-     '[number -123]',
-     '[number +456]',
-     '[number #b010]',
-     '[number #o073]',
-     '[number #xabcDEF123]');
-  MT('floats',
-     '[number .3]',
-     '[number -1.]',
-     '[number -2.335]',
-     '[number +3.78d1]',
-     '[number 3.78s-1]',
-     '[number -3.32e+5]');
-  MT('characters_and_strings',
-     "[string 'a']",
-     "[string '\\\\'']",
-     '[string ""]',
-     '[string "a"]',
-     '[string "abc def"]',
-     '[string "More escaped characters: \\\\\\\\ \\\\a \\\\b \\\\e \\\\f \\\\n \\\\r \\\\t \\\\0 ..."]');
-  MT('brackets',
-     '[bracket #[[]]]',
-     '[bracket #()]',
-     '[bracket #(][number 1][bracket )]',
-     '[bracket [[][number 1][punctuation ,] [number 3][bracket ]]]',
-     '[bracket ()]',
-     '[bracket {}]',
-     '[keyword if] [bracket (][variable foo][bracket )]',
-     '[bracket (][number 1][bracket )]',
-     '[bracket [[][number 1][bracket ]]]');
-  MT('hash_words',
-     '[punctuation ##]',
-     '[atom #f]', '[atom #F]',
-     '[atom #t]', '[atom #T]',
-     '[atom #all-keys]',
-     '[atom #include]',
-     '[atom #key]',
-     '[atom #next]',
-     '[atom #rest]',
-     '[string #"foo"]',
-     '[error #invalid]');
-})();

data/vendor/assets/javascripts/codemirror/5.49.2/mode/ebnf/ebnf.js DELETED Viewed

@@ -1,195 +0,0 @@
-// CodeMirror, copyright (c) by Marijn Haverbeke and others
-// Distributed under an MIT license: https://codemirror.net/LICENSE
-(function(mod) {
-  if (typeof exports == "object" && typeof module == "object") // CommonJS
-    mod(require("../../lib/codemirror"));
-  else if (typeof define == "function" && define.amd) // AMD
-    define(["../../lib/codemirror"], mod);
-  else // Plain browser env
-    mod(CodeMirror);
-})(function(CodeMirror) {
-  "use strict";
-  CodeMirror.defineMode("ebnf", function (config) {
-    var commentType = {slash: 0, parenthesis: 1};
-    var stateType = {comment: 0, _string: 1, characterClass: 2};
-    var bracesMode = null;
-    if (config.bracesMode)
-      bracesMode = CodeMirror.getMode(config, config.bracesMode);
-    return {
-      startState: function () {
-        return {
-          stringType: null,
-          commentType: null,
-          braced: 0,
-          lhs: true,
-          localState: null,
-          stack: [],
-          inDefinition: false
-        };
-      },
-      token: function (stream, state) {
-        if (!stream) return;
-        //check for state changes
-        if (state.stack.length === 0) {
-          //strings
-          if ((stream.peek() == '"') || (stream.peek() == "'")) {
-            state.stringType = stream.peek();
-            stream.next(); // Skip quote
-            state.stack.unshift(stateType._string);
-          } else if (stream.match(/^\/\*/)) { //comments starting with /*
-            state.stack.unshift(stateType.comment);
-            state.commentType = commentType.slash;
-          } else if (stream.match(/^\(\*/)) { //comments starting with (*
-            state.stack.unshift(stateType.comment);
-            state.commentType = commentType.parenthesis;
-          }
-        }
-        //return state
-        //stack has
-        switch (state.stack[0]) {
-        case stateType._string:
-          while (state.stack[0] === stateType._string && !stream.eol()) {
-            if (stream.peek() === state.stringType) {
-              stream.next(); // Skip quote
-              state.stack.shift(); // Clear flag
-            } else if (stream.peek() === "\\") {
-              stream.next();
-              stream.next();
-            } else {
-              stream.match(/^.[^\\\"\']*/);
-            }
-          }
-          return state.lhs ? "property string" : "string"; // Token style
-        case stateType.comment:
-          while (state.stack[0] === stateType.comment && !stream.eol()) {
-            if (state.commentType === commentType.slash && stream.match(/\*\//)) {
-              state.stack.shift(); // Clear flag
-              state.commentType = null;
-            } else if (state.commentType === commentType.parenthesis && stream.match(/\*\)/)) {
-              state.stack.shift(); // Clear flag
-              state.commentType = null;
-            } else {
-              stream.match(/^.[^\*]*/);
-            }
-          }
-          return "comment";
-        case stateType.characterClass:
-          while (state.stack[0] === stateType.characterClass && !stream.eol()) {
-            if (!(stream.match(/^[^\]\\]+/) || stream.match(/^\\./))) {
-              state.stack.shift();
-            }
-          }
-          return "operator";
-        }
-        var peek = stream.peek();
-        if (bracesMode !== null && (state.braced || peek === "{")) {
-          if (state.localState === null)
-            state.localState = CodeMirror.startState(bracesMode);
-          var token = bracesMode.token(stream, state.localState),
-          text = stream.current();
-          if (!token) {
-            for (var i = 0; i < text.length; i++) {
-              if (text[i] === "{") {
-                if (state.braced === 0) {
-                  token = "matchingbracket";
-                }
-                state.braced++;
-              } else if (text[i] === "}") {
-                state.braced--;
-                if (state.braced === 0) {
-                  token = "matchingbracket";
-                }
-              }
-            }
-          }
-          return token;
-        }
-        //no stack
-        switch (peek) {
-        case "[":
-          stream.next();
-          state.stack.unshift(stateType.characterClass);
-          return "bracket";
-        case ":":
-        case "|":
-        case ";":
-          stream.next();
-          return "operator";
-        case "%":
-          if (stream.match("%%")) {
-            return "header";
-          } else if (stream.match(/[%][A-Za-z]+/)) {
-            return "keyword";
-          } else if (stream.match(/[%][}]/)) {
-            return "matchingbracket";
-          }
-          break;
-        case "/":
-          if (stream.match(/[\/][A-Za-z]+/)) {
-          return "keyword";
-        }
-        case "\\":
-          if (stream.match(/[\][a-z]+/)) {
-            return "string-2";
-          }
-        case ".":
-          if (stream.match(".")) {
-            return "atom";
-          }
-        case "*":
-        case "-":
-        case "+":
-        case "^":
-          if (stream.match(peek)) {
-            return "atom";
-          }
-        case "$":
-          if (stream.match("$$")) {
-            return "builtin";
-          } else if (stream.match(/[$][0-9]+/)) {
-            return "variable-3";
-          }
-        case "<":
-          if (stream.match(/<<[a-zA-Z_]+>>/)) {
-            return "builtin";
-          }
-        }
-        if (stream.match(/^\/\//)) {
-          stream.skipToEnd();
-          return "comment";
-        } else if (stream.match(/return/)) {
-          return "operator";
-        } else if (stream.match(/^[a-zA-Z_][a-zA-Z0-9_]*/)) {
-          if (stream.match(/(?=[\(.])/)) {
-            return "variable";
-          } else if (stream.match(/(?=[\s\n]*[:=])/)) {
-            return "def";
-          }
-          return "variable-2";
-        } else if (["[", "]", "(", ")"].indexOf(stream.peek()) != -1) {
-          stream.next();
-          return "bracket";
-        } else if (!stream.eatSpace()) {
-          stream.next();
-        }
-        return null;
-      }
-    };
-  });
-  CodeMirror.defineMIME("text/x-ebnf", "ebnf");
-});