Changeset - a60a0e9092c6
[Not reviewed]
default
! ! !
Marcin Kuzminski - 12 years ago 2013-06-20 23:53:18
marcin@python-works.com
added codemirror edit mode with autodetection
34 files changed:
Changeset was too big and was cut off... Show full diff anyway
0 comments (0 inline, 0 general)
rhodecode/public/js/codemirror_loadmode.js
Show inline comments
 
new file 100644
 
(function() {
 
  if (!CodeMirror.modeURL) CodeMirror.modeURL = "../mode/%N/%N.js";
 

	
 
  var loading = {};
 
  function splitCallback(cont, n) {
 
    var countDown = n;
 
    return function() { if (--countDown == 0) cont(); };
 
  }
 
  function ensureDeps(mode, cont) {
 
    var deps = CodeMirror.modes[mode].dependencies;
 
    if (!deps) return cont();
 
    var missing = [];
 
    for (var i = 0; i < deps.length; ++i) {
 
      if (!CodeMirror.modes.hasOwnProperty(deps[i]))
 
        missing.push(deps[i]);
 
    }
 
    if (!missing.length) return cont();
 
    var split = splitCallback(cont, missing.length);
 
    for (var i = 0; i < missing.length; ++i)
 
      CodeMirror.requireMode(missing[i], split);
 
  }
 

	
 
  CodeMirror.requireMode = function(mode, cont) {
 
    if (typeof mode != "string") mode = mode.name;
 
    if (CodeMirror.modes.hasOwnProperty(mode)) return ensureDeps(mode, cont);
 
    if (loading.hasOwnProperty(mode)) return loading[mode].push(cont);
 

	
 
    var script = document.createElement("script");
 
    script.src = CodeMirror.modeURL.replace(/%N/g, mode);
 
    var others = document.getElementsByTagName("script")[0];
 
    others.parentNode.insertBefore(script, others);
 
    var list = loading[mode] = [cont];
 
    var count = 0, poll = setInterval(function() {
 
      if (++count > 100) return clearInterval(poll);
 
      if (CodeMirror.modes.hasOwnProperty(mode)) {
 
        clearInterval(poll);
 
        loading[mode] = null;
 
        ensureDeps(mode, function() {
 
          for (var i = 0; i < list.length; ++i) list[i]();
 
        });
 
      }
 
    }, 200);
 
  };
 

	
 
  CodeMirror.autoLoadMode = function(instance, mode) {
 
    if (!CodeMirror.modes.hasOwnProperty(mode))
 
      CodeMirror.requireMode(mode, function() {
 
        instance.setOption("mode", instance.getOption("mode"));
 
      });
 
  };
 
}());
 

	
 

	
 
//overlay plugin
 

	
 
// Utility function that allows modes to be combined. The mode given
 
// as the base argument takes care of most of the normal mode
 
// functionality, but a second (typically simple) mode is used, which
 
// can override the style of text. Both modes get to parse all of the
 
// text, but when both assign a non-null style to a piece of code, the
 
// overlay wins, unless the combine argument was true, in which case
 
// the styles are combined.
 

	
 
// overlayParser is the old, deprecated name
 
CodeMirror.overlayMode = CodeMirror.overlayParser = function(base, overlay, combine) {
 
  return {
 
    startState: function() {
 
      return {
 
        base: CodeMirror.startState(base),
 
        overlay: CodeMirror.startState(overlay),
 
        basePos: 0, baseCur: null,
 
        overlayPos: 0, overlayCur: null
 
      };
 
    },
 
    copyState: function(state) {
 
      return {
 
        base: CodeMirror.copyState(base, state.base),
 
        overlay: CodeMirror.copyState(overlay, state.overlay),
 
        basePos: state.basePos, baseCur: null,
 
        overlayPos: state.overlayPos, overlayCur: null
 
      };
 
    },
 

	
 
    token: function(stream, state) {
 
      if (stream.start == state.basePos) {
 
        state.baseCur = base.token(stream, state.base);
 
        state.basePos = stream.pos;
 
      }
 
      if (stream.start == state.overlayPos) {
 
        stream.pos = stream.start;
 
        state.overlayCur = overlay.token(stream, state.overlay);
 
        state.overlayPos = stream.pos;
 
      }
 
      stream.pos = Math.min(state.basePos, state.overlayPos);
 
      if (stream.eol()) state.basePos = state.overlayPos = 0;
 

	
 
      if (state.overlayCur == null) return state.baseCur;
 
      if (state.baseCur != null && combine) return state.baseCur + " " + state.overlayCur;
 
      else return state.overlayCur;
 
    },
 

	
 
    indent: base.indent && function(state, textAfter) {
 
      return base.indent(state.base, textAfter);
 
    },
 
    electricChars: base.electricChars,
 

	
 
    innerMode: function(state) { return {state: state.base, mode: base}; },
 

	
 
    blankLine: function(state) {
 
      if (base.blankLine) base.blankLine(state.base);
 
      if (overlay.blankLine) overlay.blankLine(state.overlay);
 
    }
 
  };
 
};
rhodecode/public/js/mode/apl/apl.js
Show inline comments
 
new file 100644
 
CodeMirror.defineMode("apl", function() {
 
  var builtInOps = {
 
    ".": "innerProduct",
 
    "\\": "scan",
 
    "/": "reduce",
 
    "⌿": "reduce1Axis",
 
    "⍀": "scan1Axis",
 
    "¨": "each",
 
    "⍣": "power"
 
  };
 
  var builtInFuncs = {
 
    "+": ["conjugate", "add"],
 
    "−": ["negate", "subtract"],
 
    "×": ["signOf", "multiply"],
 
    "÷": ["reciprocal", "divide"],
 
    "⌈": ["ceiling", "greaterOf"],
 
    "⌊": ["floor", "lesserOf"],
 
    "∣": ["absolute", "residue"],
 
    "⍳": ["indexGenerate", "indexOf"],
 
    "?": ["roll", "deal"],
 
    "⋆": ["exponentiate", "toThePowerOf"],
 
    "⍟": ["naturalLog", "logToTheBase"],
 
    "○": ["piTimes", "circularFuncs"],
 
    "!": ["factorial", "binomial"],
 
    "⌹": ["matrixInverse", "matrixDivide"],
 
    "<": [null, "lessThan"],
 
    "≤": [null, "lessThanOrEqual"],
 
    "=": [null, "equals"],
 
    ">": [null, "greaterThan"],
 
    "≥": [null, "greaterThanOrEqual"],
 
    "≠": [null, "notEqual"],
 
    "≡": ["depth", "match"],
 
    "≢": [null, "notMatch"],
 
    "∈": ["enlist", "membership"],
 
    "⍷": [null, "find"],
 
    "∪": ["unique", "union"],
 
    "∩": [null, "intersection"],
 
    "∼": ["not", "without"],
 
    "∨": [null, "or"],
 
    "∧": [null, "and"],
 
    "⍱": [null, "nor"],
 
    "⍲": [null, "nand"],
 
    "⍴": ["shapeOf", "reshape"],
 
    ",": ["ravel", "catenate"],
 
    "⍪": [null, "firstAxisCatenate"],
 
    "⌽": ["reverse", "rotate"],
 
    "⊖": ["axis1Reverse", "axis1Rotate"],
 
    "⍉": ["transpose", null],
 
    "↑": ["first", "take"],
 
    "↓": [null, "drop"],
 
    "⊂": ["enclose", "partitionWithAxis"],
 
    "⊃": ["diclose", "pick"],
 
    "⌷": [null, "index"],
 
    "⍋": ["gradeUp", null],
 
    "⍒": ["gradeDown", null],
 
    "⊤": ["encode", null],
 
    "⊥": ["decode", null],
 
    "⍕": ["format", "formatByExample"],
 
    "⍎": ["execute", null],
 
    "⊣": ["stop", "left"],
 
    "⊢": ["pass", "right"]
 
  };
 

	
 
  var isOperator = /[\.\/⌿⍀¨⍣]/;
 
  var isNiladic = /⍬/;
 
  var isFunction = /[\+−×÷⌈⌊∣⍳\?⋆⍟○!⌹<≤=>≥≠≡≢∈⍷∪∩∼∨∧⍱⍲⍴,⍪⌽⊖⍉↑↓⊂⊃⌷⍋⍒⊤⊥⍕⍎⊣⊢]/;
 
  var isArrow = /←/;
 
  var isComment = /[⍝#].*$/;
 

	
 
  var stringEater = function(type) {
 
    var prev;
 
    prev = false;
 
    return function(c) {
 
      prev = c;
 
      if (c === type) {
 
        return prev === "\\";
 
      }
 
      return true;
 
    };
 
  };
 
  return {
 
    startState: function() {
 
      return {
 
        prev: false,
 
        func: false,
 
        op: false,
 
        string: false,
 
        escape: false
 
      };
 
    },
 
    token: function(stream, state) {
 
      var ch, funcName, word;
 
      if (stream.eatSpace()) {
 
        return null;
 
      }
 
      ch = stream.next();
 
      if (ch === '"' || ch === "'") {
 
        stream.eatWhile(stringEater(ch));
 
        stream.next();
 
        state.prev = true;
 
        return "string";
 
      }
 
      if (/[\[{\(]/.test(ch)) {
 
        state.prev = false;
 
        return null;
 
      }
 
      if (/[\]}\)]/.test(ch)) {
 
        state.prev = true;
 
        return null;
 
      }
 
      if (isNiladic.test(ch)) {
 
        state.prev = false;
 
        return "niladic";
 
      }
 
      if (/[¯\d]/.test(ch)) {
 
        if (state.func) {
 
          state.func = false;
 
          state.prev = false;
 
        } else {
 
          state.prev = true;
 
        }
 
        stream.eatWhile(/[\w\.]/);
 
        return "number";
 
      }
 
      if (isOperator.test(ch)) {
 
        return "operator apl-" + builtInOps[ch];
 
      }
 
      if (isArrow.test(ch)) {
 
        return "apl-arrow";
 
      }
 
      if (isFunction.test(ch)) {
 
        funcName = "apl-";
 
        if (builtInFuncs[ch] != null) {
 
          if (state.prev) {
 
            funcName += builtInFuncs[ch][1];
 
          } else {
 
            funcName += builtInFuncs[ch][0];
 
          }
 
        }
 
        state.func = true;
 
        state.prev = false;
 
        return "function " + funcName;
 
      }
 
      if (isComment.test(ch)) {
 
        stream.skipToEnd();
 
        return "comment";
 
      }
 
      if (ch === "∘" && stream.peek() === ".") {
 
        stream.next();
 
        return "function jot-dot";
 
      }
 
      stream.eatWhile(/[\w\$_]/);
 
      word = stream.current();
 
      state.prev = true;
 
      return "keyword";
 
    }
 
  };
 
});
 

	
 
CodeMirror.defineMIME("text/apl", "apl");
rhodecode/public/js/mode/apl/index.html
Show inline comments
 
new file 100644
 
<!doctype html>
 
<html>
 
  <head>
 
    <meta charset="utf-8">
 
    <title>CodeMirror: APL mode</title>
 
    <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="apl.js"></script>
 
    <style>
 
	.CodeMirror { border: 2px inset #dee; }
 
    </style>
 
  </head>
 
  <body>
 
    <h1>CodeMirror: APL mode</h1>
 

	
 
<form><textarea id="code" name="code">
 
⍝ Conway's game of life
 

	
 
⍝ This example was inspired by the impressive demo at
 
⍝ http://www.youtube.com/watch?v=a9xAKttWgP4
 

	
 
⍝ Create a matrix:
 
⍝     0 1 1
 
⍝     1 1 0
 
⍝     0 1 0
 
creature ← (3 3 ⍴ ⍳ 9) ∈ 1 2 3 4 7   ⍝ Original creature from demo
 
creature ← (3 3 ⍴ ⍳ 9) ∈ 1 3 6 7 8   ⍝ Glider
 

	
 
⍝ Place the creature on a larger board, near the centre
 
board ← ¯1 ⊖ ¯2 ⌽ 5 7 ↑ creature
 

	
 
⍝ A function to move from one generation to the next
 
life ← {∨/ 1 ⍵ ∧ 3 4 = ⊂+/ +⌿ 1 0 ¯1 ∘.⊖ 1 0 ¯1 ⌽¨ ⊂⍵}
 

	
 
⍝ Compute n-th generation and format it as a
 
⍝ character matrix
 
gen ← {' #'[(life ⍣ ⍵) board]}
 

	
 
⍝ Show first three generations
 
(gen 1) (gen 2) (gen 3)
 
</textarea></form>
 

	
 
    <script>
 
      var editor = CodeMirror.fromTextArea(document.getElementById("code"), {
 
        lineNumbers: true,
 
        matchBrackets: true,
 
        mode: "text/apl"
 
      });
 
    </script>
 

	
 
    <p>Simple mode that tries to handle APL as well as it can.</p>
 
    <p>It attempts to label functions/operators based upon
 
    monadic/dyadic usage (but this is far from fully fleshed out).
 
    This means there are meaningful classnames so hover states can
 
    have popups etc.</p>
 

	
 
    <p><strong>MIME types defined:</strong> <code>text/apl</code> (APL code)</p>
 
  </body>
 
</html>
rhodecode/public/js/mode/asterisk/asterisk.js
Show inline comments
 
new file 100644
 
/*
 
 * =====================================================================================
 
 *
 
 *       Filename:  mode/asterisk/asterisk.js
 
 *
 
 *    Description:  CodeMirror mode for Asterisk dialplan
 
 *
 
 *        Created:  05/17/2012 09:20:25 PM
 
 *       Revision:  none
 
 *
 
 *         Author:  Stas Kobzar (stas@modulis.ca),
 
 *        Company:  Modulis.ca Inc.
 
 *
 
 * =====================================================================================
 
 */
 

	
 
CodeMirror.defineMode("asterisk", function() {
 
  var atoms    = ["exten", "same", "include","ignorepat","switch"],
 
      dpcmd    = ["#include","#exec"],
 
      apps     = [
 
                  "addqueuemember","adsiprog","aelsub","agentlogin","agentmonitoroutgoing","agi",
 
                  "alarmreceiver","amd","answer","authenticate","background","backgrounddetect",
 
                  "bridge","busy","callcompletioncancel","callcompletionrequest","celgenuserevent",
 
                  "changemonitor","chanisavail","channelredirect","chanspy","clearhash","confbridge",
 
                  "congestion","continuewhile","controlplayback","dahdiacceptr2call","dahdibarge",
 
                  "dahdiras","dahdiscan","dahdisendcallreroutingfacility","dahdisendkeypadfacility",
 
                  "datetime","dbdel","dbdeltree","deadagi","dial","dictate","directory","disa",
 
                  "dumpchan","eagi","echo","endwhile","exec","execif","execiftime","exitwhile","extenspy",
 
                  "externalivr","festival","flash","followme","forkcdr","getcpeid","gosub","gosubif",
 
                  "goto","gotoif","gotoiftime","hangup","iax2provision","ices","importvar","incomplete",
 
                  "ivrdemo","jabberjoin","jabberleave","jabbersend","jabbersendgroup","jabberstatus",
 
                  "jack","log","macro","macroexclusive","macroexit","macroif","mailboxexists","meetme",
 
                  "meetmeadmin","meetmechanneladmin","meetmecount","milliwatt","minivmaccmess","minivmdelete",
 
                  "minivmgreet","minivmmwi","minivmnotify","minivmrecord","mixmonitor","monitor","morsecode",
 
                  "mp3player","mset","musiconhold","nbscat","nocdr","noop","odbc","odbc","odbcfinish",
 
                  "originate","ospauth","ospfinish","osplookup","ospnext","page","park","parkandannounce",
 
                  "parkedcall","pausemonitor","pausequeuemember","pickup","pickupchan","playback","playtones",
 
                  "privacymanager","proceeding","progress","queue","queuelog","raiseexception","read","readexten",
 
                  "readfile","receivefax","receivefax","receivefax","record","removequeuemember",
 
                  "resetcdr","retrydial","return","ringing","sayalpha","saycountedadj","saycountednoun",
 
                  "saycountpl","saydigits","saynumber","sayphonetic","sayunixtime","senddtmf","sendfax",
 
                  "sendfax","sendfax","sendimage","sendtext","sendurl","set","setamaflags",
 
                  "setcallerpres","setmusiconhold","sipaddheader","sipdtmfmode","sipremoveheader","skel",
 
                  "slastation","slatrunk","sms","softhangup","speechactivategrammar","speechbackground",
 
                  "speechcreate","speechdeactivategrammar","speechdestroy","speechloadgrammar","speechprocessingsound",
 
                  "speechstart","speechunloadgrammar","stackpop","startmusiconhold","stopmixmonitor","stopmonitor",
 
                  "stopmusiconhold","stopplaytones","system","testclient","testserver","transfer","tryexec",
 
                  "trysystem","unpausemonitor","unpausequeuemember","userevent","verbose","vmauthenticate",
 
                  "vmsayname","voicemail","voicemailmain","wait","waitexten","waitfornoise","waitforring",
 
                  "waitforsilence","waitmusiconhold","waituntil","while","zapateller"
 
                 ];
 

	
 
  function basicToken(stream,state){
 
    var cur = '';
 
    var ch  = '';
 
    ch = stream.next();
 
    // comment
 
    if(ch == ";") {
 
      stream.skipToEnd();
 
      return "comment";
 
    }
 
    // context
 
    if(ch == '[') {
 
      stream.skipTo(']');
 
      stream.eat(']');
 
      return "header";
 
    }
 
    // string
 
    if(ch == '"') {
 
      stream.skipTo('"');
 
      return "string";
 
    }
 
    if(ch == "'") {
 
      stream.skipTo("'");
 
      return "string-2";
 
    }
 
    // dialplan commands
 
    if(ch == '#') {
 
      stream.eatWhile(/\w/);
 
      cur = stream.current();
 
      if(dpcmd.indexOf(cur) !== -1) {
 
        stream.skipToEnd();
 
        return "strong";
 
      }
 
    }
 
    // application args
 
    if(ch == '$'){
 
      var ch1 = stream.peek();
 
      if(ch1 == '{'){
 
        stream.skipTo('}');
 
        stream.eat('}');
 
        return "variable-3";
 
      }
 
    }
 
    // extension
 
    stream.eatWhile(/\w/);
 
    cur = stream.current();
 
    if(atoms.indexOf(cur) !== -1) {
 
      state.extenStart = true;
 
      switch(cur) {
 
        case 'same': state.extenSame = true; break;
 
        case 'include':
 
        case 'switch':
 
        case 'ignorepat':
 
          state.extenInclude = true;break;
 
        default:break;
 
      }
 
      return "atom";
 
    }
 
  }
 

	
 
  return {
 
    startState: function() {
 
      return {
 
        extenStart: false,
 
        extenSame:  false,
 
        extenInclude: false,
 
        extenExten: false,
 
        extenPriority: false,
 
        extenApplication: false
 
      };
 
    },
 
    token: function(stream, state) {
 

	
 
      var cur = '';
 
      var ch  = '';
 
      if(stream.eatSpace()) return null;
 
      // extension started
 
      if(state.extenStart){
 
        stream.eatWhile(/[^\s]/);
 
        cur = stream.current();
 
        if(/^=>?$/.test(cur)){
 
          state.extenExten = true;
 
          state.extenStart = false;
 
          return "strong";
 
        } else {
 
          state.extenStart = false;
 
          stream.skipToEnd();
 
          return "error";
 
        }
 
      } else if(state.extenExten) {
 
        // set exten and priority
 
        state.extenExten = false;
 
        state.extenPriority = true;
 
        stream.eatWhile(/[^,]/);
 
        if(state.extenInclude) {
 
          stream.skipToEnd();
 
          state.extenPriority = false;
 
          state.extenInclude = false;
 
        }
 
        if(state.extenSame) {
 
          state.extenPriority = false;
 
          state.extenSame = false;
 
          state.extenApplication = true;
 
        }
 
        return "tag";
 
      } else if(state.extenPriority) {
 
        state.extenPriority = false;
 
        state.extenApplication = true;
 
        ch = stream.next(); // get comma
 
        if(state.extenSame) return null;
 
        stream.eatWhile(/[^,]/);
 
        return "number";
 
      } else if(state.extenApplication) {
 
        stream.eatWhile(/,/);
 
        cur = stream.current();
 
        if(cur === ',') return null;
 
        stream.eatWhile(/\w/);
 
        cur = stream.current().toLowerCase();
 
        state.extenApplication = false;
 
        if(apps.indexOf(cur) !== -1){
 
          return "def strong";
 
        }
 
      } else{
 
        return basicToken(stream,state);
 
      }
 

	
 
      return null;
 
    }
 
  };
 
});
 

	
 
CodeMirror.defineMIME("text/x-asterisk", "asterisk");
rhodecode/public/js/mode/asterisk/index.html
Show inline comments
 
new file 100644
 
<!doctype html>
 
<html>
 
  <head>
 
    <meta charset="utf-8">
 
    <title>CodeMirror: Asterisk dialplan mode</title>
 
    <link rel="stylesheet" href="../../lib/codemirror.css">
 
    <script src="../../lib/codemirror.js"></script>
 
    <script src="asterisk.js"></script>
 
    <style>
 
      .CodeMirror {border: 1px solid #999;}
 
      .cm-s-default span.cm-arrow { color: red; }
 
    </style>
 
    <link rel="stylesheet" href="../../doc/docs.css">
 
  </head>
 
  <body>
 
    <h1>CodeMirror: Asterisk dialplan mode</h1>
 
    <form><textarea id="code" name="code">
 
; extensions.conf - the Asterisk dial plan
 
;
 

	
 
[general]
 
;
 
; If static is set to no, or omitted, then the pbx_config will rewrite
 
; this file when extensions are modified.  Remember that all comments
 
; made in the file will be lost when that happens.
 
static=yes
 

	
 
#include "/etc/asterisk/additional_general.conf
 

	
 
[iaxprovider]
 
switch => IAX2/user:[key]@myserver/mycontext
 

	
 
[dynamic]
 
#exec /usr/bin/dynamic-peers.pl
 

	
 
[trunkint]
 
;
 
; International long distance through trunk
 
;
 
exten => _9011.,1,Macro(dundi-e164,${EXTEN:4})
 
exten => _9011.,n,Dial(${GLOBAL(TRUNK)}/${FILTER(0-9,${EXTEN:${GLOBAL(TRUNKMSD)}})})
 

	
 
[local]
 
;
 
; Master context for local, toll-free, and iaxtel calls only
 
;
 
ignorepat => 9
 
include => default
 

	
 
[demo]
 
include => stdexten
 
;
 
; We start with what to do when a call first comes in.
 
;
 
exten => s,1,Wait(1)			; Wait a second, just for fun
 
same  => n,Answer			; Answer the line
 
same  => n,Set(TIMEOUT(digit)=5)	; Set Digit Timeout to 5 seconds
 
same  => n,Set(TIMEOUT(response)=10)	; Set Response Timeout to 10 seconds
 
same  => n(restart),BackGround(demo-congrats)	; Play a congratulatory message
 
same  => n(instruct),BackGround(demo-instruct)	; Play some instructions
 
same  => n,WaitExten			; Wait for an extension to be dialed.
 

	
 
exten => 2,1,BackGround(demo-moreinfo)	; Give some more information.
 
exten => 2,n,Goto(s,instruct)
 

	
 
exten => 3,1,Set(LANGUAGE()=fr)		; Set language to french
 
exten => 3,n,Goto(s,restart)		; Start with the congratulations
 

	
 
exten => 1000,1,Goto(default,s,1)
 
;
 
; We also create an example user, 1234, who is on the console and has
 
; voicemail, etc.
 
;
 
exten => 1234,1,Playback(transfer,skip)		; "Please hold while..."
 
					; (but skip if channel is not up)
 
exten => 1234,n,Gosub(${EXTEN},stdexten(${GLOBAL(CONSOLE)}))
 
exten => 1234,n,Goto(default,s,1)		; exited Voicemail
 

	
 
exten => 1235,1,Voicemail(1234,u)		; Right to voicemail
 

	
 
exten => 1236,1,Dial(Console/dsp)		; Ring forever
 
exten => 1236,n,Voicemail(1234,b)		; Unless busy
 

	
 
;
 
; # for when they're done with the demo
 
;
 
exten => #,1,Playback(demo-thanks)	; "Thanks for trying the demo"
 
exten => #,n,Hangup			; Hang them up.
 

	
 
;
 
; A timeout and "invalid extension rule"
 
;
 
exten => t,1,Goto(#,1)			; If they take too long, give up
 
exten => i,1,Playback(invalid)		; "That's not valid, try again"
 

	
 
;
 
; Create an extension, 500, for dialing the
 
; Asterisk demo.
 
;
 
exten => 500,1,Playback(demo-abouttotry); Let them know what's going on
 
exten => 500,n,Dial(IAX2/guest@pbx.digium.com/s@default)	; Call the Asterisk demo
 
exten => 500,n,Playback(demo-nogo)	; Couldn't connect to the demo site
 
exten => 500,n,Goto(s,6)		; Return to the start over message.
 

	
 
;
 
; Create an extension, 600, for evaluating echo latency.
 
;
 
exten => 600,1,Playback(demo-echotest)	; Let them know what's going on
 
exten => 600,n,Echo			; Do the echo test
 
exten => 600,n,Playback(demo-echodone)	; Let them know it's over
 
exten => 600,n,Goto(s,6)		; Start over
 

	
 
;
 
;	You can use the Macro Page to intercom a individual user
 
exten => 76245,1,Macro(page,SIP/Grandstream1)
 
; or if your peernames are the same as extensions
 
exten => _7XXX,1,Macro(page,SIP/${EXTEN})
 
;
 
;
 
; System Wide Page at extension 7999
 
;
 
exten => 7999,1,Set(TIMEOUT(absolute)=60)
 
exten => 7999,2,Page(Local/Grandstream1@page&Local/Xlite1@page&Local/1234@page/n,d)
 

	
 
; Give voicemail at extension 8500
 
;
 
exten => 8500,1,VoicemailMain
 
exten => 8500,n,Goto(s,6)
 

	
 
    </textarea></form>
 
    <script>
 
      var editor = CodeMirror.fromTextArea(document.getElementById("code"), {
 
        mode: "text/x-asterisk",
 
        matchBrackets: true,
 
        lineNumber: true
 
      });
 
    </script>
 

	
 
    <p><strong>MIME types defined:</strong> <code>text/x-asterisk</code>.</p>
 

	
 
  </body>
 
</html>
rhodecode/public/js/mode/clike/clike.js
Show inline comments
 
new file 100644
 
CodeMirror.defineMode("clike", function(config, parserConfig) {
 
  var indentUnit = config.indentUnit,
 
      statementIndentUnit = parserConfig.statementIndentUnit || indentUnit,
 
      dontAlignCalls = parserConfig.dontAlignCalls,
 
      keywords = parserConfig.keywords || {},
 
      builtin = parserConfig.builtin || {},
 
      blockKeywords = parserConfig.blockKeywords || {},
 
      atoms = parserConfig.atoms || {},
 
      hooks = parserConfig.hooks || {},
 
      multiLineStrings = parserConfig.multiLineStrings;
 
  var isOperatorChar = /[+\-*&%=<>!?|\/]/;
 

	
 
  var curPunc;
 

	
 
  function tokenBase(stream, state) {
 
    var ch = stream.next();
 
    if (hooks[ch]) {
 
      var result = hooks[ch](stream, state);
 
      if (result !== false) return result;
 
    }
 
    if (ch == '"' || ch == "'") {
 
      state.tokenize = tokenString(ch);
 
      return state.tokenize(stream, state);
 
    }
 
    if (/[\[\]{}\(\),;\:\.]/.test(ch)) {
 
      curPunc = ch;
 
      return null;
 
    }
 
    if (/\d/.test(ch)) {
 
      stream.eatWhile(/[\w\.]/);
 
      return "number";
 
    }
 
    if (ch == "/") {
 
      if (stream.eat("*")) {
 
        state.tokenize = tokenComment;
 
        return tokenComment(stream, state);
 
      }
 
      if (stream.eat("/")) {
 
        stream.skipToEnd();
 
        return "comment";
 
      }
 
    }
 
    if (isOperatorChar.test(ch)) {
 
      stream.eatWhile(isOperatorChar);
 
      return "operator";
 
    }
 
    stream.eatWhile(/[\w\$_]/);
 
    var cur = stream.current();
 
    if (keywords.propertyIsEnumerable(cur)) {
 
      if (blockKeywords.propertyIsEnumerable(cur)) curPunc = "newstatement";
 
      return "keyword";
 
    }
 
    if (builtin.propertyIsEnumerable(cur)) {
 
      if (blockKeywords.propertyIsEnumerable(cur)) curPunc = "newstatement";
 
      return "builtin";
 
    }
 
    if (atoms.propertyIsEnumerable(cur)) return "atom";
 
    return "variable";
 
  }
 

	
 
  function tokenString(quote) {
 
    return function(stream, state) {
 
      var escaped = false, next, end = false;
 
      while ((next = stream.next()) != null) {
 
        if (next == quote && !escaped) {end = true; break;}
 
        escaped = !escaped && next == "\\";
 
      }
 
      if (end || !(escaped || multiLineStrings))
 
        state.tokenize = null;
 
      return "string";
 
    };
 
  }
 

	
 
  function tokenComment(stream, state) {
 
    var maybeEnd = false, ch;
 
    while (ch = stream.next()) {
 
      if (ch == "/" && maybeEnd) {
 
        state.tokenize = null;
 
        break;
 
      }
 
      maybeEnd = (ch == "*");
 
    }
 
    return "comment";
 
  }
 

	
 
  function Context(indented, column, type, align, prev) {
 
    this.indented = indented;
 
    this.column = column;
 
    this.type = type;
 
    this.align = align;
 
    this.prev = prev;
 
  }
 
  function pushContext(state, col, type) {
 
    var indent = state.indented;
 
    if (state.context && state.context.type == "statement")
 
      indent = state.context.indented;
 
    return state.context = new Context(indent, col, type, null, state.context);
 
  }
 
  function popContext(state) {
 
    var t = state.context.type;
 
    if (t == ")" || t == "]" || t == "}")
 
      state.indented = state.context.indented;
 
    return state.context = state.context.prev;
 
  }
 

	
 
  // Interface
 

	
 
  return {
 
    startState: function(basecolumn) {
 
      return {
 
        tokenize: null,
 
        context: new Context((basecolumn || 0) - indentUnit, 0, "top", false),
 
        indented: 0,
 
        startOfLine: true
 
      };
 
    },
 

	
 
    token: function(stream, state) {
 
      var ctx = state.context;
 
      if (stream.sol()) {
 
        if (ctx.align == null) ctx.align = false;
 
        state.indented = stream.indentation();
 
        state.startOfLine = true;
 
      }
 
      if (stream.eatSpace()) return null;
 
      curPunc = null;
 
      var style = (state.tokenize || tokenBase)(stream, state);
 
      if (style == "comment" || style == "meta") return style;
 
      if (ctx.align == null) ctx.align = true;
 

	
 
      if ((curPunc == ";" || curPunc == ":" || curPunc == ",") && ctx.type == "statement") popContext(state);
 
      else if (curPunc == "{") pushContext(state, stream.column(), "}");
 
      else if (curPunc == "[") pushContext(state, stream.column(), "]");
 
      else if (curPunc == "(") pushContext(state, stream.column(), ")");
 
      else if (curPunc == "}") {
 
        while (ctx.type == "statement") ctx = popContext(state);
 
        if (ctx.type == "}") ctx = popContext(state);
 
        while (ctx.type == "statement") ctx = popContext(state);
 
      }
 
      else if (curPunc == ctx.type) popContext(state);
 
      else if (((ctx.type == "}" || ctx.type == "top") && curPunc != ';') || (ctx.type == "statement" && curPunc == "newstatement"))
 
        pushContext(state, stream.column(), "statement");
 
      state.startOfLine = false;
 
      return style;
 
    },
 

	
 
    indent: function(state, textAfter) {
 
      if (state.tokenize != tokenBase && state.tokenize != null) return CodeMirror.Pass;
 
      var ctx = state.context, firstChar = textAfter && textAfter.charAt(0);
 
      if (ctx.type == "statement" && firstChar == "}") ctx = ctx.prev;
 
      var closing = firstChar == ctx.type;
 
      if (ctx.type == "statement") return ctx.indented + (firstChar == "{" ? 0 : statementIndentUnit);
 
      else if (ctx.align && (!dontAlignCalls || ctx.type != ")")) return ctx.column + (closing ? 0 : 1);
 
      else if (ctx.type == ")" && !closing) return ctx.indented + statementIndentUnit;
 
      else return ctx.indented + (closing ? 0 : indentUnit);
 
    },
 

	
 
    electricChars: "{}",
 
    blockCommentStart: "/*",
 
    blockCommentEnd: "*/",
 
    lineComment: "//"
 
  };
 
});
 

	
 
(function() {
 
  function words(str) {
 
    var obj = {}, words = str.split(" ");
 
    for (var i = 0; i < words.length; ++i) obj[words[i]] = true;
 
    return obj;
 
  }
 
  var cKeywords = "auto if break int case long char register continue return default short do sizeof " +
 
    "double static else struct entry switch extern typedef float union for unsigned " +
 
    "goto while enum void const signed volatile";
 

	
 
  function cppHook(stream, state) {
 
    if (!state.startOfLine) return false;
 
    for (;;) {
 
      if (stream.skipTo("\\")) {
 
        stream.next();
 
        if (stream.eol()) {
 
          state.tokenize = cppHook;
 
          break;
 
        }
 
      } else {
 
        stream.skipToEnd();
 
        state.tokenize = null;
 
        break;
 
      }
 
    }
 
    return "meta";
 
  }
 

	
 
  // C#-style strings where "" escapes a quote.
 
  function tokenAtString(stream, state) {
 
    var next;
 
    while ((next = stream.next()) != null) {
 
      if (next == '"' && !stream.eat('"')) {
 
        state.tokenize = null;
 
        break;
 
      }
 
    }
 
    return "string";
 
  }
 

	
 
  function mimes(ms, mode) {
 
    for (var i = 0; i < ms.length; ++i) CodeMirror.defineMIME(ms[i], mode);
 
  }
 

	
 
  mimes(["text/x-csrc", "text/x-c", "text/x-chdr"], {
 
    name: "clike",
 
    keywords: words(cKeywords),
 
    blockKeywords: words("case do else for if switch while struct"),
 
    atoms: words("null"),
 
    hooks: {"#": cppHook}
 
  });
 
  mimes(["text/x-c++src", "text/x-c++hdr"], {
 
    name: "clike",
 
    keywords: words(cKeywords + " asm dynamic_cast namespace reinterpret_cast try bool explicit new " +
 
                    "static_cast typeid catch operator template typename class friend private " +
 
                    "this using const_cast inline public throw virtual delete mutable protected " +
 
                    "wchar_t"),
 
    blockKeywords: words("catch class do else finally for if struct switch try while"),
 
    atoms: words("true false null"),
 
    hooks: {"#": cppHook}
 
  });
 
  CodeMirror.defineMIME("text/x-java", {
 
    name: "clike",
 
    keywords: words("abstract assert boolean break byte case catch char class const continue default " +
 
                    "do double else enum extends final finally float for goto if implements import " +
 
                    "instanceof int interface long native new package private protected public " +
 
                    "return short static strictfp super switch synchronized this throw throws transient " +
 
                    "try void volatile while"),
 
    blockKeywords: words("catch class do else finally for if switch try while"),
 
    atoms: words("true false null"),
 
    hooks: {
 
      "@": function(stream) {
 
        stream.eatWhile(/[\w\$_]/);
 
        return "meta";
 
      }
 
    }
 
  });
 
  CodeMirror.defineMIME("text/x-csharp", {
 
    name: "clike",
 
    keywords: words("abstract as base break case catch checked class const continue" +
 
                    " default delegate do else enum event explicit extern finally fixed for" +
 
                    " foreach goto if implicit in interface internal is lock namespace new" +
 
                    " operator out override params private protected public readonly ref return sealed" +
 
                    " sizeof stackalloc static struct switch this throw try typeof unchecked" +
 
                    " unsafe using virtual void volatile while add alias ascending descending dynamic from get" +
 
                    " global group into join let orderby partial remove select set value var yield"),
 
    blockKeywords: words("catch class do else finally for foreach if struct switch try while"),
 
    builtin: words("Boolean Byte Char DateTime DateTimeOffset Decimal Double" +
 
                    " Guid Int16 Int32 Int64 Object SByte Single String TimeSpan UInt16 UInt32" +
 
                    " UInt64 bool byte char decimal double short int long object"  +
 
                    " sbyte float string ushort uint ulong"),
 
    atoms: words("true false null"),
 
    hooks: {
 
      "@": function(stream, state) {
 
        if (stream.eat('"')) {
 
          state.tokenize = tokenAtString;
 
          return tokenAtString(stream, state);
 
        }
 
        stream.eatWhile(/[\w\$_]/);
 
        return "meta";
 
      }
 
    }
 
  });
 
  CodeMirror.defineMIME("text/x-scala", {
 
    name: "clike",
 
    keywords: words(
 

	
 
      /* scala */
 
      "abstract case catch class def do else extends false final finally for forSome if " +
 
      "implicit import lazy match new null object override package private protected return " +
 
      "sealed super this throw trait try trye type val var while with yield _ : = => <- <: " +
 
      "<% >: # @ " +
 

	
 
      /* package scala */
 
      "assert assume require print println printf readLine readBoolean readByte readShort " +
 
      "readChar readInt readLong readFloat readDouble " +
 

	
 
      "AnyVal App Application Array BufferedIterator BigDecimal BigInt Char Console Either " +
 
      "Enumeration Equiv Error Exception Fractional Function IndexedSeq Integral Iterable " +
 
      "Iterator List Map Numeric Nil NotNull Option Ordered Ordering PartialFunction PartialOrdering " +
 
      "Product Proxy Range Responder Seq Serializable Set Specializable Stream StringBuilder " +
 
      "StringContext Symbol Throwable Traversable TraversableOnce Tuple Unit Vector :: #:: " +
 

	
 
      /* package java.lang */
 
      "Boolean Byte Character CharSequence Class ClassLoader Cloneable Comparable " +
 
      "Compiler Double Exception Float Integer Long Math Number Object Package Pair Process " +
 
      "Runtime Runnable SecurityManager Short StackTraceElement StrictMath String " +
 
      "StringBuffer System Thread ThreadGroup ThreadLocal Throwable Triple Void"
 

	
 

	
 
    ),
 
    blockKeywords: words("catch class do else finally for forSome if match switch try while"),
 
    atoms: words("true false null"),
 
    hooks: {
 
      "@": function(stream) {
 
        stream.eatWhile(/[\w\$_]/);
 
        return "meta";
 
      }
 
    }
 
  });
 
  mimes(["x-shader/x-vertex", "x-shader/x-fragment"], {
 
    name: "clike",
 
    keywords: words("float int bool void " +
 
                    "vec2 vec3 vec4 ivec2 ivec3 ivec4 bvec2 bvec3 bvec4 " +
 
                    "mat2 mat3 mat4 " +
 
                    "sampler1D sampler2D sampler3D samplerCube " +
 
                    "sampler1DShadow sampler2DShadow" +
 
                    "const attribute uniform varying " +
 
                    "break continue discard return " +
 
                    "for while do if else struct " +
 
                    "in out inout"),
 
    blockKeywords: words("for while do if else struct"),
 
    builtin: words("radians degrees sin cos tan asin acos atan " +
 
                    "pow exp log exp2 sqrt inversesqrt " +
 
                    "abs sign floor ceil fract mod min max clamp mix step smootstep " +
 
                    "length distance dot cross normalize ftransform faceforward " +
 
                    "reflect refract matrixCompMult " +
 
                    "lessThan lessThanEqual greaterThan greaterThanEqual " +
 
                    "equal notEqual any all not " +
 
                    "texture1D texture1DProj texture1DLod texture1DProjLod " +
 
                    "texture2D texture2DProj texture2DLod texture2DProjLod " +
 
                    "texture3D texture3DProj texture3DLod texture3DProjLod " +
 
                    "textureCube textureCubeLod " +
 
                    "shadow1D shadow2D shadow1DProj shadow2DProj " +
 
                    "shadow1DLod shadow2DLod shadow1DProjLod shadow2DProjLod " +
 
                    "dFdx dFdy fwidth " +
 
                    "noise1 noise2 noise3 noise4"),
 
    atoms: words("true false " +
 
                "gl_FragColor gl_SecondaryColor gl_Normal gl_Vertex " +
 
                "gl_MultiTexCoord0 gl_MultiTexCoord1 gl_MultiTexCoord2 gl_MultiTexCoord3 " +
 
                "gl_MultiTexCoord4 gl_MultiTexCoord5 gl_MultiTexCoord6 gl_MultiTexCoord7 " +
 
                "gl_FogCoord " +
 
                "gl_Position gl_PointSize gl_ClipVertex " +
 
                "gl_FrontColor gl_BackColor gl_FrontSecondaryColor gl_BackSecondaryColor " +
 
                "gl_TexCoord gl_FogFragCoord " +
 
                "gl_FragCoord gl_FrontFacing " +
 
                "gl_FragColor gl_FragData gl_FragDepth " +
 
                "gl_ModelViewMatrix gl_ProjectionMatrix gl_ModelViewProjectionMatrix " +
 
                "gl_TextureMatrix gl_NormalMatrix gl_ModelViewMatrixInverse " +
 
                "gl_ProjectionMatrixInverse gl_ModelViewProjectionMatrixInverse " +
 
                "gl_TexureMatrixTranspose gl_ModelViewMatrixInverseTranspose " +
 
                "gl_ProjectionMatrixInverseTranspose " +
 
                "gl_ModelViewProjectionMatrixInverseTranspose " +
 
                "gl_TextureMatrixInverseTranspose " +
 
                "gl_NormalScale gl_DepthRange gl_ClipPlane " +
 
                "gl_Point gl_FrontMaterial gl_BackMaterial gl_LightSource gl_LightModel " +
 
                "gl_FrontLightModelProduct gl_BackLightModelProduct " +
 
                "gl_TextureColor gl_EyePlaneS gl_EyePlaneT gl_EyePlaneR gl_EyePlaneQ " +
 
                "gl_FogParameters " +
 
                "gl_MaxLights gl_MaxClipPlanes gl_MaxTextureUnits gl_MaxTextureCoords " +
 
                "gl_MaxVertexAttribs gl_MaxVertexUniformComponents gl_MaxVaryingFloats " +
 
                "gl_MaxVertexTextureImageUnits gl_MaxTextureImageUnits " +
 
                "gl_MaxFragmentUniformComponents gl_MaxCombineTextureImageUnits " +
 
                "gl_MaxDrawBuffers"),
 
    hooks: {"#": cppHook}
 
  });
 
}());
rhodecode/public/js/mode/clike/index.html
Show inline comments
 
new file 100644
 
<!doctype html>
 
<html>
 
  <head>
 
    <meta charset="utf-8">
 
    <title>CodeMirror: C-like mode</title>
 
    <link rel="stylesheet" href="../../lib/codemirror.css">
 
    <script src="../../lib/codemirror.js"></script>
 
    <script src="../../addon/edit/matchbrackets.js"></script>
 
    <script src="clike.js"></script>
 
    <link rel="stylesheet" href="../../doc/docs.css">
 
    <style>.CodeMirror {border: 2px inset #dee;}</style>
 
  </head>
 
  <body>
 
    <h1>CodeMirror: C-like mode</h1>
 

	
 
<form><textarea id="code" name="code">
 
/* C demo code */
 

	
 
#include <zmq.h>
 
#include <pthread.h>
 
#include <semaphore.h>
 
#include <time.h>
 
#include <stdio.h>
 
#include <fcntl.h>
 
#include <malloc.h>
 

	
 
typedef struct {
 
  void* arg_socket;
 
  zmq_msg_t* arg_msg;
 
  char* arg_string;
 
  unsigned long arg_len;
 
  int arg_int, arg_command;
 

	
 
  int signal_fd;
 
  int pad;
 
  void* context;
 
  sem_t sem;
 
} acl_zmq_context;
 

	
 
#define p(X) (context->arg_##X)
 

	
 
void* zmq_thread(void* context_pointer) {
 
  acl_zmq_context* context = (acl_zmq_context*)context_pointer;
 
  char ok = 'K', err = 'X';
 
  int res;
 

	
 
  while (1) {
 
    while ((res = sem_wait(&amp;context->sem)) == EINTR);
 
    if (res) {write(context->signal_fd, &amp;err, 1); goto cleanup;}
 
    switch(p(command)) {
 
    case 0: goto cleanup;
 
    case 1: p(socket) = zmq_socket(context->context, p(int)); break;
 
    case 2: p(int) = zmq_close(p(socket)); break;
 
    case 3: p(int) = zmq_bind(p(socket), p(string)); break;
 
    case 4: p(int) = zmq_connect(p(socket), p(string)); break;
 
    case 5: p(int) = zmq_getsockopt(p(socket), p(int), (void*)p(string), &amp;p(len)); break;
 
    case 6: p(int) = zmq_setsockopt(p(socket), p(int), (void*)p(string), p(len)); break;
 
    case 7: p(int) = zmq_send(p(socket), p(msg), p(int)); break;
 
    case 8: p(int) = zmq_recv(p(socket), p(msg), p(int)); break;
 
    case 9: p(int) = zmq_poll(p(socket), p(int), p(len)); break;
 
    }
 
    p(command) = errno;
 
    write(context->signal_fd, &amp;ok, 1);
 
  }
 
 cleanup:
 
  close(context->signal_fd);
 
  free(context_pointer);
 
  return 0;
 
}
 

	
 
void* zmq_thread_init(void* zmq_context, int signal_fd) {
 
  acl_zmq_context* context = malloc(sizeof(acl_zmq_context));
 
  pthread_t thread;
 

	
 
  context->context = zmq_context;
 
  context->signal_fd = signal_fd;
 
  sem_init(&amp;context->sem, 1, 0);
 
  pthread_create(&amp;thread, 0, &amp;zmq_thread, context);
 
  pthread_detach(thread);
 
  return context;
 
}
 
</textarea></form>
 

	
 
    <script>
 
      var editor = CodeMirror.fromTextArea(document.getElementById("code"), {
 
        lineNumbers: true,
 
        matchBrackets: true,
 
        mode: "text/x-csrc"
 
      });
 
    </script>
 

	
 
    <p>Simple mode that tries to handle C-like languages as well as it
 
    can. Takes two configuration parameters: <code>keywords</code>, an
 
    object whose property names are the keywords in the language,
 
    and <code>useCPP</code>, which determines whether C preprocessor
 
    directives are recognized.</p>
 

	
 
    <p><strong>MIME types defined:</strong> <code>text/x-csrc</code>
 
    (C code), <code>text/x-c++src</code> (C++
 
    code), <code>text/x-java</code> (Java
 
    code), <code>text/x-csharp</code> (C#).</p>
 
  </body>
 
</html>
rhodecode/public/js/mode/clike/scala.html
Show inline comments
 
new file 100644
 
<!doctype html>
 
<html>
 
  <head>
 
    <meta charset="utf-8">
 
    <title>CodeMirror: C-like mode</title>
 
    <link rel="stylesheet" href="../../lib/codemirror.css">
 
    <link rel="stylesheet" href="../../theme/ambiance.css">
 
    <script src="../../lib/codemirror.js"></script>
 
    <script src="../../addon/edit/matchbrackets.js"></script>
 
    <script src="clike.js"></script>
 
    <link rel="stylesheet" href="../../doc/docs.css">
 
    <style>
 
      body
 
      {
 
        margin: 0;
 
        padding: 0;
 
        max-width:inherit;
 
        height: 100%;
 
      }
 
      html, form, .CodeMirror, .CodeMirror-scroll
 
      {
 
        height: 100%;        
 
      }
 
    </style>
 
  </head>
 
  <body>
 
<form>
 
<textarea id="code" name="code">
 

	
 
  /*                     __                                               *\
 
  **     ________ ___   / /  ___     Scala API                            **
 
  **    / __/ __// _ | / /  / _ |    (c) 2003-2011, LAMP/EPFL             **
 
  **  __\ \/ /__/ __ |/ /__/ __ |    http://scala-lang.org/               **
 
  ** /____/\___/_/ |_/____/_/ | |                                         **
 
  **                          |/                                          **
 
  \*                                                                      */
 

	
 
  package scala.collection
 

	
 
  import generic._
 
  import mutable.{ Builder, ListBuffer }
 
  import annotation.{tailrec, migration, bridge}
 
  import annotation.unchecked.{ uncheckedVariance => uV }
 
  import parallel.ParIterable
 

	
 
  /** A template trait for traversable collections of type `Traversable[A]`.
 
   *  
 
   *  $traversableInfo
 
   *  @define mutability
 
   *  @define traversableInfo
 
   *  This is a base trait of all kinds of $mutability Scala collections. It
 
   *  implements the behavior common to all collections, in terms of a method
 
   *  `foreach` with signature:
 
   * {{{
 
   *     def foreach[U](f: Elem => U): Unit
 
   * }}}
 
   *  Collection classes mixing in this trait provide a concrete 
 
   *  `foreach` method which traverses all the
 
   *  elements contained in the collection, applying a given function to each.
 
   *  They also need to provide a method `newBuilder`
 
   *  which creates a builder for collections of the same kind.
 
   *  
 
   *  A traversable class might or might not have two properties: strictness
 
   *  and orderedness. Neither is represented as a type.
 
   *  
 
   *  The instances of a strict collection class have all their elements
 
   *  computed before they can be used as values. By contrast, instances of
 
   *  a non-strict collection class may defer computation of some of their
 
   *  elements until after the instance is available as a value.
 
   *  A typical example of a non-strict collection class is a
 
   *  <a href="../immutable/Stream.html" target="ContentFrame">
 
   *  `scala.collection.immutable.Stream`</a>.
 
   *  A more general class of examples are `TraversableViews`.
 
   *  
 
   *  If a collection is an instance of an ordered collection class, traversing
 
   *  its elements with `foreach` will always visit elements in the
 
   *  same order, even for different runs of the program. If the class is not
 
   *  ordered, `foreach` can visit elements in different orders for
 
   *  different runs (but it will keep the same order in the same run).'
 
   * 
 
   *  A typical example of a collection class which is not ordered is a
 
   *  `HashMap` of objects. The traversal order for hash maps will
 
   *  depend on the hash codes of its elements, and these hash codes might
 
   *  differ from one run to the next. By contrast, a `LinkedHashMap`
 
   *  is ordered because it's `foreach` method visits elements in the
 
   *  order they were inserted into the `HashMap`.
 
   *
 
   *  @author Martin Odersky
 
   *  @version 2.8
 
   *  @since   2.8
 
   *  @tparam A    the element type of the collection
 
   *  @tparam Repr the type of the actual collection containing the elements.
 
   *
 
   *  @define Coll Traversable
 
   *  @define coll traversable collection
 
   */
 
  trait TraversableLike[+A, +Repr] extends HasNewBuilder[A, Repr] 
 
                                      with FilterMonadic[A, Repr]
 
                                      with TraversableOnce[A]
 
                                      with GenTraversableLike[A, Repr]
 
                                      with Parallelizable[A, ParIterable[A]]
 
  {
 
    self =>
 

	
 
    import Traversable.breaks._
 

	
 
    /** The type implementing this traversable */
 
    protected type Self = Repr
 

	
 
    /** The collection of type $coll underlying this `TraversableLike` object.
 
     *  By default this is implemented as the `TraversableLike` object itself,
 
     *  but this can be overridden.
 
     */
 
    def repr: Repr = this.asInstanceOf[Repr]
 

	
 
    /** The underlying collection seen as an instance of `$Coll`.
 
     *  By default this is implemented as the current collection object itself,
 
     *  but this can be overridden.
 
     */
 
    protected[this] def thisCollection: Traversable[A] = this.asInstanceOf[Traversable[A]]
 

	
 
    /** A conversion from collections of type `Repr` to `$Coll` objects.
 
     *  By default this is implemented as just a cast, but this can be overridden.
 
     */
 
    protected[this] def toCollection(repr: Repr): Traversable[A] = repr.asInstanceOf[Traversable[A]]
 

	
 
    /** Creates a new builder for this collection type.
 
     */
 
    protected[this] def newBuilder: Builder[A, Repr]
 

	
 
    protected[this] def parCombiner = ParIterable.newCombiner[A]
 

	
 
    /** Applies a function `f` to all elements of this $coll.
 
     *  
 
     *    Note: this method underlies the implementation of most other bulk operations.
 
     *    It's important to implement this method in an efficient way.
 
     *  
 
     *
 
     *  @param  f   the function that is applied for its side-effect to every element.
 
     *              The result of function `f` is discarded.
 
     *              
 
     *  @tparam  U  the type parameter describing the result of function `f`. 
 
     *              This result will always be ignored. Typically `U` is `Unit`,
 
     *              but this is not necessary.
 
     *
 
     *  @usecase def foreach(f: A => Unit): Unit
 
     */
 
    def foreach[U](f: A => U): Unit
 

	
 
    /** Tests whether this $coll is empty.
 
     *
 
     *  @return    `true` if the $coll contain no elements, `false` otherwise.
 
     */
 
    def isEmpty: Boolean = {
 
      var result = true
 
      breakable {
 
        for (x <- this) {
 
          result = false
 
          break
 
        }
 
      }
 
      result
 
    }
 

	
 
    /** Tests whether this $coll is known to have a finite size.
 
     *  All strict collections are known to have finite size. For a non-strict collection
 
     *  such as `Stream`, the predicate returns `true` if all elements have been computed.
 
     *  It returns `false` if the stream is not yet evaluated to the end.
 
     *
 
     *  Note: many collection methods will not work on collections of infinite sizes. 
 
     *
 
     *  @return  `true` if this collection is known to have finite size, `false` otherwise.
 
     */
 
    def hasDefiniteSize = true
 

	
 
    def ++[B >: A, That](that: GenTraversableOnce[B])(implicit bf: CanBuildFrom[Repr, B, That]): That = {
 
      val b = bf(repr)
 
      if (that.isInstanceOf[IndexedSeqLike[_, _]]) b.sizeHint(this, that.seq.size)
 
      b ++= thisCollection
 
      b ++= that.seq
 
      b.result
 
    }
 

	
 
    @bridge
 
    def ++[B >: A, That](that: TraversableOnce[B])(implicit bf: CanBuildFrom[Repr, B, That]): That =
 
      ++(that: GenTraversableOnce[B])(bf)
 

	
 
    /** Concatenates this $coll with the elements of a traversable collection.
 
     *  It differs from ++ in that the right operand determines the type of the
 
     *  resulting collection rather than the left one.
 
     * 
 
     *  @param that   the traversable to append.
 
     *  @tparam B     the element type of the returned collection. 
 
     *  @tparam That  $thatinfo
 
     *  @param bf     $bfinfo
 
     *  @return       a new collection of type `That` which contains all elements
 
     *                of this $coll followed by all elements of `that`.
 
     * 
 
     *  @usecase def ++:[B](that: TraversableOnce[B]): $Coll[B]
 
     *  
 
     *  @return       a new $coll which contains all elements of this $coll
 
     *                followed by all elements of `that`.
 
     */
 
    def ++:[B >: A, That](that: TraversableOnce[B])(implicit bf: CanBuildFrom[Repr, B, That]): That = {
 
      val b = bf(repr)
 
      if (that.isInstanceOf[IndexedSeqLike[_, _]]) b.sizeHint(this, that.size)
 
      b ++= that
 
      b ++= thisCollection
 
      b.result
 
    }
 

	
 
    /** This overload exists because: for the implementation of ++: we should reuse
 
     *  that of ++ because many collections override it with more efficient versions.
 
     *  Since TraversableOnce has no '++' method, we have to implement that directly,
 
     *  but Traversable and down can use the overload.
 
     */
 
    def ++:[B >: A, That](that: Traversable[B])(implicit bf: CanBuildFrom[Repr, B, That]): That =
 
      (that ++ seq)(breakOut)
 

	
 
    def map[B, That](f: A => B)(implicit bf: CanBuildFrom[Repr, B, That]): That = {
 
      val b = bf(repr)
 
      b.sizeHint(this) 
 
      for (x <- this) b += f(x)
 
      b.result
 
    }
 

	
 
    def flatMap[B, That](f: A => GenTraversableOnce[B])(implicit bf: CanBuildFrom[Repr, B, That]): That = {
 
      val b = bf(repr)
 
      for (x <- this) b ++= f(x).seq
 
      b.result
 
    }
 

	
 
    /** Selects all elements of this $coll which satisfy a predicate.
 
     *
 
     *  @param p     the predicate used to test elements.
 
     *  @return      a new $coll consisting of all elements of this $coll that satisfy the given
 
     *               predicate `p`. The order of the elements is preserved.
 
     */
 
    def filter(p: A => Boolean): Repr = {
 
      val b = newBuilder
 
      for (x <- this) 
 
        if (p(x)) b += x
 
      b.result
 
    }
 

	
 
    /** Selects all elements of this $coll which do not satisfy a predicate.
 
     *
 
     *  @param p     the predicate used to test elements.
 
     *  @return      a new $coll consisting of all elements of this $coll that do not satisfy the given
 
     *               predicate `p`. The order of the elements is preserved.
 
     */
 
    def filterNot(p: A => Boolean): Repr = filter(!p(_))
 

	
 
    def collect[B, That](pf: PartialFunction[A, B])(implicit bf: CanBuildFrom[Repr, B, That]): That = {
 
      val b = bf(repr)
 
      for (x <- this) if (pf.isDefinedAt(x)) b += pf(x)
 
      b.result
 
    }
 

	
 
    /** Builds a new collection by applying an option-valued function to all
 
     *  elements of this $coll on which the function is defined.
 
     *
 
     *  @param f      the option-valued function which filters and maps the $coll.
 
     *  @tparam B     the element type of the returned collection.
 
     *  @tparam That  $thatinfo
 
     *  @param bf     $bfinfo
 
     *  @return       a new collection of type `That` resulting from applying the option-valued function
 
     *                `f` to each element and collecting all defined results.
 
     *                The order of the elements is preserved.
 
     *
 
     *  @usecase def filterMap[B](f: A => Option[B]): $Coll[B]
 
     *  
 
     *  @param pf     the partial function which filters and maps the $coll.
 
     *  @return       a new $coll resulting from applying the given option-valued function
 
     *                `f` to each element and collecting all defined results.
 
     *                The order of the elements is preserved.
 
    def filterMap[B, That](f: A => Option[B])(implicit bf: CanBuildFrom[Repr, B, That]): That = {
 
      val b = bf(repr)
 
      for (x <- this) 
 
        f(x) match {
 
          case Some(y) => b += y
 
          case _ =>
 
        }
 
      b.result
 
    }
 
     */
 

	
 
    /** Partitions this $coll in two ${coll}s according to a predicate.
 
     *
 
     *  @param p the predicate on which to partition.
 
     *  @return  a pair of ${coll}s: the first $coll consists of all elements that 
 
     *           satisfy the predicate `p` and the second $coll consists of all elements
 
     *           that don't. The relative order of the elements in the resulting ${coll}s
 
     *           is the same as in the original $coll.
 
     */
 
    def partition(p: A => Boolean): (Repr, Repr) = {
 
      val l, r = newBuilder
 
      for (x <- this) (if (p(x)) l else r) += x
 
      (l.result, r.result)
 
    }
 

	
 
    def groupBy[K](f: A => K): immutable.Map[K, Repr] = {
 
      val m = mutable.Map.empty[K, Builder[A, Repr]]
 
      for (elem <- this) {
 
        val key = f(elem)
 
        val bldr = m.getOrElseUpdate(key, newBuilder)
 
        bldr += elem
 
      }
 
      val b = immutable.Map.newBuilder[K, Repr]
 
      for ((k, v) <- m)
 
        b += ((k, v.result))
 

	
 
      b.result
 
    }
 

	
 
    /** Tests whether a predicate holds for all elements of this $coll.
 
     *
 
     *  $mayNotTerminateInf
 
     *
 
     *  @param   p     the predicate used to test elements.
 
     *  @return        `true` if the given predicate `p` holds for all elements
 
     *                 of this $coll, otherwise `false`.
 
     */
 
    def forall(p: A => Boolean): Boolean = {
 
      var result = true
 
      breakable {
 
        for (x <- this)
 
          if (!p(x)) { result = false; break }
 
      }
 
      result
 
    }
 

	
 
    /** Tests whether a predicate holds for some of the elements of this $coll.
 
     *
 
     *  $mayNotTerminateInf
 
     *
 
     *  @param   p     the predicate used to test elements.
 
     *  @return        `true` if the given predicate `p` holds for some of the
 
     *                 elements of this $coll, otherwise `false`.
 
     */
 
    def exists(p: A => Boolean): Boolean = {
 
      var result = false
 
      breakable {
 
        for (x <- this)
 
          if (p(x)) { result = true; break }
 
      }
 
      result
 
    }
 

	
 
    /** Finds the first element of the $coll satisfying a predicate, if any.
 
     * 
 
     *  $mayNotTerminateInf
 
     *  $orderDependent
 
     *
 
     *  @param p    the predicate used to test elements.
 
     *  @return     an option value containing the first element in the $coll
 
     *              that satisfies `p`, or `None` if none exists.
 
     */
 
    def find(p: A => Boolean): Option[A] = {
 
      var result: Option[A] = None
 
      breakable {
 
        for (x <- this)
 
          if (p(x)) { result = Some(x); break }
 
      }
 
      result
 
    }
 

	
 
    def scan[B >: A, That](z: B)(op: (B, B) => B)(implicit cbf: CanBuildFrom[Repr, B, That]): That = scanLeft(z)(op)
 

	
 
    def scanLeft[B, That](z: B)(op: (B, A) => B)(implicit bf: CanBuildFrom[Repr, B, That]): That = {
 
      val b = bf(repr)
 
      b.sizeHint(this, 1)
 
      var acc = z
 
      b += acc
 
      for (x <- this) { acc = op(acc, x); b += acc }
 
      b.result
 
    }
 

	
 
    @migration(2, 9,
 
      "This scanRight definition has changed in 2.9.\n" +
 
      "The previous behavior can be reproduced with scanRight.reverse."
 
    )
 
    def scanRight[B, That](z: B)(op: (A, B) => B)(implicit bf: CanBuildFrom[Repr, B, That]): That = {
 
      var scanned = List(z)
 
      var acc = z
 
      for (x <- reversed) {
 
        acc = op(x, acc)
 
        scanned ::= acc
 
      }
 
      val b = bf(repr)
 
      for (elem <- scanned) b += elem
 
      b.result
 
    }
 

	
 
    /** Selects the first element of this $coll.
 
     *  $orderDependent
 
     *  @return  the first element of this $coll.
 
     *  @throws `NoSuchElementException` if the $coll is empty.
 
     */
 
    def head: A = {
 
      var result: () => A = () => throw new NoSuchElementException
 
      breakable {
 
        for (x <- this) {
 
          result = () => x
 
          break
 
        }
 
      }
 
      result()
 
    }
 

	
 
    /** Optionally selects the first element.
 
     *  $orderDependent
 
     *  @return  the first element of this $coll if it is nonempty, `None` if it is empty.
 
     */
 
    def headOption: Option[A] = if (isEmpty) None else Some(head)
 

	
 
    /** Selects all elements except the first.
 
     *  $orderDependent
 
     *  @return  a $coll consisting of all elements of this $coll
 
     *           except the first one.
 
     *  @throws `UnsupportedOperationException` if the $coll is empty.
 
     */ 
 
    override def tail: Repr = {
 
      if (isEmpty) throw new UnsupportedOperationException("empty.tail")
 
      drop(1)
 
    }
 

	
 
    /** Selects the last element.
 
      * $orderDependent
 
      * @return The last element of this $coll.
 
      * @throws NoSuchElementException If the $coll is empty.
 
      */
 
    def last: A = {
 
      var lst = head
 
      for (x <- this)
 
        lst = x
 
      lst
 
    }
 

	
 
    /** Optionally selects the last element.
 
     *  $orderDependent
 
     *  @return  the last element of this $coll$ if it is nonempty, `None` if it is empty.
 
     */
 
    def lastOption: Option[A] = if (isEmpty) None else Some(last)
 

	
 
    /** Selects all elements except the last.
 
     *  $orderDependent
 
     *  @return  a $coll consisting of all elements of this $coll
 
     *           except the last one.
 
     *  @throws `UnsupportedOperationException` if the $coll is empty.
 
     */
 
    def init: Repr = {
 
      if (isEmpty) throw new UnsupportedOperationException("empty.init")
 
      var lst = head
 
      var follow = false
 
      val b = newBuilder
 
      b.sizeHint(this, -1)
 
      for (x <- this.seq) {
 
        if (follow) b += lst
 
        else follow = true
 
        lst = x
 
      }
 
      b.result
 
    }
 

	
 
    def take(n: Int): Repr = slice(0, n)
 

	
 
    def drop(n: Int): Repr = 
 
      if (n <= 0) {
 
        val b = newBuilder
 
        b.sizeHint(this)
 
        b ++= thisCollection result
 
      }
 
      else sliceWithKnownDelta(n, Int.MaxValue, -n)
 

	
 
    def slice(from: Int, until: Int): Repr = sliceWithKnownBound(math.max(from, 0), until)
 

	
 
    // Precondition: from >= 0, until > 0, builder already configured for building.
 
    private[this] def sliceInternal(from: Int, until: Int, b: Builder[A, Repr]): Repr = {
 
      var i = 0
 
      breakable {
 
        for (x <- this.seq) {
 
          if (i >= from) b += x
 
          i += 1
 
          if (i >= until) break
 
        }
 
      }
 
      b.result
 
    }
 
    // Precondition: from >= 0
 
    private[scala] def sliceWithKnownDelta(from: Int, until: Int, delta: Int): Repr = {
 
      val b = newBuilder
 
      if (until <= from) b.result
 
      else {
 
        b.sizeHint(this, delta)
 
        sliceInternal(from, until, b)
 
      }
 
    }
 
    // Precondition: from >= 0
 
    private[scala] def sliceWithKnownBound(from: Int, until: Int): Repr = {
 
      val b = newBuilder
 
      if (until <= from) b.result
 
      else {
 
        b.sizeHintBounded(until - from, this)      
 
        sliceInternal(from, until, b)
 
      }
 
    }
 

	
 
    def takeWhile(p: A => Boolean): Repr = {
 
      val b = newBuilder
 
      breakable {
 
        for (x <- this) {
 
          if (!p(x)) break
 
          b += x
 
        }
 
      }
 
      b.result
 
    }
 

	
 
    def dropWhile(p: A => Boolean): Repr = {
 
      val b = newBuilder
 
      var go = false
 
      for (x <- this) {
 
        if (!p(x)) go = true
 
        if (go) b += x
 
      }
 
      b.result
 
    }
 

	
 
    def span(p: A => Boolean): (Repr, Repr) = {
 
      val l, r = newBuilder
 
      var toLeft = true
 
      for (x <- this) {
 
        toLeft = toLeft && p(x)
 
        (if (toLeft) l else r) += x
 
      }
 
      (l.result, r.result)
 
    }
 

	
 
    def splitAt(n: Int): (Repr, Repr) = {
 
      val l, r = newBuilder
 
      l.sizeHintBounded(n, this)
 
      if (n >= 0) r.sizeHint(this, -n)
 
      var i = 0
 
      for (x <- this) {
 
        (if (i < n) l else r) += x
 
        i += 1
 
      }
 
      (l.result, r.result)
 
    }
 

	
 
    /** Iterates over the tails of this $coll. The first value will be this
 
     *  $coll and the final one will be an empty $coll, with the intervening
 
     *  values the results of successive applications of `tail`.
 
     *
 
     *  @return   an iterator over all the tails of this $coll
 
     *  @example  `List(1,2,3).tails = Iterator(List(1,2,3), List(2,3), List(3), Nil)`
 
     */  
 
    def tails: Iterator[Repr] = iterateUntilEmpty(_.tail)
 

	
 
    /** Iterates over the inits of this $coll. The first value will be this
 
     *  $coll and the final one will be an empty $coll, with the intervening
 
     *  values the results of successive applications of `init`.
 
     *
 
     *  @return  an iterator over all the inits of this $coll
 
     *  @example  `List(1,2,3).inits = Iterator(List(1,2,3), List(1,2), List(1), Nil)`
 
     */
 
    def inits: Iterator[Repr] = iterateUntilEmpty(_.init)
 

	
 
    /** Copies elements of this $coll to an array.
 
     *  Fills the given array `xs` with at most `len` elements of
 
     *  this $coll, starting at position `start`.
 
     *  Copying will stop once either the end of the current $coll is reached,
 
     *  or the end of the array is reached, or `len` elements have been copied.
 
     *
 
     *  $willNotTerminateInf
 
     * 
 
     *  @param  xs     the array to fill.
 
     *  @param  start  the starting index.
 
     *  @param  len    the maximal number of elements to copy.
 
     *  @tparam B      the type of the elements of the array. 
 
     * 
 
     *
 
     *  @usecase def copyToArray(xs: Array[A], start: Int, len: Int): Unit
 
     */
 
    def copyToArray[B >: A](xs: Array[B], start: Int, len: Int) {
 
      var i = start
 
      val end = (start + len) min xs.length
 
      breakable {
 
        for (x <- this) {
 
          if (i >= end) break
 
          xs(i) = x
 
          i += 1
 
        }
 
      }
 
    }
 

	
 
    def toTraversable: Traversable[A] = thisCollection
 
    def toIterator: Iterator[A] = toStream.iterator
 
    def toStream: Stream[A] = toBuffer.toStream
 

	
 
    /** Converts this $coll to a string.
 
     *
 
     *  @return   a string representation of this collection. By default this
 
     *            string consists of the `stringPrefix` of this $coll,
 
     *            followed by all elements separated by commas and enclosed in parentheses.
 
     */
 
    override def toString = mkString(stringPrefix + "(", ", ", ")")
 

	
 
    /** Defines the prefix of this object's `toString` representation.
 
     *
 
     *  @return  a string representation which starts the result of `toString`
 
     *           applied to this $coll. By default the string prefix is the
 
     *           simple name of the collection class $coll.
 
     */
 
    def stringPrefix : String = {
 
      var string = repr.asInstanceOf[AnyRef].getClass.getName
 
      val idx1 = string.lastIndexOf('.' : Int)
 
      if (idx1 != -1) string = string.substring(idx1 + 1)
 
      val idx2 = string.indexOf('$')
 
      if (idx2 != -1) string = string.substring(0, idx2)
 
      string
 
    }
 

	
 
    /** Creates a non-strict view of this $coll.
 
     * 
 
     *  @return a non-strict view of this $coll.
 
     */
 
    def view = new TraversableView[A, Repr] {
 
      protected lazy val underlying = self.repr
 
      override def foreach[U](f: A => U) = self foreach f
 
    }
 

	
 
    /** Creates a non-strict view of a slice of this $coll.
 
     *
 
     *  Note: the difference between `view` and `slice` is that `view` produces
 
     *        a view of the current $coll, whereas `slice` produces a new $coll.
 
     * 
 
     *  Note: `view(from, to)` is equivalent to `view.slice(from, to)`
 
     *  $orderDependent
 
     * 
 
     *  @param from   the index of the first element of the view
 
     *  @param until  the index of the element following the view
 
     *  @return a non-strict view of a slice of this $coll, starting at index `from`
 
     *  and extending up to (but not including) index `until`.
 
     */
 
    def view(from: Int, until: Int): TraversableView[A, Repr] = view.slice(from, until)
 

	
 
    /** Creates a non-strict filter of this $coll.
 
     *
 
     *  Note: the difference between `c filter p` and `c withFilter p` is that
 
     *        the former creates a new collection, whereas the latter only
 
     *        restricts the domain of subsequent `map`, `flatMap`, `foreach`,
 
     *        and `withFilter` operations.
 
     *  $orderDependent
 
     * 
 
     *  @param p   the predicate used to test elements.
 
     *  @return    an object of class `WithFilter`, which supports
 
     *             `map`, `flatMap`, `foreach`, and `withFilter` operations.
 
     *             All these operations apply to those elements of this $coll which
 
     *             satisfy the predicate `p`.
 
     */
 
    def withFilter(p: A => Boolean): FilterMonadic[A, Repr] = new WithFilter(p)
 

	
 
    /** A class supporting filtered operations. Instances of this class are
 
     *  returned by method `withFilter`.
 
     */
 
    class WithFilter(p: A => Boolean) extends FilterMonadic[A, Repr] {
 

	
 
      /** Builds a new collection by applying a function to all elements of the
 
       *  outer $coll containing this `WithFilter` instance that satisfy predicate `p`.
 
       *
 
       *  @param f      the function to apply to each element.
 
       *  @tparam B     the element type of the returned collection.
 
       *  @tparam That  $thatinfo
 
       *  @param bf     $bfinfo
 
       *  @return       a new collection of type `That` resulting from applying
 
       *                the given function `f` to each element of the outer $coll
 
       *                that satisfies predicate `p` and collecting the results.
 
       *
 
       *  @usecase def map[B](f: A => B): $Coll[B] 
 
       *  
 
       *  @return       a new $coll resulting from applying the given function
 
       *                `f` to each element of the outer $coll that satisfies
 
       *                predicate `p` and collecting the results.
 
       */
 
      def map[B, That](f: A => B)(implicit bf: CanBuildFrom[Repr, B, That]): That = {
 
        val b = bf(repr)
 
        for (x <- self) 
 
          if (p(x)) b += f(x)
 
        b.result
 
      }
 

	
 
      /** Builds a new collection by applying a function to all elements of the
 
       *  outer $coll containing this `WithFilter` instance that satisfy
 
       *  predicate `p` and concatenating the results. 
 
       *
 
       *  @param f      the function to apply to each element.
 
       *  @tparam B     the element type of the returned collection.
 
       *  @tparam That  $thatinfo
 
       *  @param bf     $bfinfo
 
       *  @return       a new collection of type `That` resulting from applying
 
       *                the given collection-valued function `f` to each element
 
       *                of the outer $coll that satisfies predicate `p` and
 
       *                concatenating the results.
 
       *
 
       *  @usecase def flatMap[B](f: A => TraversableOnce[B]): $Coll[B]
 
       * 
 
       *  @return       a new $coll resulting from applying the given collection-valued function
 
       *                `f` to each element of the outer $coll that satisfies predicate `p` and concatenating the results.
 
       */
 
      def flatMap[B, That](f: A => GenTraversableOnce[B])(implicit bf: CanBuildFrom[Repr, B, That]): That = {
 
        val b = bf(repr)
 
        for (x <- self) 
 
          if (p(x)) b ++= f(x).seq
 
        b.result
 
      }
 

	
 
      /** Applies a function `f` to all elements of the outer $coll containing
 
       *  this `WithFilter` instance that satisfy predicate `p`.
 
       *
 
       *  @param  f   the function that is applied for its side-effect to every element.
 
       *              The result of function `f` is discarded.
 
       *              
 
       *  @tparam  U  the type parameter describing the result of function `f`. 
 
       *              This result will always be ignored. Typically `U` is `Unit`,
 
       *              but this is not necessary.
 
       *
 
       *  @usecase def foreach(f: A => Unit): Unit
 
       */   
 
      def foreach[U](f: A => U): Unit = 
 
        for (x <- self) 
 
          if (p(x)) f(x)
 

	
 
      /** Further refines the filter for this $coll.
 
       *
 
       *  @param q   the predicate used to test elements.
 
       *  @return    an object of class `WithFilter`, which supports
 
       *             `map`, `flatMap`, `foreach`, and `withFilter` operations.
 
       *             All these operations apply to those elements of this $coll which
 
       *             satisfy the predicate `q` in addition to the predicate `p`.
 
       */
 
      def withFilter(q: A => Boolean): WithFilter = 
 
        new WithFilter(x => p(x) && q(x))
 
    }
 

	
 
    // A helper for tails and inits.
 
    private def iterateUntilEmpty(f: Traversable[A @uV] => Traversable[A @uV]): Iterator[Repr] = {
 
      val it = Iterator.iterate(thisCollection)(f) takeWhile (x => !x.isEmpty)
 
      it ++ Iterator(Nil) map (newBuilder ++= _ result)
 
    }
 
  }
 

	
 

	
 
</textarea>
 
</form>
 

	
 
    <script>
 
      var editor = CodeMirror.fromTextArea(document.getElementById("code"), {
 
        lineNumbers: true,
 
        matchBrackets: true,
 
        theme: "ambiance",
 
        mode: "text/x-scala"
 
      });
 
    </script>
 
  </body>
 
</html>
rhodecode/public/js/mode/clojure/clojure.js
Show inline comments
 
new file 100644
 
/**
 
 * Author: Hans Engel
 
 * Branched from CodeMirror's Scheme mode (by Koh Zi Han, based on implementation by Koh Zi Chun)
 
 */
 
CodeMirror.defineMode("clojure", function () {
 
    var BUILTIN = "builtin", COMMENT = "comment", STRING = "string", CHARACTER = "string-2",
 
        ATOM = "atom", NUMBER = "number", BRACKET = "bracket", KEYWORD = "keyword";
 
    var INDENT_WORD_SKIP = 2;
 

	
 
    function makeKeywords(str) {
 
        var obj = {}, words = str.split(" ");
 
        for (var i = 0; i < words.length; ++i) obj[words[i]] = true;
 
        return obj;
 
    }
 

	
 
    var atoms = makeKeywords("true false nil");
 

	
 
    var keywords = makeKeywords(
 
      "defn defn- def def- defonce defmulti defmethod defmacro defstruct deftype defprotocol defrecord defproject deftest slice defalias defhinted defmacro- defn-memo defnk defnk defonce- defunbound defunbound- defvar defvar- let letfn do case cond condp for loop recur when when-not when-let when-first if if-let if-not . .. -> ->> doto and or dosync doseq dotimes dorun doall load import unimport ns in-ns refer try catch finally throw with-open with-local-vars binding gen-class gen-and-load-class gen-and-save-class handler-case handle");
 

	
 
    var builtins = makeKeywords(
 
        "* *' *1 *2 *3 *agent* *allow-unresolved-vars* *assert* *clojure-version* *command-line-args* *compile-files* *compile-path* *compiler-options* *data-readers* *e *err* *file* *flush-on-newline* *fn-loader* *in* *math-context* *ns* *out* *print-dup* *print-length* *print-level* *print-meta* *print-readably* *read-eval* *source-path* *unchecked-math* *use-context-classloader* *verbose-defrecords* *warn-on-reflection* + +' - -' -> ->> ->ArrayChunk ->Vec ->VecNode ->VecSeq -cache-protocol-fn -reset-methods .. / < <= = == > >= EMPTY-NODE accessor aclone add-classpath add-watch agent agent-error agent-errors aget alength alias all-ns alter alter-meta! alter-var-root amap ancestors and apply areduce array-map aset aset-boolean aset-byte aset-char aset-double aset-float aset-int aset-long aset-short assert assoc assoc! assoc-in associative? atom await await-for await1 bases bean bigdec bigint biginteger binding bit-and bit-and-not bit-clear bit-flip bit-not bit-or bit-set bit-shift-left bit-shift-right bit-test bit-xor boolean boolean-array booleans bound-fn bound-fn* bound? butlast byte byte-array bytes case cast char char-array char-escape-string char-name-string char? chars chunk chunk-append chunk-buffer chunk-cons chunk-first chunk-next chunk-rest chunked-seq? class class? clear-agent-errors clojure-version coll? comment commute comp comparator compare compare-and-set! compile complement concat cond condp conj conj! cons constantly construct-proxy contains? count counted? create-ns create-struct cycle dec dec' decimal? declare default-data-readers definline definterface defmacro defmethod defmulti defn defn- defonce defprotocol defrecord defstruct deftype delay delay? deliver denominator deref derive descendants destructure disj disj! dissoc dissoc! distinct distinct? doall dorun doseq dosync dotimes doto double double-array doubles drop drop-last drop-while empty empty? ensure enumeration-seq error-handler error-mode eval even? every-pred every? ex-data ex-info extend extend-protocol extend-type extenders extends? false? ffirst file-seq filter filterv find find-keyword find-ns find-protocol-impl find-protocol-method find-var first flatten float float-array float? floats flush fn fn? fnext fnil for force format frequencies future future-call future-cancel future-cancelled? future-done? future? gen-class gen-interface gensym get get-in get-method get-proxy-class get-thread-bindings get-validator group-by hash hash-combine hash-map hash-set identical? identity if-let if-not ifn? import in-ns inc inc' init-proxy instance? int int-array integer? interleave intern interpose into into-array ints io! isa? iterate iterator-seq juxt keep keep-indexed key keys keyword keyword? last lazy-cat lazy-seq let letfn line-seq list list* list? load load-file load-reader load-string loaded-libs locking long long-array longs loop macroexpand macroexpand-1 make-array make-hierarchy map map-indexed map? mapcat mapv max max-key memfn memoize merge merge-with meta method-sig methods min min-key mod munge name namespace namespace-munge neg? newline next nfirst nil? nnext not not-any? not-empty not-every? not= ns ns-aliases ns-imports ns-interns ns-map ns-name ns-publics ns-refers ns-resolve ns-unalias ns-unmap nth nthnext nthrest num number? numerator object-array odd? or parents partial partition partition-all partition-by pcalls peek persistent! pmap pop pop! pop-thread-bindings pos? pr pr-str prefer-method prefers primitives-classnames print print-ctor print-dup print-method print-simple print-str printf println println-str prn prn-str promise proxy proxy-call-with-super proxy-mappings proxy-name proxy-super push-thread-bindings pvalues quot rand rand-int rand-nth range ratio? rational? rationalize re-find re-groups re-matcher re-matches re-pattern re-seq read read-line read-string realized? reduce reduce-kv reductions ref ref-history-count ref-max-history ref-min-history ref-set refer refer-clojure reify release-pending-sends rem remove remove-all-methods remove-method remove-ns remove-watch repeat repeatedly replace replicate require reset! reset-meta! resolve rest restart-agent resultset-seq reverse reversible? rseq rsubseq satisfies? second select-keys send send-off seq seq? seque sequence sequential? set set-error-handler! set-error-mode! set-validator! set? short short-array shorts shuffle shutdown-agents slurp some some-fn sort sort-by sorted-map sorted-map-by sorted-set sorted-set-by sorted? special-symbol? spit split-at split-with str string? struct struct-map subs subseq subvec supers swap! symbol symbol? sync take take-last take-nth take-while test the-ns thread-bound? time to-array to-array-2d trampoline transient tree-seq true? type unchecked-add unchecked-add-int unchecked-byte unchecked-char unchecked-dec unchecked-dec-int unchecked-divide-int unchecked-double unchecked-float unchecked-inc unchecked-inc-int unchecked-int unchecked-long unchecked-multiply unchecked-multiply-int unchecked-negate unchecked-negate-int unchecked-remainder-int unchecked-short unchecked-subtract unchecked-subtract-int underive unquote unquote-splicing update-in update-proxy use val vals var-get var-set var? vary-meta vec vector vector-of vector? when when-first when-let when-not while with-bindings with-bindings* with-in-str with-loading-context with-local-vars with-meta with-open with-out-str with-precision with-redefs with-redefs-fn xml-seq zero? zipmap *default-data-reader-fn* as-> cond-> cond->> reduced reduced? send-via set-agent-send-executor! set-agent-send-off-executor! some-> some->>");
 

	
 
    var indentKeys = makeKeywords(
 
        // Built-ins
 
        "ns fn def defn defmethod bound-fn if if-not case condp when while when-not when-first do future comment doto locking proxy with-open with-precision reify deftype defrecord defprotocol extend extend-protocol extend-type try catch " +
 

	
 
        // Binding forms
 
        "let letfn binding loop for doseq dotimes when-let if-let " +
 

	
 
        // Data structures
 
        "defstruct struct-map assoc " +
 

	
 
        // clojure.test
 
        "testing deftest " +
 

	
 
        // contrib
 
        "handler-case handle dotrace deftrace");
 

	
 
    var tests = {
 
        digit: /\d/,
 
        digit_or_colon: /[\d:]/,
 
        hex: /[0-9a-f]/i,
 
        sign: /[+-]/,
 
        exponent: /e/i,
 
        keyword_char: /[^\s\(\[\;\)\]]/,
 
        symbol: /[\w*+!\-\._?:\/]/
 
    };
 

	
 
    function stateStack(indent, type, prev) { // represents a state stack object
 
        this.indent = indent;
 
        this.type = type;
 
        this.prev = prev;
 
    }
 

	
 
    function pushStack(state, indent, type) {
 
        state.indentStack = new stateStack(indent, type, state.indentStack);
 
    }
 

	
 
    function popStack(state) {
 
        state.indentStack = state.indentStack.prev;
 
    }
 

	
 
    function isNumber(ch, stream){
 
        // hex
 
        if ( ch === '0' && stream.eat(/x/i) ) {
 
            stream.eatWhile(tests.hex);
 
            return true;
 
        }
 

	
 
        // leading sign
 
        if ( ( ch == '+' || ch == '-' ) && ( tests.digit.test(stream.peek()) ) ) {
 
          stream.eat(tests.sign);
 
          ch = stream.next();
 
        }
 

	
 
        if ( tests.digit.test(ch) ) {
 
            stream.eat(ch);
 
            stream.eatWhile(tests.digit);
 

	
 
            if ( '.' == stream.peek() ) {
 
                stream.eat('.');
 
                stream.eatWhile(tests.digit);
 
            }
 

	
 
            if ( stream.eat(tests.exponent) ) {
 
                stream.eat(tests.sign);
 
                stream.eatWhile(tests.digit);
 
            }
 

	
 
            return true;
 
        }
 

	
 
        return false;
 
    }
 

	
 
    // Eat character that starts after backslash \
 
    function eatCharacter(stream) {
 
        var first = stream.next();
 
        // Read special literals: backspace, newline, space, return.
 
        // Just read all lowercase letters.
 
        if (first.match(/[a-z]/) && stream.match(/[a-z]+/, true)) {
 
            return;
 
        }
 
        // Read unicode character: \u1000 \uA0a1
 
        if (first === "u") {
 
            stream.match(/[0-9a-z]{4}/i, true);
 
        }
 
    }
 

	
 
    return {
 
        startState: function () {
 
            return {
 
                indentStack: null,
 
                indentation: 0,
 
                mode: false
 
            };
 
        },
 

	
 
        token: function (stream, state) {
 
            if (state.indentStack == null && stream.sol()) {
 
                // update indentation, but only if indentStack is empty
 
                state.indentation = stream.indentation();
 
            }
 

	
 
            // skip spaces
 
            if (stream.eatSpace()) {
 
                return null;
 
            }
 
            var returnType = null;
 

	
 
            switch(state.mode){
 
                case "string": // multi-line string parsing mode
 
                    var next, escaped = false;
 
                    while ((next = stream.next()) != null) {
 
                        if (next == "\"" && !escaped) {
 

	
 
                            state.mode = false;
 
                            break;
 
                        }
 
                        escaped = !escaped && next == "\\";
 
                    }
 
                    returnType = STRING; // continue on in string mode
 
                    break;
 
                default: // default parsing mode
 
                    var ch = stream.next();
 

	
 
                    if (ch == "\"") {
 
                        state.mode = "string";
 
                        returnType = STRING;
 
                    } else if (ch == "\\") {
 
                        eatCharacter(stream);
 
                        returnType = CHARACTER;
 
                    } else if (ch == "'" && !( tests.digit_or_colon.test(stream.peek()) )) {
 
                        returnType = ATOM;
 
                    } else if (ch == ";") { // comment
 
                        stream.skipToEnd(); // rest of the line is a comment
 
                        returnType = COMMENT;
 
                    } else if (isNumber(ch,stream)){
 
                        returnType = NUMBER;
 
                    } else if (ch == "(" || ch == "[" || ch == "{" ) {
 
                        var keyWord = '', indentTemp = stream.column(), letter;
 
                        /**
 
                        Either
 
                        (indent-word ..
 
                        (non-indent-word ..
 
                        (;something else, bracket, etc.
 
                        */
 

	
 
                        if (ch == "(") while ((letter = stream.eat(tests.keyword_char)) != null) {
 
                            keyWord += letter;
 
                        }
 

	
 
                        if (keyWord.length > 0 && (indentKeys.propertyIsEnumerable(keyWord) ||
 
                                                   /^(?:def|with)/.test(keyWord))) { // indent-word
 
                            pushStack(state, indentTemp + INDENT_WORD_SKIP, ch);
 
                        } else { // non-indent word
 
                            // we continue eating the spaces
 
                            stream.eatSpace();
 
                            if (stream.eol() || stream.peek() == ";") {
 
                                // nothing significant after
 
                                // we restart indentation 1 space after
 
                                pushStack(state, indentTemp + 1, ch);
 
                            } else {
 
                                pushStack(state, indentTemp + stream.current().length, ch); // else we match
 
                            }
 
                        }
 
                        stream.backUp(stream.current().length - 1); // undo all the eating
 

	
 
                        returnType = BRACKET;
 
                    } else if (ch == ")" || ch == "]" || ch == "}") {
 
                        returnType = BRACKET;
 
                        if (state.indentStack != null && state.indentStack.type == (ch == ")" ? "(" : (ch == "]" ? "[" :"{"))) {
 
                            popStack(state);
 
                        }
 
                    } else if ( ch == ":" ) {
 
                        stream.eatWhile(tests.symbol);
 
                        return ATOM;
 
                    } else {
 
                        stream.eatWhile(tests.symbol);
 

	
 
                        if (keywords && keywords.propertyIsEnumerable(stream.current())) {
 
                            returnType = KEYWORD;
 
                        } else if (builtins && builtins.propertyIsEnumerable(stream.current())) {
 
                            returnType = BUILTIN;
 
                        } else if (atoms && atoms.propertyIsEnumerable(stream.current())) {
 
                            returnType = ATOM;
 
                        } else returnType = null;
 
                    }
 
            }
 

	
 
            return returnType;
 
        },
 

	
 
        indent: function (state) {
 
            if (state.indentStack == null) return state.indentation;
 
            return state.indentStack.indent;
 
        },
 

	
 
        lineComment: ";;"
 
    };
 
});
 

	
 
CodeMirror.defineMIME("text/x-clojure", "clojure");
rhodecode/public/js/mode/clojure/index.html
Show inline comments
 
new file 100644
 
<!doctype html>
 
<html>
 
  <head>
 
    <meta charset="utf-8">
 
    <title>CodeMirror: Clojure mode</title>
 
    <link rel="stylesheet" href="../../lib/codemirror.css">
 
    <script src="../../lib/codemirror.js"></script>
 
    <script src="clojure.js"></script>
 
    <style>.CodeMirror {background: #f8f8f8;}</style>
 
    <link rel="stylesheet" href="../../doc/docs.css">
 
  </head>
 
  <body>
 
    <h1>CodeMirror: Clojure mode</h1>
 
    <form><textarea id="code" name="code">
 
; Conway's Game of Life, based on the work of:
 
;; Laurent Petit https://gist.github.com/1200343
 
;; Christophe Grand http://clj-me.cgrand.net/2011/08/19/conways-game-of-life
 

	
 
(ns ^{:doc "Conway's Game of Life."}
 
 game-of-life)
 

	
 
;; Core game of life's algorithm functions
 

	
 
(defn neighbours
 
  "Given a cell's coordinates, returns the coordinates of its neighbours."
 
  [[x y]]
 
  (for [dx [-1 0 1] dy (if (zero? dx) [-1 1] [-1 0 1])]
 
    [(+ dx x) (+ dy y)]))
 

	
 
(defn step
 
  "Given a set of living cells, computes the new set of living cells."
 
  [cells]
 
  (set (for [[cell n] (frequencies (mapcat neighbours cells))
 
             :when (or (= n 3) (and (= n 2) (cells cell)))]
 
         cell)))
 

	
 
;; Utility methods for displaying game on a text terminal
 

	
 
(defn print-board
 
  "Prints a board on *out*, representing a step in the game."
 
  [board w h]
 
  (doseq [x (range (inc w)) y (range (inc h))]
 
    (if (= y 0) (print "\n"))
 
    (print (if (board [x y]) "[X]" " . "))))
 

	
 
(defn display-grids
 
  "Prints a squence of boards on *out*, representing several steps."
 
  [grids w h]
 
  (doseq [board grids]
 
    (print-board board w h)
 
    (print "\n")))
 

	
 
;; Launches an example board
 

	
 
(def
 
  ^{:doc "board represents the initial set of living cells"}
 
   board #{[2 1] [2 2] [2 3]})
 

	
 
(display-grids (take 3 (iterate step board)) 5 5)
 

	
 
;; Let's play with characters
 
(println \1 \a \# \\
 
         \" \( \newline
 
         \} \" \space
 
         \tab \return \backspace
 
         \u1000 \uAaAa \u9F9F)
 

	
 
</textarea></form>
 
    <script>
 
      var editor = CodeMirror.fromTextArea(document.getElementById("code"), {});
 
    </script>
 

	
 
    <p><strong>MIME types defined:</strong> <code>text/x-clojure</code>.</p>
 

	
 
  </body>
 
</html>
rhodecode/public/js/mode/cobol/cobol.js
Show inline comments
 
new file 100644
 
/**
 
 * Author: Gautam Mehta
 
 * Branched from CodeMirror's Scheme mode
 
 */
 
CodeMirror.defineMode("cobol", function () {
 
  var BUILTIN = "builtin", COMMENT = "comment", STRING = "string",
 
      ATOM = "atom", NUMBER = "number", KEYWORD = "keyword", MODTAG = "header",
 
      COBOLLINENUM = "def", PERIOD = "link";
 
  function makeKeywords(str) {
 
    var obj = {}, words = str.split(" ");
 
    for (var i = 0; i < words.length; ++i) obj[words[i]] = true;
 
    return obj;
 
  }
 
  var atoms = makeKeywords("TRUE FALSE ZEROES ZEROS ZERO SPACES SPACE LOW-VALUE LOW-VALUES ");
 
  var keywords = makeKeywords(
 
      "ACCEPT ACCESS ACQUIRE ADD ADDRESS " +
 
      "ADVANCING AFTER ALIAS ALL ALPHABET " +
 
      "ALPHABETIC ALPHABETIC-LOWER ALPHABETIC-UPPER ALPHANUMERIC ALPHANUMERIC-EDITED " +
 
      "ALSO ALTER ALTERNATE AND ANY " +
 
      "ARE AREA AREAS ARITHMETIC ASCENDING " +
 
      "ASSIGN AT ATTRIBUTE AUTHOR AUTO " +
 
      "AUTO-SKIP AUTOMATIC B-AND B-EXOR B-LESS " +
 
      "B-NOT B-OR BACKGROUND-COLOR BACKGROUND-COLOUR BEEP " +
 
      "BEFORE BELL BINARY BIT BITS " +
 
      "BLANK BLINK BLOCK BOOLEAN BOTTOM " +
 
      "BY CALL CANCEL CD CF " +
 
      "CH CHARACTER CHARACTERS CLASS CLOCK-UNITS " +
 
      "CLOSE COBOL CODE CODE-SET COL " +
 
      "COLLATING COLUMN COMMA COMMIT COMMITMENT " +
 
      "COMMON COMMUNICATION COMP COMP-0 COMP-1 " +
 
      "COMP-2 COMP-3 COMP-4 COMP-5 COMP-6 " +
 
      "COMP-7 COMP-8 COMP-9 COMPUTATIONAL COMPUTATIONAL-0 " +
 
      "COMPUTATIONAL-1 COMPUTATIONAL-2 COMPUTATIONAL-3 COMPUTATIONAL-4 COMPUTATIONAL-5 " +
 
      "COMPUTATIONAL-6 COMPUTATIONAL-7 COMPUTATIONAL-8 COMPUTATIONAL-9 COMPUTE " +
 
      "CONFIGURATION CONNECT CONSOLE CONTAINED CONTAINS " +
 
      "CONTENT CONTINUE CONTROL CONTROL-AREA CONTROLS " +
 
      "CONVERTING COPY CORR CORRESPONDING COUNT " +
 
      "CRT CRT-UNDER CURRENCY CURRENT CURSOR " +
 
      "DATA DATE DATE-COMPILED DATE-WRITTEN DAY " +
 
      "DAY-OF-WEEK DB DB-ACCESS-CONTROL-KEY DB-DATA-NAME DB-EXCEPTION " +
 
      "DB-FORMAT-NAME DB-RECORD-NAME DB-SET-NAME DB-STATUS DBCS " +
 
      "DBCS-EDITED DE DEBUG-CONTENTS DEBUG-ITEM DEBUG-LINE " +
 
      "DEBUG-NAME DEBUG-SUB-1 DEBUG-SUB-2 DEBUG-SUB-3 DEBUGGING " +
 
      "DECIMAL-POINT DECLARATIVES DEFAULT DELETE DELIMITED " +
 
      "DELIMITER DEPENDING DESCENDING DESCRIBED DESTINATION " +
 
      "DETAIL DISABLE DISCONNECT DISPLAY DISPLAY-1 " +
 
      "DISPLAY-2 DISPLAY-3 DISPLAY-4 DISPLAY-5 DISPLAY-6 " +
 
      "DISPLAY-7 DISPLAY-8 DISPLAY-9 DIVIDE DIVISION " +
 
      "DOWN DROP DUPLICATE DUPLICATES DYNAMIC " +
 
      "EBCDIC EGI EJECT ELSE EMI " +
 
      "EMPTY EMPTY-CHECK ENABLE END END. END-ACCEPT END-ACCEPT. " +
 
      "END-ADD END-CALL END-COMPUTE END-DELETE END-DISPLAY " +
 
      "END-DIVIDE END-EVALUATE END-IF END-INVOKE END-MULTIPLY " +
 
      "END-OF-PAGE END-PERFORM END-READ END-RECEIVE END-RETURN " +
 
      "END-REWRITE END-SEARCH END-START END-STRING END-SUBTRACT " +
 
      "END-UNSTRING END-WRITE END-XML ENTER ENTRY " +
 
      "ENVIRONMENT EOP EQUAL EQUALS ERASE " +
 
      "ERROR ESI EVALUATE EVERY EXCEEDS " +
 
      "EXCEPTION EXCLUSIVE EXIT EXTEND EXTERNAL " +
 
      "EXTERNALLY-DESCRIBED-KEY FD FETCH FILE FILE-CONTROL " +
 
      "FILE-STREAM FILES FILLER FINAL FIND " +
 
      "FINISH FIRST FOOTING FOR FOREGROUND-COLOR " +
 
      "FOREGROUND-COLOUR FORMAT FREE FROM FULL " +
 
      "FUNCTION GENERATE GET GIVING GLOBAL " +
 
      "GO GOBACK GREATER GROUP HEADING " +
 
      "HIGH-VALUE HIGH-VALUES HIGHLIGHT I-O I-O-CONTROL " +
 
      "ID IDENTIFICATION IF IN INDEX " +
 
      "INDEX-1 INDEX-2 INDEX-3 INDEX-4 INDEX-5 " +
 
      "INDEX-6 INDEX-7 INDEX-8 INDEX-9 INDEXED " +
 
      "INDIC INDICATE INDICATOR INDICATORS INITIAL " +
 
      "INITIALIZE INITIATE INPUT INPUT-OUTPUT INSPECT " +
 
      "INSTALLATION INTO INVALID INVOKE IS " +
 
      "JUST JUSTIFIED KANJI KEEP KEY " +
 
      "LABEL LAST LD LEADING LEFT " +
 
      "LEFT-JUSTIFY LENGTH LENGTH-CHECK LESS LIBRARY " +
 
      "LIKE LIMIT LIMITS LINAGE LINAGE-COUNTER " +
 
      "LINE LINE-COUNTER LINES LINKAGE LOCAL-STORAGE " +
 
      "LOCALE LOCALLY LOCK " +
 
      "MEMBER MEMORY MERGE MESSAGE METACLASS " +
 
      "MODE MODIFIED MODIFY MODULES MOVE " +
 
      "MULTIPLE MULTIPLY NATIONAL NATIVE NEGATIVE " +
 
      "NEXT NO NO-ECHO NONE NOT " +
 
      "NULL NULL-KEY-MAP NULL-MAP NULLS NUMBER " +
 
      "NUMERIC NUMERIC-EDITED OBJECT OBJECT-COMPUTER OCCURS " +
 
      "OF OFF OMITTED ON ONLY " +
 
      "OPEN OPTIONAL OR ORDER ORGANIZATION " +
 
      "OTHER OUTPUT OVERFLOW OWNER PACKED-DECIMAL " +
 
      "PADDING PAGE PAGE-COUNTER PARSE PERFORM " +
 
      "PF PH PIC PICTURE PLUS " +
 
      "POINTER POSITION POSITIVE PREFIX PRESENT " +
 
      "PRINTING PRIOR PROCEDURE PROCEDURE-POINTER PROCEDURES " +
 
      "PROCEED PROCESS PROCESSING PROGRAM PROGRAM-ID " +
 
      "PROMPT PROTECTED PURGE QUEUE QUOTE " +
 
      "QUOTES RANDOM RD READ READY " +
 
      "REALM RECEIVE RECONNECT RECORD RECORD-NAME " +
 
      "RECORDS RECURSIVE REDEFINES REEL REFERENCE " +
 
      "REFERENCE-MONITOR REFERENCES RELATION RELATIVE RELEASE " +
 
      "REMAINDER REMOVAL RENAMES REPEATED REPLACE " +
 
      "REPLACING REPORT REPORTING REPORTS REPOSITORY " +
 
      "REQUIRED RERUN RESERVE RESET RETAINING " +
 
      "RETRIEVAL RETURN RETURN-CODE RETURNING REVERSE-VIDEO " +
 
      "REVERSED REWIND REWRITE RF RH " +
 
      "RIGHT RIGHT-JUSTIFY ROLLBACK ROLLING ROUNDED " +
 
      "RUN SAME SCREEN SD SEARCH " +
 
      "SECTION SECURE SECURITY SEGMENT SEGMENT-LIMIT " +
 
      "SELECT SEND SENTENCE SEPARATE SEQUENCE " +
 
      "SEQUENTIAL SET SHARED SIGN SIZE " +
 
      "SKIP1 SKIP2 SKIP3 SORT SORT-MERGE " +
 
      "SORT-RETURN SOURCE SOURCE-COMPUTER SPACE-FILL " +
 
      "SPECIAL-NAMES STANDARD STANDARD-1 STANDARD-2 " +
 
      "START STARTING STATUS STOP STORE " +
 
      "STRING SUB-QUEUE-1 SUB-QUEUE-2 SUB-QUEUE-3 SUB-SCHEMA " +
 
      "SUBFILE SUBSTITUTE SUBTRACT SUM SUPPRESS " +
 
      "SYMBOLIC SYNC SYNCHRONIZED SYSIN SYSOUT " +
 
      "TABLE TALLYING TAPE TENANT TERMINAL " +
 
      "TERMINATE TEST TEXT THAN THEN " +
 
      "THROUGH THRU TIME TIMES TITLE " +
 
      "TO TOP TRAILING TRAILING-SIGN TRANSACTION " +
 
      "TYPE TYPEDEF UNDERLINE UNEQUAL UNIT " +
 
      "UNSTRING UNTIL UP UPDATE UPON " +
 
      "USAGE USAGE-MODE USE USING VALID " +
 
      "VALIDATE VALUE VALUES VARYING VLR " +
 
      "WAIT WHEN WHEN-COMPILED WITH WITHIN " +
 
      "WORDS WORKING-STORAGE WRITE XML XML-CODE " +
 
      "XML-EVENT XML-NTEXT XML-TEXT ZERO ZERO-FILL " );
 

	
 
  var builtins = makeKeywords("- * ** / + < <= = > >= ");
 
  var tests = {
 
    digit: /\d/,
 
    digit_or_colon: /[\d:]/,
 
    hex: /[0-9a-f]/i,
 
    sign: /[+-]/,
 
    exponent: /e/i,
 
    keyword_char: /[^\s\(\[\;\)\]]/,
 
    symbol: /[\w*+\-]/
 
  };
 
  function isNumber(ch, stream){
 
    // hex
 
    if ( ch === '0' && stream.eat(/x/i) ) {
 
      stream.eatWhile(tests.hex);
 
      return true;
 
    }
 
    // leading sign
 
    if ( ( ch == '+' || ch == '-' ) && ( tests.digit.test(stream.peek()) ) ) {
 
      stream.eat(tests.sign);
 
      ch = stream.next();
 
    }
 
    if ( tests.digit.test(ch) ) {
 
      stream.eat(ch);
 
      stream.eatWhile(tests.digit);
 
      if ( '.' == stream.peek()) {
 
        stream.eat('.');
 
        stream.eatWhile(tests.digit);
 
      }
 
      if ( stream.eat(tests.exponent) ) {
 
        stream.eat(tests.sign);
 
        stream.eatWhile(tests.digit);
 
      }
 
      return true;
 
    }
 
    return false;
 
  }
 
  return {
 
    startState: function () {
 
      return {
 
        indentStack: null,
 
        indentation: 0,
 
        mode: false
 
      };
 
    },
 
    token: function (stream, state) {
 
      if (state.indentStack == null && stream.sol()) {
 
        // update indentation, but only if indentStack is empty
 
        state.indentation = 6 ; //stream.indentation();
 
      }
 
      // skip spaces
 
      if (stream.eatSpace()) {
 
        return null;
 
      }
 
      var returnType = null;
 
      switch(state.mode){
 
      case "string": // multi-line string parsing mode
 
        var next = false;
 
        while ((next = stream.next()) != null) {
 
          if (next == "\"" || next == "\'") {
 
            state.mode = false;
 
            break;
 
          }
 
        }
 
        returnType = STRING; // continue on in string mode
 
        break;
 
      default: // default parsing mode
 
        var ch = stream.next();
 
        var col = stream.column();
 
        if (col >= 0 && col <= 5) {
 
          returnType = COBOLLINENUM;
 
        } else if (col >= 72 && col <= 79) {
 
          stream.skipToEnd();
 
          returnType = MODTAG;
 
        } else if (ch == "*" && col == 6) { // comment
 
          stream.skipToEnd(); // rest of the line is a comment
 
          returnType = COMMENT;
 
        } else if (ch == "\"" || ch == "\'") {
 
          state.mode = "string";
 
          returnType = STRING;
 
        } else if (ch == "'" && !( tests.digit_or_colon.test(stream.peek()) )) {
 
          returnType = ATOM;
 
        } else if (ch == ".") {
 
          returnType = PERIOD;
 
        } else if (isNumber(ch,stream)){
 
          returnType = NUMBER;
 
        } else {
 
          if (stream.current().match(tests.symbol)) {
 
            while (col < 71) {
 
              if (stream.eat(tests.symbol) === undefined) {
 
                break;
 
              } else {
 
                col++;
 
              }
 
            }
 
          }
 
          if (keywords && keywords.propertyIsEnumerable(stream.current().toUpperCase())) {
 
            returnType = KEYWORD;
 
          } else if (builtins && builtins.propertyIsEnumerable(stream.current().toUpperCase())) {
 
            returnType = BUILTIN;
 
          } else if (atoms && atoms.propertyIsEnumerable(stream.current().toUpperCase())) {
 
            returnType = ATOM;
 
          } else returnType = null;
 
        }
 
      }
 
      return returnType;
 
    },
 
    indent: function (state) {
 
      if (state.indentStack == null) return state.indentation;
 
      return state.indentStack.indent;
 
    }
 
  };
 
});
 

	
 
CodeMirror.defineMIME("text/x-cobol", "cobol");
rhodecode/public/js/mode/cobol/index.html
Show inline comments
 
new file 100644
 
<!doctype html>
 
<html>
 
  <head>
 
    <meta charset="utf-8">
 
    <title>CodeMirror: COBOL mode</title>
 
    <link rel="stylesheet" href="../../lib/codemirror.css">
 
    <script src="../../lib/codemirror.js"></script>
 
    <script src="../../addon/edit/matchbrackets.js"></script>
 
    <script src="cobol.js"></script>
 
    <link rel="stylesheet" href="../../theme/neat.css">
 
    <link rel="stylesheet" href="../../theme/elegant.css">
 
    <link rel="stylesheet" href="../../theme/erlang-dark.css">
 
    <link rel="stylesheet" href="../../theme/night.css">
 
    <link rel="stylesheet" href="../../theme/monokai.css">
 
    <link rel="stylesheet" href="../../theme/cobalt.css">
 
    <link rel="stylesheet" href="../../theme/eclipse.css">
 
    <link rel="stylesheet" href="../../theme/rubyblue.css">
 
    <link rel="stylesheet" href="../../theme/lesser-dark.css">
 
    <link rel="stylesheet" href="../../theme/xq-dark.css">
 
    <link rel="stylesheet" href="../../theme/xq-light.css">
 
    <link rel="stylesheet" href="../../theme/ambiance.css">
 
    <link rel="stylesheet" href="../../theme/blackboard.css">
 
    <link rel="stylesheet" href="../../theme/vibrant-ink.css">
 
    <link rel="stylesheet" href="../../theme/solarized.css">
 
    <link rel="stylesheet" href="../../theme/twilight.css">
 
    <link rel="stylesheet" href="../../theme/midnight.css">
 
    <link rel="stylesheet" href="../../addon/dialog/dialog.css">
 
    <script src="../../addon/selection/active-line.js"></script>
 
    <script src="../../addon/search/search.js"></script>
 
    <script src="../../addon/dialog/dialog.js"></script>
 
    <script src="../../addon/search/searchcursor.js"></script>
 
    <style>
 
        .CodeMirror {
 
          border: 1px solid #eee;
 
          font-size : 20px;
 
          height : auto !important;
 
        }
 
        .CodeMirror-activeline-background {background: #555555 !important;}
 
    </style>
 
  </head>
 
  <body>
 
    <p> Select Theme <select onchange="selectTheme()" id="selectTheme">
 
        <option>default</option>
 
        <option>ambiance</option>
 
        <option>blackboard</option>
 
        <option>cobalt</option>
 
        <option>eclipse</option>
 
        <option>elegant</option>
 
        <option>erlang-dark</option>
 
        <option>lesser-dark</option>
 
        <option>midnight</option>
 
        <option>monokai</option>
 
        <option>neat</option>
 
        <option>night</option>
 
        <option>rubyblue</option>
 
        <option>solarized dark</option>
 
        <option>solarized light</option>
 
        <option selected>twilight</option>
 
        <option>vibrant-ink</option>
 
        <option>xq-dark</option>
 
        <option>xq-light</option>
 
    </select>    Select Font Size <select onchange="selectFontsize()" id="selectFontSize">
 
          <option value="13px">13px</option>
 
          <option value="14px">14px</option>
 
          <option value="16px">16px</option>
 
          <option value="18px">18px</option>
 
          <option value="20px" selected="selected">20px</option>
 
          <option value="24px">24px</option>
 
          <option value="26px">26px</option>
 
          <option value="28px">28px</option>
 
          <option value="30px">30px</option>
 
          <option value="32px">32px</option>
 
          <option value="34px">34px</option>
 
          <option value="36px">36px</option>
 
        </select>
 
<label for="checkBoxReadOnly">Read-only</label>
 
<input type="checkbox" id="checkBoxReadOnly" onchange="selectReadOnly()">
 
<label for="id_tabToIndentSpace">Insert Spaces on Tab</label>
 
<input type="checkbox" id="id_tabToIndentSpace" onchange="tabToIndentSpace()">
 
</p>
 
<textarea id="code" name="code">
 
---------1---------2---------3---------4---------5---------6---------7---------8
 
12345678911234567892123456789312345678941234567895123456789612345678971234567898
 
000010 IDENTIFICATION DIVISION.                                        MODTGHERE
 
000020 PROGRAM-ID.       SAMPLE.
 
000030 AUTHOR.           TEST SAM. 
 
000040 DATE-WRITTEN.     5 February 2013
 
000041
 
000042* A sample program just to show the form.
 
000043* The program copies its input to the output,
 
000044* and counts the number of records.
 
000045* At the end this number is printed.
 
000046
 
000050 ENVIRONMENT DIVISION.
 
000060 INPUT-OUTPUT SECTION.
 
000070 FILE-CONTROL.
 
000080     SELECT STUDENT-FILE     ASSIGN TO SYSIN
 
000090         ORGANIZATION IS LINE SEQUENTIAL.
 
000100     SELECT PRINT-FILE       ASSIGN TO SYSOUT
 
000110         ORGANIZATION IS LINE SEQUENTIAL.
 
000120
 
000130 DATA DIVISION.
 
000140 FILE SECTION.
 
000150 FD  STUDENT-FILE
 
000160     RECORD CONTAINS 43 CHARACTERS
 
000170     DATA RECORD IS STUDENT-IN.
 
000180 01  STUDENT-IN              PIC X(43).
 
000190
 
000200 FD  PRINT-FILE
 
000210     RECORD CONTAINS 80 CHARACTERS
 
000220     DATA RECORD IS PRINT-LINE.
 
000230 01  PRINT-LINE              PIC X(80).
 
000240
 
000250 WORKING-STORAGE SECTION.
 
000260 01  DATA-REMAINS-SWITCH     PIC X(2)      VALUE SPACES.
 
000261 01  RECORDS-WRITTEN         PIC 99.
 
000270
 
000280 01  DETAIL-LINE.
 
000290     05  FILLER              PIC X(7)      VALUE SPACES.
 
000300     05  RECORD-IMAGE        PIC X(43).
 
000310     05  FILLER              PIC X(30)     VALUE SPACES.
 
000311 
 
000312 01  SUMMARY-LINE.
 
000313     05  FILLER              PIC X(7)      VALUE SPACES.
 
000314     05  TOTAL-READ          PIC 99.
 
000315     05  FILLER              PIC X         VALUE SPACE.
 
000316     05  FILLER              PIC X(17)     
 
000317                 VALUE  'Records were read'.
 
000318     05  FILLER              PIC X(53)     VALUE SPACES.
 
000319
 
000320 PROCEDURE DIVISION.
 
000321
 
000330 PREPARE-SENIOR-REPORT.
 
000340     OPEN INPUT  STUDENT-FILE
 
000350          OUTPUT PRINT-FILE.
 
000351     MOVE ZERO TO RECORDS-WRITTEN.
 
000360     READ STUDENT-FILE
 
000370         AT END MOVE 'NO' TO DATA-REMAINS-SWITCH
 
000380     END-READ.
 
000390     PERFORM PROCESS-RECORDS
 
000410         UNTIL DATA-REMAINS-SWITCH = 'NO'.
 
000411     PERFORM PRINT-SUMMARY.
 
000420     CLOSE STUDENT-FILE
 
000430           PRINT-FILE.
 
000440     STOP RUN.
 
000450
 
000460 PROCESS-RECORDS.
 
000470     MOVE STUDENT-IN TO RECORD-IMAGE.
 
000480     MOVE DETAIL-LINE TO PRINT-LINE.
 
000490     WRITE PRINT-LINE.
 
000500     ADD 1 TO RECORDS-WRITTEN.
 
000510     READ STUDENT-FILE
 
000520         AT END MOVE 'NO' TO DATA-REMAINS-SWITCH
 
000530     END-READ. 
 
000540
 
000550 PRINT-SUMMARY.
 
000560     MOVE RECORDS-WRITTEN TO TOTAL-READ.
 
000570     MOVE SUMMARY-LINE TO PRINT-LINE.
 
000571     WRITE PRINT-LINE. 
 
000572
 
000580
 
</textarea>
 
    <script>
 
      var editor = CodeMirror.fromTextArea(document.getElementById("code"), {
 
        lineNumbers: true,
 
        matchBrackets: true,
 
        mode: "text/x-cobol",
 
        theme : "twilight",
 
        styleActiveLine: true,
 
        showCursorWhenSelecting : true,  
 
      });
 
      function selectTheme() {
 
        var themeInput = document.getElementById("selectTheme");
 
        var theme = themeInput.options[themeInput.selectedIndex].innerHTML;
 
        editor.setOption("theme", theme);
 
      }
 
      function selectFontsize() {
 
        var fontSizeInput = document.getElementById("selectFontSize");
 
        var fontSize = fontSizeInput.options[fontSizeInput.selectedIndex].innerHTML;
 
        editor.getWrapperElement().style["font-size"] = fontSize;
 
        editor.refresh();
 
      }
 
      function selectReadOnly() {
 
        editor.setOption("readOnly", document.getElementById("checkBoxReadOnly").checked);
 
      }
 
      function tabToIndentSpace() {
 
        if (document.getElementById("id_tabToIndentSpace").checked) {
 
            editor.setOption("extraKeys", {Tab: function(cm) { cm.replaceSelection("    ", "end"); }});
 
        } else {
 
            editor.setOption("extraKeys", {Tab: function(cm) { cm.replaceSelection("    ", "end"); }});
 
        }
 
      }
 
    </script>
 
  </body>
 
</html>
rhodecode/public/js/mode/coffeescript/LICENSE
Show inline comments
 
new file 100644
 
The MIT License
 

	
 
Copyright (c) 2011 Jeff Pickhardt
 
Modified from the Python CodeMirror mode, Copyright (c) 2010 Timothy Farrell
 

	
 
Permission is hereby granted, free of charge, to any person obtaining a copy
 
of this software and associated documentation files (the "Software"), to deal
 
in the Software without restriction, including without limitation the rights
 
to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 
copies of the Software, and to permit persons to whom the Software is
 
furnished to do so, subject to the following conditions:
 

	
 
The above copyright notice and this permission notice shall be included in
 
all copies or substantial portions of the Software.
 

	
 
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
 
AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 
OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 
THE SOFTWARE.
 
\ No newline at end of file
rhodecode/public/js/mode/coffeescript/coffeescript.js
Show inline comments
 
new file 100644
 
/**
 
 * Link to the project's GitHub page:
 
 * https://github.com/pickhardt/coffeescript-codemirror-mode
 
 */
 
CodeMirror.defineMode('coffeescript', function(conf) {
 
    var ERRORCLASS = 'error';
 

	
 
    function wordRegexp(words) {
 
        return new RegExp("^((" + words.join(")|(") + "))\\b");
 
    }
 

	
 
    var singleOperators = new RegExp("^[\\+\\-\\*/%&|\\^~<>!\?]");
 
    var singleDelimiters = new RegExp('^[\\(\\)\\[\\]\\{\\},:`=;\\.]');
 
    var doubleOperators = new RegExp("^((\->)|(\=>)|(\\+\\+)|(\\+\\=)|(\\-\\-)|(\\-\\=)|(\\*\\*)|(\\*\\=)|(\\/\\/)|(\\/\\=)|(==)|(!=)|(<=)|(>=)|(<>)|(<<)|(>>)|(//))");
 
    var doubleDelimiters = new RegExp("^((\\.\\.)|(\\+=)|(\\-=)|(\\*=)|(%=)|(/=)|(&=)|(\\|=)|(\\^=))");
 
    var tripleDelimiters = new RegExp("^((\\.\\.\\.)|(//=)|(>>=)|(<<=)|(\\*\\*=))");
 
    var identifiers = new RegExp("^[_A-Za-z$][_A-Za-z$0-9]*");
 
    var properties = new RegExp("^(@|this\.)[_A-Za-z$][_A-Za-z$0-9]*");
 

	
 
    var wordOperators = wordRegexp(['and', 'or', 'not',
 
                                    'is', 'isnt', 'in',
 
                                    'instanceof', 'typeof']);
 
    var indentKeywords = ['for', 'while', 'loop', 'if', 'unless', 'else',
 
                          'switch', 'try', 'catch', 'finally', 'class'];
 
    var commonKeywords = ['break', 'by', 'continue', 'debugger', 'delete',
 
                          'do', 'in', 'of', 'new', 'return', 'then',
 
                          'this', 'throw', 'when', 'until'];
 

	
 
    var keywords = wordRegexp(indentKeywords.concat(commonKeywords));
 

	
 
    indentKeywords = wordRegexp(indentKeywords);
 

	
 

	
 
    var stringPrefixes = new RegExp("^('{3}|\"{3}|['\"])");
 
    var regexPrefixes = new RegExp("^(/{3}|/)");
 
    var commonConstants = ['Infinity', 'NaN', 'undefined', 'null', 'true', 'false', 'on', 'off', 'yes', 'no'];
 
    var constants = wordRegexp(commonConstants);
 

	
 
    // Tokenizers
 
    function tokenBase(stream, state) {
 
        // Handle scope changes
 
        if (stream.sol()) {
 
            var scopeOffset = state.scopes[0].offset;
 
            if (stream.eatSpace()) {
 
                var lineOffset = stream.indentation();
 
                if (lineOffset > scopeOffset) {
 
                    return 'indent';
 
                } else if (lineOffset < scopeOffset) {
 
                    return 'dedent';
 
                }
 
                return null;
 
            } else {
 
                if (scopeOffset > 0) {
 
                    dedent(stream, state);
 
                }
 
            }
 
        }
 
        if (stream.eatSpace()) {
 
            return null;
 
        }
 

	
 
        var ch = stream.peek();
 

	
 
        // Handle docco title comment (single line)
 
        if (stream.match("####")) {
 
            stream.skipToEnd();
 
            return 'comment';
 
        }
 

	
 
        // Handle multi line comments
 
        if (stream.match("###")) {
 
            state.tokenize = longComment;
 
            return state.tokenize(stream, state);
 
        }
 

	
 
        // Single line comment
 
        if (ch === '#') {
 
            stream.skipToEnd();
 
            return 'comment';
 
        }
 

	
 
        // Handle number literals
 
        if (stream.match(/^-?[0-9\.]/, false)) {
 
            var floatLiteral = false;
 
            // Floats
 
            if (stream.match(/^-?\d*\.\d+(e[\+\-]?\d+)?/i)) {
 
              floatLiteral = true;
 
            }
 
            if (stream.match(/^-?\d+\.\d*/)) {
 
              floatLiteral = true;
 
            }
 
            if (stream.match(/^-?\.\d+/)) {
 
              floatLiteral = true;
 
            }
 

	
 
            if (floatLiteral) {
 
                // prevent from getting extra . on 1..
 
                if (stream.peek() == "."){
 
                    stream.backUp(1);
 
                }
 
                return 'number';
 
            }
 
            // Integers
 
            var intLiteral = false;
 
            // Hex
 
            if (stream.match(/^-?0x[0-9a-f]+/i)) {
 
              intLiteral = true;
 
            }
 
            // Decimal
 
            if (stream.match(/^-?[1-9]\d*(e[\+\-]?\d+)?/)) {
 
                intLiteral = true;
 
            }
 
            // Zero by itself with no other piece of number.
 
            if (stream.match(/^-?0(?![\dx])/i)) {
 
              intLiteral = true;
 
            }
 
            if (intLiteral) {
 
                return 'number';
 
            }
 
        }
 

	
 
        // Handle strings
 
        if (stream.match(stringPrefixes)) {
 
            state.tokenize = tokenFactory(stream.current(), 'string');
 
            return state.tokenize(stream, state);
 
        }
 
        // Handle regex literals
 
        if (stream.match(regexPrefixes)) {
 
            if (stream.current() != '/' || stream.match(/^.*\//, false)) { // prevent highlight of division
 
                state.tokenize = tokenFactory(stream.current(), 'string-2');
 
                return state.tokenize(stream, state);
 
            } else {
 
                stream.backUp(1);
 
            }
 
        }
 

	
 
        // Handle operators and delimiters
 
        if (stream.match(tripleDelimiters) || stream.match(doubleDelimiters)) {
 
            return 'punctuation';
 
        }
 
        if (stream.match(doubleOperators)
 
            || stream.match(singleOperators)
 
            || stream.match(wordOperators)) {
 
            return 'operator';
 
        }
 
        if (stream.match(singleDelimiters)) {
 
            return 'punctuation';
 
        }
 

	
 
        if (stream.match(constants)) {
 
            return 'atom';
 
        }
 

	
 
        if (stream.match(keywords)) {
 
            return 'keyword';
 
        }
 

	
 
        if (stream.match(identifiers)) {
 
            return 'variable';
 
        }
 

	
 
        if (stream.match(properties)) {
 
            return 'property';
 
        }
 

	
 
        // Handle non-detected items
 
        stream.next();
 
        return ERRORCLASS;
 
    }
 

	
 
    function tokenFactory(delimiter, outclass) {
 
        var singleline = delimiter.length == 1;
 
        return function(stream, state) {
 
            while (!stream.eol()) {
 
                stream.eatWhile(/[^'"\/\\]/);
 
                if (stream.eat('\\')) {
 
                    stream.next();
 
                    if (singleline && stream.eol()) {
 
                        return outclass;
 
                    }
 
                } else if (stream.match(delimiter)) {
 
                    state.tokenize = tokenBase;
 
                    return outclass;
 
                } else {
 
                    stream.eat(/['"\/]/);
 
                }
 
            }
 
            if (singleline) {
 
                if (conf.mode.singleLineStringErrors) {
 
                    outclass = ERRORCLASS;
 
                } else {
 
                    state.tokenize = tokenBase;
 
                }
 
            }
 
            return outclass;
 
        };
 
    }
 

	
 
    function longComment(stream, state) {
 
        while (!stream.eol()) {
 
            stream.eatWhile(/[^#]/);
 
            if (stream.match("###")) {
 
                state.tokenize = tokenBase;
 
                break;
 
            }
 
            stream.eatWhile("#");
 
        }
 
        return "comment";
 
    }
 

	
 
    function indent(stream, state, type) {
 
        type = type || 'coffee';
 
        var indentUnit = 0;
 
        if (type === 'coffee') {
 
            for (var i = 0; i < state.scopes.length; i++) {
 
                if (state.scopes[i].type === 'coffee') {
 
                    indentUnit = state.scopes[i].offset + conf.indentUnit;
 
                    break;
 
                }
 
            }
 
        } else {
 
            indentUnit = stream.column() + stream.current().length;
 
        }
 
        state.scopes.unshift({
 
            offset: indentUnit,
 
            type: type
 
        });
 
    }
 

	
 
    function dedent(stream, state) {
 
        if (state.scopes.length == 1) return;
 
        if (state.scopes[0].type === 'coffee') {
 
            var _indent = stream.indentation();
 
            var _indent_index = -1;
 
            for (var i = 0; i < state.scopes.length; ++i) {
 
                if (_indent === state.scopes[i].offset) {
 
                    _indent_index = i;
 
                    break;
 
                }
 
            }
 
            if (_indent_index === -1) {
 
                return true;
 
            }
 
            while (state.scopes[0].offset !== _indent) {
 
                state.scopes.shift();
 
            }
 
            return false;
 
        } else {
 
            state.scopes.shift();
 
            return false;
 
        }
 
    }
 

	
 
    function tokenLexer(stream, state) {
 
        var style = state.tokenize(stream, state);
 
        var current = stream.current();
 

	
 
        // Handle '.' connected identifiers
 
        if (current === '.') {
 
            style = state.tokenize(stream, state);
 
            current = stream.current();
 
            if (style === 'variable') {
 
                return 'variable';
 
            } else {
 
                return ERRORCLASS;
 
            }
 
        }
 

	
 
        // Handle scope changes.
 
        if (current === 'return') {
 
            state.dedent += 1;
 
        }
 
        if (((current === '->' || current === '=>') &&
 
                  !state.lambda &&
 
                  state.scopes[0].type == 'coffee' &&
 
                  stream.peek() === '')
 
               || style === 'indent') {
 
            indent(stream, state);
 
        }
 
        var delimiter_index = '[({'.indexOf(current);
 
        if (delimiter_index !== -1) {
 
            indent(stream, state, '])}'.slice(delimiter_index, delimiter_index+1));
 
        }
 
        if (indentKeywords.exec(current)){
 
            indent(stream, state);
 
        }
 
        if (current == 'then'){
 
            dedent(stream, state);
 
        }
 

	
 

	
 
        if (style === 'dedent') {
 
            if (dedent(stream, state)) {
 
                return ERRORCLASS;
 
            }
 
        }
 
        delimiter_index = '])}'.indexOf(current);
 
        if (delimiter_index !== -1) {
 
            if (dedent(stream, state)) {
 
                return ERRORCLASS;
 
            }
 
        }
 
        if (state.dedent > 0 && stream.eol() && state.scopes[0].type == 'coffee') {
 
            if (state.scopes.length > 1) state.scopes.shift();
 
            state.dedent -= 1;
 
        }
 

	
 
        return style;
 
    }
 

	
 
    var external = {
 
        startState: function(basecolumn) {
 
            return {
 
              tokenize: tokenBase,
 
              scopes: [{offset:basecolumn || 0, type:'coffee'}],
 
              lastToken: null,
 
              lambda: false,
 
              dedent: 0
 
          };
 
        },
 

	
 
        token: function(stream, state) {
 
            var style = tokenLexer(stream, state);
 

	
 
            state.lastToken = {style:style, content: stream.current()};
 

	
 
            if (stream.eol() && stream.lambda) {
 
                state.lambda = false;
 
            }
 

	
 
            return style;
 
        },
 

	
 
        indent: function(state) {
 
            if (state.tokenize != tokenBase) {
 
                return 0;
 
            }
 

	
 
            return state.scopes[0].offset;
 
        },
 

	
 
        lineComment: "#"
 
    };
 
    return external;
 
});
 

	
 
CodeMirror.defineMIME('text/x-coffeescript', 'coffeescript');
rhodecode/public/js/mode/coffeescript/index.html
Show inline comments
 
new file 100644
 
<!doctype html>
 
<html>
 
  <head>
 
    <meta charset="utf-8">
 
    <title>CodeMirror: CoffeeScript mode</title>
 
    <link rel="stylesheet" href="../../lib/codemirror.css">
 
    <script src="../../lib/codemirror.js"></script>
 
    <script src="coffeescript.js"></script>
 
    <style>.CodeMirror {border-top: 1px solid silver; border-bottom: 1px solid silver;}</style>
 
    <link rel="stylesheet" href="../../doc/docs.css">
 
  </head>
 
  <body>
 
    <h1>CodeMirror: CoffeeScript mode</h1>
 
    <form><textarea id="code" name="code">
 
# CoffeeScript mode for CodeMirror
 
# Copyright (c) 2011 Jeff Pickhardt, released under
 
# the MIT License.
 
#
 
# Modified from the Python CodeMirror mode, which also is 
 
# under the MIT License Copyright (c) 2010 Timothy Farrell.
 
#
 
# The following script, Underscore.coffee, is used to 
 
# demonstrate CoffeeScript mode for CodeMirror.
 
#
 
# To download CoffeeScript mode for CodeMirror, go to:
 
# https://github.com/pickhardt/coffeescript-codemirror-mode
 

	
 
# **Underscore.coffee
 
# (c) 2011 Jeremy Ashkenas, DocumentCloud Inc.**
 
# Underscore is freely distributable under the terms of the
 
# [MIT license](http://en.wikipedia.org/wiki/MIT_License).
 
# Portions of Underscore are inspired by or borrowed from
 
# [Prototype.js](http://prototypejs.org/api), Oliver Steele's
 
# [Functional](http://osteele.com), and John Resig's
 
# [Micro-Templating](http://ejohn.org).
 
# For all details and documentation:
 
# http://documentcloud.github.com/underscore/
 

	
 

	
 
# Baseline setup
 
# --------------
 

	
 
# Establish the root object, `window` in the browser, or `global` on the server.
 
root = this
 

	
 

	
 
# Save the previous value of the `_` variable.
 
previousUnderscore = root._
 

	
 
### Multiline
 
    comment
 
###
 

	
 
# Establish the object that gets thrown to break out of a loop iteration.
 
# `StopIteration` is SOP on Mozilla.
 
breaker = if typeof(StopIteration) is 'undefined' then '__break__' else StopIteration
 

	
 

	
 
#### Docco style single line comment (title)
 

	
 

	
 
# Helper function to escape **RegExp** contents, because JS doesn't have one.
 
escapeRegExp = (string) -> string.replace(/([.*+?^${}()|[\]\/\\])/g, '\\$1')
 

	
 

	
 
# Save bytes in the minified (but not gzipped) version:
 
ArrayProto = Array.prototype
 
ObjProto = Object.prototype
 

	
 

	
 
# Create quick reference variables for speed access to core prototypes.
 
slice = ArrayProto.slice
 
unshift = ArrayProto.unshift
 
toString = ObjProto.toString
 
hasOwnProperty = ObjProto.hasOwnProperty
 
propertyIsEnumerable = ObjProto.propertyIsEnumerable
 

	
 

	
 
# All **ECMA5** native implementations we hope to use are declared here.
 
nativeForEach = ArrayProto.forEach
 
nativeMap = ArrayProto.map
 
nativeReduce = ArrayProto.reduce
 
nativeReduceRight = ArrayProto.reduceRight
 
nativeFilter = ArrayProto.filter
 
nativeEvery = ArrayProto.every
 
nativeSome = ArrayProto.some
 
nativeIndexOf = ArrayProto.indexOf
 
nativeLastIndexOf = ArrayProto.lastIndexOf
 
nativeIsArray = Array.isArray
 
nativeKeys = Object.keys
 

	
 

	
 
# Create a safe reference to the Underscore object for use below.
 
_ = (obj) -> new wrapper(obj)
 

	
 

	
 
# Export the Underscore object for **CommonJS**.
 
if typeof(exports) != 'undefined' then exports._ = _
 

	
 

	
 
# Export Underscore to global scope.
 
root._ = _
 

	
 

	
 
# Current version.
 
_.VERSION = '1.1.0'
 

	
 

	
 
# Collection Functions
 
# --------------------
 

	
 
# The cornerstone, an **each** implementation.
 
# Handles objects implementing **forEach**, arrays, and raw objects.
 
_.each = (obj, iterator, context) ->
 
  try
 
    if nativeForEach and obj.forEach is nativeForEach
 
      obj.forEach iterator, context
 
    else if _.isNumber obj.length
 
      iterator.call context, obj[i], i, obj for i in [0...obj.length]
 
    else
 
      iterator.call context, val, key, obj for own key, val of obj
 
  catch e
 
    throw e if e isnt breaker
 
  obj
 

	
 

	
 
# Return the results of applying the iterator to each element. Use JavaScript
 
# 1.6's version of **map**, if possible.
 
_.map = (obj, iterator, context) ->
 
  return obj.map(iterator, context) if nativeMap and obj.map is nativeMap
 
  results = []
 
  _.each obj, (value, index, list) ->
 
    results.push iterator.call context, value, index, list
 
  results
 

	
 

	
 
# **Reduce** builds up a single result from a list of values. Also known as
 
# **inject**, or **foldl**. Uses JavaScript 1.8's version of **reduce**, if possible.
 
_.reduce = (obj, iterator, memo, context) ->
 
  if nativeReduce and obj.reduce is nativeReduce
 
    iterator = _.bind iterator, context if context
 
    return obj.reduce iterator, memo
 
  _.each obj, (value, index, list) ->
 
    memo = iterator.call context, memo, value, index, list
 
  memo
 

	
 

	
 
# The right-associative version of **reduce**, also known as **foldr**. Uses
 
# JavaScript 1.8's version of **reduceRight**, if available.
 
_.reduceRight = (obj, iterator, memo, context) ->
 
  if nativeReduceRight and obj.reduceRight is nativeReduceRight
 
    iterator = _.bind iterator, context if context
 
    return obj.reduceRight iterator, memo
 
  reversed = _.clone(_.toArray(obj)).reverse()
 
  _.reduce reversed, iterator, memo, context
 

	
 

	
 
# Return the first value which passes a truth test.
 
_.detect = (obj, iterator, context) ->
 
  result = null
 
  _.each obj, (value, index, list) ->
 
    if iterator.call context, value, index, list
 
      result = value
 
      _.breakLoop()
 
  result
 

	
 

	
 
# Return all the elements that pass a truth test. Use JavaScript 1.6's
 
# **filter**, if it exists.
 
_.filter = (obj, iterator, context) ->
 
  return obj.filter iterator, context if nativeFilter and obj.filter is nativeFilter
 
  results = []
 
  _.each obj, (value, index, list) ->
 
    results.push value if iterator.call context, value, index, list
 
  results
 

	
 

	
 
# Return all the elements for which a truth test fails.
 
_.reject = (obj, iterator, context) ->
 
  results = []
 
  _.each obj, (value, index, list) ->
 
    results.push value if not iterator.call context, value, index, list
 
  results
 

	
 

	
 
# Determine whether all of the elements match a truth test. Delegate to
 
# JavaScript 1.6's **every**, if it is present.
 
_.every = (obj, iterator, context) ->
 
  iterator ||= _.identity
 
  return obj.every iterator, context if nativeEvery and obj.every is nativeEvery
 
  result = true
 
  _.each obj, (value, index, list) ->
 
    _.breakLoop() unless (result = result and iterator.call(context, value, index, list))
 
  result
 

	
 

	
 
# Determine if at least one element in the object matches a truth test. Use
 
# JavaScript 1.6's **some**, if it exists.
 
_.some = (obj, iterator, context) ->
 
  iterator ||= _.identity
 
  return obj.some iterator, context if nativeSome and obj.some is nativeSome
 
  result = false
 
  _.each obj, (value, index, list) ->
 
    _.breakLoop() if (result = iterator.call(context, value, index, list))
 
  result
 

	
 

	
 
# Determine if a given value is included in the array or object,
 
# based on `===`.
 
_.include = (obj, target) ->
 
  return _.indexOf(obj, target) isnt -1 if nativeIndexOf and obj.indexOf is nativeIndexOf
 
  return true for own key, val of obj when val is target
 
  false
 

	
 

	
 
# Invoke a method with arguments on every item in a collection.
 
_.invoke = (obj, method) ->
 
  args = _.rest arguments, 2
 
  (if method then val[method] else val).apply(val, args) for val in obj
 

	
 

	
 
# Convenience version of a common use case of **map**: fetching a property.
 
_.pluck = (obj, key) ->
 
  _.map(obj, (val) -> val[key])
 

	
 

	
 
# Return the maximum item or (item-based computation).
 
_.max = (obj, iterator, context) ->
 
  return Math.max.apply(Math, obj) if not iterator and _.isArray(obj)
 
  result = computed: -Infinity
 
  _.each obj, (value, index, list) ->
 
    computed = if iterator then iterator.call(context, value, index, list) else value
 
    computed >= result.computed and (result = {value: value, computed: computed})
 
  result.value
 

	
 

	
 
# Return the minimum element (or element-based computation).
 
_.min = (obj, iterator, context) ->
 
  return Math.min.apply(Math, obj) if not iterator and _.isArray(obj)
 
  result = computed: Infinity
 
  _.each obj, (value, index, list) ->
 
    computed = if iterator then iterator.call(context, value, index, list) else value
 
    computed < result.computed and (result = {value: value, computed: computed})
 
  result.value
 

	
 

	
 
# Sort the object's values by a criterion produced by an iterator.
 
_.sortBy = (obj, iterator, context) ->
 
  _.pluck(((_.map obj, (value, index, list) ->
 
    {value: value, criteria: iterator.call(context, value, index, list)}
 
  ).sort((left, right) ->
 
    a = left.criteria; b = right.criteria
 
    if a < b then -1 else if a > b then 1 else 0
 
  )), 'value')
 

	
 

	
 
# Use a comparator function to figure out at what index an object should
 
# be inserted so as to maintain order. Uses binary search.
 
_.sortedIndex = (array, obj, iterator) ->
 
  iterator ||= _.identity
 
  low = 0
 
  high = array.length
 
  while low < high
 
    mid = (low + high) >> 1
 
    if iterator(array[mid]) < iterator(obj) then low = mid + 1 else high = mid
 
  low
 

	
 

	
 
# Convert anything iterable into a real, live array.
 
_.toArray = (iterable) ->
 
  return [] if (!iterable)
 
  return iterable.toArray() if (iterable.toArray)
 
  return iterable if (_.isArray(iterable))
 
  return slice.call(iterable) if (_.isArguments(iterable))
 
  _.values(iterable)
 

	
 

	
 
# Return the number of elements in an object.
 
_.size = (obj) -> _.toArray(obj).length
 

	
 

	
 
# Array Functions
 
# ---------------
 

	
 
# Get the first element of an array. Passing `n` will return the first N
 
# values in the array. Aliased as **head**. The `guard` check allows it to work
 
# with **map**.
 
_.first = (array, n, guard) ->
 
  if n and not guard then slice.call(array, 0, n) else array[0]
 

	
 

	
 
# Returns everything but the first entry of the array. Aliased as **tail**.
 
# Especially useful on the arguments object. Passing an `index` will return
 
# the rest of the values in the array from that index onward. The `guard`
 
# check allows it to work with **map**.
 
_.rest = (array, index, guard) ->
 
  slice.call(array, if _.isUndefined(index) or guard then 1 else index)
 

	
 

	
 
# Get the last element of an array.
 
_.last = (array) -> array[array.length - 1]
 

	
 

	
 
# Trim out all falsy values from an array.
 
_.compact = (array) -> item for item in array when item
 

	
 

	
 
# Return a completely flattened version of an array.
 
_.flatten = (array) ->
 
  _.reduce array, (memo, value) ->
 
    return memo.concat(_.flatten(value)) if _.isArray value
 
    memo.push value
 
    memo
 
  , []
 

	
 

	
 
# Return a version of the array that does not contain the specified value(s).
 
_.without = (array) ->
 
  values = _.rest arguments
 
  val for val in _.toArray(array) when not _.include values, val
 

	
 

	
 
# Produce a duplicate-free version of the array. If the array has already
 
# been sorted, you have the option of using a faster algorithm.
 
_.uniq = (array, isSorted) ->
 
  memo = []
 
  for el, i in _.toArray array
 
    memo.push el if i is 0 || (if isSorted is true then _.last(memo) isnt el else not _.include(memo, el))
 
  memo
 

	
 

	
 
# Produce an array that contains every item shared between all the
 
# passed-in arrays.
 
_.intersect = (array) ->
 
  rest = _.rest arguments
 
  _.select _.uniq(array), (item) ->
 
    _.all rest, (other) ->
 
      _.indexOf(other, item) >= 0
 

	
 

	
 
# Zip together multiple lists into a single array -- elements that share
 
# an index go together.
 
_.zip = ->
 
  length = _.max _.pluck arguments, 'length'
 
  results = new Array length
 
  for i in [0...length]
 
    results[i] = _.pluck arguments, String i
 
  results
 

	
 

	
 
# If the browser doesn't supply us with **indexOf** (I'm looking at you, MSIE),
 
# we need this function. Return the position of the first occurrence of an
 
# item in an array, or -1 if the item is not included in the array.
 
_.indexOf = (array, item) ->
 
  return array.indexOf item if nativeIndexOf and array.indexOf is nativeIndexOf
 
  i = 0; l = array.length
 
  while l - i
 
    if array[i] is item then return i else i++
 
  -1
 

	
 

	
 
# Provide JavaScript 1.6's **lastIndexOf**, delegating to the native function,
 
# if possible.
 
_.lastIndexOf = (array, item) ->
 
  return array.lastIndexOf(item) if nativeLastIndexOf and array.lastIndexOf is nativeLastIndexOf
 
  i = array.length
 
  while i
 
    if array[i] is item then return i else i--
 
  -1
 

	
 

	
 
# Generate an integer Array containing an arithmetic progression. A port of
 
# [the native Python **range** function](http://docs.python.org/library/functions.html#range).
 
_.range = (start, stop, step) ->
 
  a = arguments
 
  solo = a.length <= 1
 
  i = start = if solo then 0 else a[0]
 
  stop = if solo then a[0] else a[1]
 
  step = a[2] or 1
 
  len = Math.ceil((stop - start) / step)
 
  return [] if len <= 0
 
  range = new Array len
 
  idx = 0
 
  loop
 
    return range if (if step > 0 then i - stop else stop - i) >= 0
 
    range[idx] = i
 
    idx++
 
    i+= step
 

	
 

	
 
# Function Functions
 
# ------------------
 

	
 
# Create a function bound to a given object (assigning `this`, and arguments,
 
# optionally). Binding with arguments is also known as **curry**.
 
_.bind = (func, obj) ->
 
  args = _.rest arguments, 2
 
  -> func.apply obj or root, args.concat arguments
 

	
 

	
 
# Bind all of an object's methods to that object. Useful for ensuring that
 
# all callbacks defined on an object belong to it.
 
_.bindAll = (obj) ->
 
  funcs = if arguments.length > 1 then _.rest(arguments) else _.functions(obj)
 
  _.each funcs, (f) -> obj[f] = _.bind obj[f], obj
 
  obj
 

	
 

	
 
# Delays a function for the given number of milliseconds, and then calls
 
# it with the arguments supplied.
 
_.delay = (func, wait) ->
 
  args = _.rest arguments, 2
 
  setTimeout((-> func.apply(func, args)), wait)
 

	
 

	
 
# Memoize an expensive function by storing its results.
 
_.memoize = (func, hasher) ->
 
  memo = {}
 
  hasher or= _.identity
 
  ->
 
    key = hasher.apply this, arguments
 
    return memo[key] if key of memo
 
    memo[key] = func.apply this, arguments
 

	
 

	
 
# Defers a function, scheduling it to run after the current call stack has
 
# cleared.
 
_.defer = (func) ->
 
  _.delay.apply _, [func, 1].concat _.rest arguments
 

	
 

	
 
# Returns the first function passed as an argument to the second,
 
# allowing you to adjust arguments, run code before and after, and
 
# conditionally execute the original function.
 
_.wrap = (func, wrapper) ->
 
  -> wrapper.apply wrapper, [func].concat arguments
 

	
 

	
 
# Returns a function that is the composition of a list of functions, each
 
# consuming the return value of the function that follows.
 
_.compose = ->
 
  funcs = arguments
 
  ->
 
    args = arguments
 
    for i in [funcs.length - 1..0] by -1
 
      args = [funcs[i].apply(this, args)]
 
    args[0]
 

	
 

	
 
# Object Functions
 
# ----------------
 

	
 
# Retrieve the names of an object's properties.
 
_.keys = nativeKeys or (obj) ->
 
  return _.range 0, obj.length if _.isArray(obj)
 
  key for key, val of obj
 

	
 

	
 
# Retrieve the values of an object's properties.
 
_.values = (obj) ->
 
  _.map obj, _.identity
 

	
 

	
 
# Return a sorted list of the function names available in Underscore.
 
_.functions = (obj) ->
 
  _.filter(_.keys(obj), (key) -> _.isFunction(obj[key])).sort()
 

	
 

	
 
# Extend a given object with all of the properties in a source object.
 
_.extend = (obj) ->
 
  for source in _.rest(arguments)
 
    obj[key] = val for key, val of source
 
  obj
 

	
 

	
 
# Create a (shallow-cloned) duplicate of an object.
 
_.clone = (obj) ->
 
  return obj.slice 0 if _.isArray obj
 
  _.extend {}, obj
 

	
 

	
 
# Invokes interceptor with the obj, and then returns obj.
 
# The primary purpose of this method is to "tap into" a method chain,
 
# in order to perform operations on intermediate results within
 
 the chain.
 
_.tap = (obj, interceptor) ->
 
  interceptor obj
 
  obj
 

	
 

	
 
# Perform a deep comparison to check if two objects are equal.
 
_.isEqual = (a, b) ->
 
  # Check object identity.
 
  return true if a is b
 
  # Different types?
 
  atype = typeof(a); btype = typeof(b)
 
  return false if atype isnt btype
 
  # Basic equality test (watch out for coercions).
 
  return true if `a == b`
 
  # One is falsy and the other truthy.
 
  return false if (!a and b) or (a and !b)
 
  # One of them implements an `isEqual()`?
 
  return a.isEqual(b) if a.isEqual
 
  # Check dates' integer values.
 
  return a.getTime() is b.getTime() if _.isDate(a) and _.isDate(b)
 
  # Both are NaN?
 
  return false if _.isNaN(a) and _.isNaN(b)
 
  # Compare regular expressions.
 
  if _.isRegExp(a) and _.isRegExp(b)
 
    return a.source is b.source and
 
           a.global is b.global and
 
           a.ignoreCase is b.ignoreCase and
 
           a.multiline is b.multiline
 
  # If a is not an object by this point, we can't handle it.
 
  return false if atype isnt 'object'
 
  # Check for different array lengths before comparing contents.
 
  return false if a.length and (a.length isnt b.length)
 
  # Nothing else worked, deep compare the contents.
 
  aKeys = _.keys(a); bKeys = _.keys(b)
 
  # Different object sizes?
 
  return false if aKeys.length isnt bKeys.length
 
  # Recursive comparison of contents.
 
  return false for key, val of a when !(key of b) or !_.isEqual(val, b[key])
 
  true
 

	
 

	
 
# Is a given array or object empty?
 
_.isEmpty = (obj) ->
 
  return obj.length is 0 if _.isArray(obj) or _.isString(obj)
 
  return false for own key of obj
 
  true
 

	
 

	
 
# Is a given value a DOM element?
 
_.isElement = (obj) -> obj and obj.nodeType is 1
 

	
 

	
 
# Is a given value an array?
 
_.isArray = nativeIsArray or (obj) -> !!(obj and obj.concat and obj.unshift and not obj.callee)
 

	
 

	
 
# Is a given variable an arguments object?
 
_.isArguments = (obj) -> obj and obj.callee
 

	
 

	
 
# Is the given value a function?
 
_.isFunction = (obj) -> !!(obj and obj.constructor and obj.call and obj.apply)
 

	
 

	
 
# Is the given value a string?
 
_.isString = (obj) -> !!(obj is '' or (obj and obj.charCodeAt and obj.substr))
 

	
 

	
 
# Is a given value a number?
 
_.isNumber = (obj) -> (obj is +obj) or toString.call(obj) is '[object Number]'
 

	
 

	
 
# Is a given value a boolean?
 
_.isBoolean = (obj) -> obj is true or obj is false
 

	
 

	
 
# Is a given value a Date?
 
_.isDate = (obj) -> !!(obj and obj.getTimezoneOffset and obj.setUTCFullYear)
 

	
 

	
 
# Is the given value a regular expression?
 
_.isRegExp = (obj) -> !!(obj and obj.exec and (obj.ignoreCase or obj.ignoreCase is false))
 

	
 

	
 
# Is the given value NaN -- this one is interesting. `NaN != NaN`, and
 
# `isNaN(undefined) == true`, so we make sure it's a number first.
 
_.isNaN = (obj) -> _.isNumber(obj) and window.isNaN(obj)
 

	
 

	
 
# Is a given value equal to null?
 
_.isNull = (obj) -> obj is null
 

	
 

	
 
# Is a given variable undefined?
 
_.isUndefined = (obj) -> typeof obj is 'undefined'
 

	
 

	
 
# Utility Functions
 
# -----------------
 

	
 
# Run Underscore.js in noConflict mode, returning the `_` variable to its
 
# previous owner. Returns a reference to the Underscore object.
 
_.noConflict = ->
 
  root._ = previousUnderscore
 
  this
 

	
 

	
 
# Keep the identity function around for default iterators.
 
_.identity = (value) -> value
 

	
 

	
 
# Run a function `n` times.
 
_.times = (n, iterator, context) ->
 
  iterator.call context, i for i in [0...n]
 

	
 

	
 
# Break out of the middle of an iteration.
 
_.breakLoop = -> throw breaker
 

	
 

	
 
# Add your own custom functions to the Underscore object, ensuring that
 
# they're correctly added to the OOP wrapper as well.
 
_.mixin = (obj) ->
 
  for name in _.functions(obj)
 
    addToWrapper name, _[name] = obj[name]
 

	
 

	
 
# Generate a unique integer id (unique within the entire client session).
 
# Useful for temporary DOM ids.
 
idCounter = 0
 
_.uniqueId = (prefix) ->
 
  (prefix or '') + idCounter++
 

	
 

	
 
# By default, Underscore uses **ERB**-style template delimiters, change the
 
# following template settings to use alternative delimiters.
 
_.templateSettings = {
 
  start: '<%'
 
  end: '%>'
 
  interpolate: /<%=(.+?)%>/g
 
}
 

	
 

	
 
# JavaScript templating a-la **ERB**, pilfered from John Resig's
 
# *Secrets of the JavaScript Ninja*, page 83.
 
# Single-quote fix from Rick Strahl.
 
# With alterations for arbitrary delimiters, and to preserve whitespace.
 
_.template = (str, data) ->
 
  c = _.templateSettings
 
  endMatch = new RegExp("'(?=[^"+c.end.substr(0, 1)+"]*"+escapeRegExp(c.end)+")","g")
 
  fn = new Function 'obj',
 
    'var p=[],print=function(){p.push.apply(p,arguments);};' +
 
    'with(obj||{}){p.push(\'' +
 
    str.replace(/\r/g, '\\r')
 
       .replace(/\n/g, '\\n')
 
       .replace(/\t/g, '\\t')
 
       .replace(endMatch,"���")
 
       .split("'").join("\\'")
 
       .split("���").join("'")
 
       .replace(c.interpolate, "',$1,'")
 
       .split(c.start).join("');")
 
       .split(c.end).join("p.push('") +
 
       "');}return p.join('');"
 
  if data then fn(data) else fn
 

	
 

	
 
# Aliases
 
# -------
 

	
 
_.forEach = _.each
 
_.foldl = _.inject = _.reduce
 
_.foldr = _.reduceRight
 
_.select = _.filter
 
_.all = _.every
 
_.any = _.some
 
_.contains = _.include
 
_.head = _.first
 
_.tail = _.rest
 
_.methods = _.functions
 

	
 

	
 
# Setup the OOP Wrapper
 
# ---------------------
 

	
 
# If Underscore is called as a function, it returns a wrapped object that
 
# can be used OO-style. This wrapper holds altered versions of all the
 
# underscore functions. Wrapped objects may be chained.
 
wrapper = (obj) ->
 
  this._wrapped = obj
 
  this
 

	
 

	
 
# Helper function to continue chaining intermediate results.
 
result = (obj, chain) ->
 
  if chain then _(obj).chain() else obj
 

	
 

	
 
# A method to easily add functions to the OOP wrapper.
 
addToWrapper = (name, func) ->
 
  wrapper.prototype[name] = ->
 
    args = _.toArray arguments
 
    unshift.call args, this._wrapped
 
    result func.apply(_, args), this._chain
 

	
 

	
 
# Add all ofthe Underscore functions to the wrapper object.
 
_.mixin _
 

	
 

	
 
# Add all mutator Array functions to the wrapper.
 
_.each ['pop', 'push', 'reverse', 'shift', 'sort', 'splice', 'unshift'], (name) ->
 
  method = Array.prototype[name]
 
  wrapper.prototype[name] = ->
 
    method.apply(this._wrapped, arguments)
 
    result(this._wrapped, this._chain)
 

	
 

	
 
# Add all accessor Array functions to the wrapper.
 
_.each ['concat', 'join', 'slice'], (name) ->
 
  method = Array.prototype[name]
 
  wrapper.prototype[name] = ->
 
    result(method.apply(this._wrapped, arguments), this._chain)
 

	
 

	
 
# Start chaining a wrapped Underscore object.
 
wrapper::chain = ->
 
  this._chain = true
 
  this
 

	
 

	
 
# Extracts the result from a wrapped and chained object.
 
wrapper::value = -> this._wrapped
 
</textarea></form>
 
    <script>
 
      var editor = CodeMirror.fromTextArea(document.getElementById("code"), {});
 
    </script>
 

	
 
    <p><strong>MIME types defined:</strong> <code>text/x-coffeescript</code>.</p>
 

	
 
    <p>The CoffeeScript mode was written by Jeff Pickhardt (<a href="LICENSE">license</a>).</p>
 

	
 
  </body>
 
</html>
rhodecode/public/js/mode/commonlisp/commonlisp.js
Show inline comments
 
new file 100644
 
CodeMirror.defineMode("commonlisp", function (config) {
 
  var assumeBody = /^with|^def|^do|^prog|case$|^cond$|bind$|when$|unless$/;
 
  var numLiteral = /^(?:[+\-]?(?:\d+|\d*\.\d+)(?:[efd][+\-]?\d+)?|[+\-]?\d+(?:\/[+\-]?\d+)?|#b[+\-]?[01]+|#o[+\-]?[0-7]+|#x[+\-]?[\da-f]+)/;
 
  var symbol = /[^\s'`,@()\[\]";]/;
 
  var type;
 

	
 
  function readSym(stream) {
 
    var ch;
 
    while (ch = stream.next()) {
 
      if (ch == "\\") stream.next();
 
      else if (!symbol.test(ch)) { stream.backUp(1); break; }
 
    }
 
    return stream.current();
 
  }
 

	
 
  function base(stream, state) {
 
    if (stream.eatSpace()) {type = "ws"; return null;}
 
    if (stream.match(numLiteral)) return "number";
 
    var ch = stream.next();
 
    if (ch == "\\") ch = stream.next();
 

	
 
    if (ch == '"') return (state.tokenize = inString)(stream, state);
 
    else if (ch == "(") { type = "open"; return "bracket"; }
 
    else if (ch == ")" || ch == "]") { type = "close"; return "bracket"; }
 
    else if (ch == ";") { stream.skipToEnd(); type = "ws"; return "comment"; }
 
    else if (/['`,@]/.test(ch)) return null;
 
    else if (ch == "|") {
 
      if (stream.skipTo("|")) { stream.next(); return "symbol"; }
 
      else { stream.skipToEnd(); return "error"; }
 
    } else if (ch == "#") {
 
      var ch = stream.next();
 
      if (ch == "[") { type = "open"; return "bracket"; }
 
      else if (/[+\-=\.']/.test(ch)) return null;
 
      else if (/\d/.test(ch) && stream.match(/^\d*#/)) return null;
 
      else if (ch == "|") return (state.tokenize = inComment)(stream, state);
 
      else if (ch == ":") { readSym(stream); return "meta"; }
 
      else return "error";
 
    } else {
 
      var name = readSym(stream);
 
      if (name == ".") return null;
 
      type = "symbol";
 
      if (name == "nil" || name == "t") return "atom";
 
      if (name.charAt(0) == ":") return "keyword";
 
      if (name.charAt(0) == "&") return "variable-2";
 
      return "variable";
 
    }
 
  }
 

	
 
  function inString(stream, state) {
 
    var escaped = false, next;
 
    while (next = stream.next()) {
 
      if (next == '"' && !escaped) { state.tokenize = base; break; }
 
      escaped = !escaped && next == "\\";
 
    }
 
    return "string";
 
  }
 

	
 
  function inComment(stream, state) {
 
    var next, last;
 
    while (next = stream.next()) {
 
      if (next == "#" && last == "|") { state.tokenize = base; break; }
 
      last = next;
 
    }
 
    type = "ws";
 
    return "comment";
 
  }
 

	
 
  return {
 
    startState: function () {
 
      return {ctx: {prev: null, start: 0, indentTo: 0}, tokenize: base};
 
    },
 

	
 
    token: function (stream, state) {
 
      if (stream.sol() && typeof state.ctx.indentTo != "number")
 
        state.ctx.indentTo = state.ctx.start + 1;
 

	
 
      type = null;
 
      var style = state.tokenize(stream, state);
 
      if (type != "ws") {
 
        if (state.ctx.indentTo == null) {
 
          if (type == "symbol" && assumeBody.test(stream.current()))
 
            state.ctx.indentTo = state.ctx.start + config.indentUnit;
 
          else
 
            state.ctx.indentTo = "next";
 
        } else if (state.ctx.indentTo == "next") {
 
          state.ctx.indentTo = stream.column();
 
        }
 
      }
 
      if (type == "open") state.ctx = {prev: state.ctx, start: stream.column(), indentTo: null};
 
      else if (type == "close") state.ctx = state.ctx.prev || state.ctx;
 
      return style;
 
    },
 

	
 
    indent: function (state, _textAfter) {
 
      var i = state.ctx.indentTo;
 
      return typeof i == "number" ? i : state.ctx.start + 1;
 
    },
 

	
 
    lineComment: ";;",
 
    blockCommentStart: "#|",
 
    blockCommentEnd: "|#"
 
  };
 
});
 

	
 
CodeMirror.defineMIME("text/x-common-lisp", "commonlisp");
rhodecode/public/js/mode/commonlisp/index.html
Show inline comments
 
new file 100644
 
<!doctype html>
 
<html>
 
  <head>
 
    <meta charset="utf-8">
 
    <title>CodeMirror: Common Lisp mode</title>
 
    <link rel="stylesheet" href="../../lib/codemirror.css">
 
    <script src="../../lib/codemirror.js"></script>
 
    <script src="commonlisp.js"></script>
 
    <style>.CodeMirror {background: #f8f8f8;}</style>
 
    <link rel="stylesheet" href="../../doc/docs.css">
 
  </head>
 
  <body>
 
    <h1>CodeMirror: Common Lisp mode</h1>
 
    <form><textarea id="code" name="code">(in-package :cl-postgres)
 

	
 
;; These are used to synthesize reader and writer names for integer
 
;; reading/writing functions when the amount of bytes and the
 
;; signedness is known. Both the macro that creates the functions and
 
;; some macros that use them create names this way.
 
(eval-when (:compile-toplevel :load-toplevel :execute)
 
  (defun integer-reader-name (bytes signed)
 
    (intern (with-standard-io-syntax
 
              (format nil "~a~a~a~a" '#:read- (if signed "" '#:u) '#:int bytes))))
 
  (defun integer-writer-name (bytes signed)
 
    (intern (with-standard-io-syntax
 
              (format nil "~a~a~a~a" '#:write- (if signed "" '#:u) '#:int bytes)))))
 

	
 
(defmacro integer-reader (bytes)
 
  "Create a function to read integers from a binary stream."
 
  (let ((bits (* bytes 8)))
 
    (labels ((return-form (signed)
 
               (if signed
 
                   `(if (logbitp ,(1- bits) result)
 
                        (dpb result (byte ,(1- bits) 0) -1)
 
                        result)
 
                   `result))
 
             (generate-reader (signed)
 
               `(defun ,(integer-reader-name bytes signed) (socket)
 
                  (declare (type stream socket)
 
                           #.*optimize*)
 
                  ,(if (= bytes 1)
 
                       `(let ((result (the (unsigned-byte 8) (read-byte socket))))
 
                          (declare (type (unsigned-byte 8) result))
 
                          ,(return-form signed))
 
                       `(let ((result 0))
 
                          (declare (type (unsigned-byte ,bits) result))
 
                          ,@(loop :for byte :from (1- bytes) :downto 0
 
                                   :collect `(setf (ldb (byte 8 ,(* 8 byte)) result)
 
                                                   (the (unsigned-byte 8) (read-byte socket))))
 
                          ,(return-form signed))))))
 
      `(progn
 
;; This causes weird errors on SBCL in some circumstances. Disabled for now.
 
;;         (declaim (inline ,(integer-reader-name bytes t)
 
;;                          ,(integer-reader-name bytes nil)))
 
         (declaim (ftype (function (t) (signed-byte ,bits))
 
                         ,(integer-reader-name bytes t)))
 
         ,(generate-reader t)
 
         (declaim (ftype (function (t) (unsigned-byte ,bits))
 
                         ,(integer-reader-name bytes nil)))
 
         ,(generate-reader nil)))))
 

	
 
(defmacro integer-writer (bytes)
 
  "Create a function to write integers to a binary stream."
 
  (let ((bits (* 8 bytes)))
 
    `(progn
 
      (declaim (inline ,(integer-writer-name bytes t)
 
                       ,(integer-writer-name bytes nil)))
 
      (defun ,(integer-writer-name bytes nil) (socket value)
 
        (declare (type stream socket)
 
                 (type (unsigned-byte ,bits) value)
 
                 #.*optimize*)
 
        ,@(if (= bytes 1)
 
              `((write-byte value socket))
 
              (loop :for byte :from (1- bytes) :downto 0
 
                    :collect `(write-byte (ldb (byte 8 ,(* byte 8)) value)
 
                               socket)))
 
        (values))
 
      (defun ,(integer-writer-name bytes t) (socket value)
 
        (declare (type stream socket)
 
                 (type (signed-byte ,bits) value)
 
                 #.*optimize*)
 
        ,@(if (= bytes 1)
 
              `((write-byte (ldb (byte 8 0) value) socket))
 
              (loop :for byte :from (1- bytes) :downto 0
 
                    :collect `(write-byte (ldb (byte 8 ,(* byte 8)) value)
 
                               socket)))
 
        (values)))))
 

	
 
;; All the instances of the above that we need.
 

	
 
(integer-reader 1)
 
(integer-reader 2)
 
(integer-reader 4)
 
(integer-reader 8)
 

	
 
(integer-writer 1)
 
(integer-writer 2)
 
(integer-writer 4)
 

	
 
(defun write-bytes (socket bytes)
 
  "Write a byte-array to a stream."
 
  (declare (type stream socket)
 
           (type (simple-array (unsigned-byte 8)) bytes)
 
           #.*optimize*)
 
  (write-sequence bytes socket))
 

	
 
(defun write-str (socket string)
 
  "Write a null-terminated string to a stream \(encoding it when UTF-8
 
support is enabled.)."
 
  (declare (type stream socket)
 
           (type string string)
 
           #.*optimize*)
 
  (enc-write-string string socket)
 
  (write-uint1 socket 0))
 

	
 
(declaim (ftype (function (t unsigned-byte)
 
                          (simple-array (unsigned-byte 8) (*)))
 
                read-bytes))
 
(defun read-bytes (socket length)
 
  "Read a byte array of the given length from a stream."
 
  (declare (type stream socket)
 
           (type fixnum length)
 
           #.*optimize*)
 
  (let ((result (make-array length :element-type '(unsigned-byte 8))))
 
    (read-sequence result socket)
 
    result))
 

	
 
(declaim (ftype (function (t) string) read-str))
 
(defun read-str (socket)
 
  "Read a null-terminated string from a stream. Takes care of encoding
 
when UTF-8 support is enabled."
 
  (declare (type stream socket)
 
           #.*optimize*)
 
  (enc-read-string socket :null-terminated t))
 

	
 
(defun skip-bytes (socket length)
 
  "Skip a given number of bytes in a binary stream."
 
  (declare (type stream socket)
 
           (type (unsigned-byte 32) length)
 
           #.*optimize*)
 
  (dotimes (i length)
 
    (read-byte socket)))
 

	
 
(defun skip-str (socket)
 
  "Skip a null-terminated string."
 
  (declare (type stream socket)
 
           #.*optimize*)
 
  (loop :for char :of-type fixnum = (read-byte socket)
 
        :until (zerop char)))
 

	
 
(defun ensure-socket-is-closed (socket &amp;key abort)
 
  (when (open-stream-p socket)
 
    (handler-case
 
        (close socket :abort abort)
 
      (error (error)
 
        (warn "Ignoring the error which happened while trying to close PostgreSQL socket: ~A" error)))))
 
</textarea></form>
 
    <script>
 
      var editor = CodeMirror.fromTextArea(document.getElementById("code"), {lineNumbers: true});
 
    </script>
 

	
 
    <p><strong>MIME types defined:</strong> <code>text/x-common-lisp</code>.</p>
 

	
 
  </body>
 
</html>
rhodecode/public/js/mode/css/css.js
Show inline comments
 
new file 100644
 
CodeMirror.defineMode("css", function(config) {
 
  return CodeMirror.getMode(config, "text/css");
 
});
 

	
 
CodeMirror.defineMode("css-base", function(config, parserConfig) {
 
  "use strict";
 

	
 
  var indentUnit = config.indentUnit,
 
      hooks = parserConfig.hooks || {},
 
      atMediaTypes = parserConfig.atMediaTypes || {},
 
      atMediaFeatures = parserConfig.atMediaFeatures || {},
 
      propertyKeywords = parserConfig.propertyKeywords || {},
 
      colorKeywords = parserConfig.colorKeywords || {},
 
      valueKeywords = parserConfig.valueKeywords || {},
 
      allowNested = !!parserConfig.allowNested,
 
      type = null;
 

	
 
  function ret(style, tp) { type = tp; return style; }
 

	
 
  function tokenBase(stream, state) {
 
    var ch = stream.next();
 
    if (hooks[ch]) {
 
      // result[0] is style and result[1] is type
 
      var result = hooks[ch](stream, state);
 
      if (result !== false) return result;
 
    }
 
    if (ch == "@") {stream.eatWhile(/[\w\\\-]/); return ret("def", stream.current());}
 
    else if (ch == "=") ret(null, "compare");
 
    else if ((ch == "~" || ch == "|") && stream.eat("=")) return ret(null, "compare");
 
    else if (ch == "\"" || ch == "'") {
 
      state.tokenize = tokenString(ch);
 
      return state.tokenize(stream, state);
 
    }
 
    else if (ch == "#") {
 
      stream.eatWhile(/[\w\\\-]/);
 
      return ret("atom", "hash");
 
    }
 
    else if (ch == "!") {
 
      stream.match(/^\s*\w*/);
 
      return ret("keyword", "important");
 
    }
 
    else if (/\d/.test(ch)) {
 
      stream.eatWhile(/[\w.%]/);
 
      return ret("number", "unit");
 
    }
 
    else if (ch === "-") {
 
      if (/\d/.test(stream.peek())) {
 
        stream.eatWhile(/[\w.%]/);
 
        return ret("number", "unit");
 
      } else if (stream.match(/^[^-]+-/)) {
 
        return ret("meta", "meta");
 
      }
 
    }
 
    else if (/[,+>*\/]/.test(ch)) {
 
      return ret(null, "select-op");
 
    }
 
    else if (ch == "." && stream.match(/^-?[_a-z][_a-z0-9-]*/i)) {
 
      return ret("qualifier", "qualifier");
 
    }
 
    else if (ch == ":") {
 
      return ret("operator", ch);
 
    }
 
    else if (/[;{}\[\]\(\)]/.test(ch)) {
 
      return ret(null, ch);
 
    }
 
    else if (ch == "u" && stream.match("rl(")) {
 
      stream.backUp(1);
 
      state.tokenize = tokenParenthesized;
 
      return ret("property", "variable");
 
    }
 
    else {
 
      stream.eatWhile(/[\w\\\-]/);
 
      return ret("property", "variable");
 
    }
 
  }
 

	
 
  function tokenString(quote, nonInclusive) {
 
    return function(stream, state) {
 
      var escaped = false, ch;
 
      while ((ch = stream.next()) != null) {
 
        if (ch == quote && !escaped)
 
          break;
 
        escaped = !escaped && ch == "\\";
 
      }
 
      if (!escaped) {
 
        if (nonInclusive) stream.backUp(1);
 
        state.tokenize = tokenBase;
 
      }
 
      return ret("string", "string");
 
    };
 
  }
 

	
 
  function tokenParenthesized(stream, state) {
 
    stream.next(); // Must be '('
 
    if (!stream.match(/\s*[\"\']/, false))
 
      state.tokenize = tokenString(")", true);
 
    else
 
      state.tokenize = tokenBase;
 
    return ret(null, "(");
 
  }
 

	
 
  return {
 
    startState: function(base) {
 
      return {tokenize: tokenBase,
 
              baseIndent: base || 0,
 
              stack: []};
 
    },
 

	
 
    token: function(stream, state) {
 

	
 
      // Use these terms when applicable (see http://www.xanthir.com/blog/b4E50)
 
      //
 
      // rule** or **ruleset:
 
      // A selector + braces combo, or an at-rule.
 
      //
 
      // declaration block:
 
      // A sequence of declarations.
 
      //
 
      // declaration:
 
      // A property + colon + value combo.
 
      //
 
      // property value:
 
      // The entire value of a property.
 
      //
 
      // component value:
 
      // A single piece of a property value. Like the 5px in
 
      // text-shadow: 0 0 5px blue;. Can also refer to things that are
 
      // multiple terms, like the 1-4 terms that make up the background-size
 
      // portion of the background shorthand.
 
      //
 
      // term:
 
      // The basic unit of author-facing CSS, like a single number (5),
 
      // dimension (5px), string ("foo"), or function. Officially defined
 
      //  by the CSS 2.1 grammar (look for the 'term' production)
 
      //
 
      //
 
      // simple selector:
 
      // A single atomic selector, like a type selector, an attr selector, a
 
      // class selector, etc.
 
      //
 
      // compound selector:
 
      // One or more simple selectors without a combinator. div.example is
 
      // compound, div > .example is not.
 
      //
 
      // complex selector:
 
      // One or more compound selectors chained with combinators.
 
      //
 
      // combinator:
 
      // The parts of selectors that express relationships. There are four
 
      // currently - the space (descendant combinator), the greater-than
 
      // bracket (child combinator), the plus sign (next sibling combinator),
 
      // and the tilda (following sibling combinator).
 
      //
 
      // sequence of selectors:
 
      // One or more of the named type of selector chained with commas.
 

	
 
      state.tokenize = state.tokenize || tokenBase;
 
      if (state.tokenize == tokenBase && stream.eatSpace()) return null;
 
      var style = state.tokenize(stream, state);
 
      if (style && typeof style != "string") style = ret(style[0], style[1]);
 

	
 
      // Changing style returned based on context
 
      var context = state.stack[state.stack.length-1];
 
      if (style == "variable") {
 
        if (type == "variable-definition") state.stack.push("propertyValue");
 
        return "variable-2";
 
      } else if (style == "property") {
 
        var word = stream.current().toLowerCase();
 
        if (context == "propertyValue") {
 
          if (valueKeywords.hasOwnProperty(word)) {
 
            style = "string-2";
 
          } else if (colorKeywords.hasOwnProperty(word)) {
 
            style = "keyword";
 
          } else {
 
            style = "variable-2";
 
          }
 
        } else if (context == "rule") {
 
          if (!propertyKeywords.hasOwnProperty(word)) {
 
            style += " error";
 
          }
 
        } else if (context == "block") {
 
          // if a value is present in both property, value, or color, the order
 
          // of preference is property -> color -> value
 
          if (propertyKeywords.hasOwnProperty(word)) {
 
            style = "property";
 
          } else if (colorKeywords.hasOwnProperty(word)) {
 
            style = "keyword";
 
          } else if (valueKeywords.hasOwnProperty(word)) {
 
            style = "string-2";
 
          } else {
 
            style = "tag";
 
          }
 
        } else if (!context || context == "@media{") {
 
          style = "tag";
 
        } else if (context == "@media") {
 
          if (atMediaTypes[stream.current()]) {
 
            style = "attribute"; // Known attribute
 
          } else if (/^(only|not)$/.test(word)) {
 
            style = "keyword";
 
          } else if (word == "and") {
 
            style = "error"; // "and" is only allowed in @mediaType
 
          } else if (atMediaFeatures.hasOwnProperty(word)) {
 
            style = "error"; // Known property, should be in @mediaType(
 
          } else {
 
            // Unknown, expecting keyword or attribute, assuming attribute
 
            style = "attribute error";
 
          }
 
        } else if (context == "@mediaType") {
 
          if (atMediaTypes.hasOwnProperty(word)) {
 
            style = "attribute";
 
          } else if (word == "and") {
 
            style = "operator";
 
          } else if (/^(only|not)$/.test(word)) {
 
            style = "error"; // Only allowed in @media
 
          } else {
 
            // Unknown attribute or property, but expecting property (preceded
 
            // by "and"). Should be in parentheses
 
            style = "error";
 
          }
 
        } else if (context == "@mediaType(") {
 
          if (propertyKeywords.hasOwnProperty(word)) {
 
            // do nothing, remains "property"
 
          } else if (atMediaTypes.hasOwnProperty(word)) {
 
            style = "error"; // Known property, should be in parentheses
 
          } else if (word == "and") {
 
            style = "operator";
 
          } else if (/^(only|not)$/.test(word)) {
 
            style = "error"; // Only allowed in @media
 
          } else {
 
            style += " error";
 
          }
 
        } else if (context == "@import") {
 
          style = "tag";
 
        } else {
 
          style = "error";
 
        }
 
      } else if (style == "atom") {
 
        if(!context || context == "@media{" || context == "block") {
 
          style = "builtin";
 
        } else if (context == "propertyValue") {
 
          if (!/^#([0-9a-fA-f]{3}|[0-9a-fA-f]{6})$/.test(stream.current())) {
 
            style += " error";
 
          }
 
        } else {
 
          style = "error";
 
        }
 
      } else if (context == "@media" && type == "{") {
 
        style = "error";
 
      }
 

	
 
      // Push/pop context stack
 
      if (type == "{") {
 
        if (context == "@media" || context == "@mediaType") {
 
          state.stack.pop();
 
          state.stack[state.stack.length-1] = "@media{";
 
        }
 
        else {
 
          var newContext = allowNested ? "block" : "rule";
 
          state.stack.push(newContext);
 
        }
 
      }
 
      else if (type == "}") {
 
        var lastState = state.stack[state.stack.length - 1];
 
        if (lastState == "interpolation") style = "operator";
 
        state.stack.pop();
 
        if (context == "propertyValue") state.stack.pop();
 
      }
 
      else if (type == "interpolation") state.stack.push("interpolation");
 
      else if (type == "@media") state.stack.push("@media");
 
      else if (type == "@import") state.stack.push("@import");
 
      else if (context == "@media" && /\b(keyword|attribute)\b/.test(style))
 
        state.stack.push("@mediaType");
 
      else if (context == "@mediaType" && stream.current() == ",") state.stack.pop();
 
      else if (context == "@mediaType" && type == "(") state.stack.push("@mediaType(");
 
      else if (context == "@mediaType(" && type == ")") state.stack.pop();
 
      else if ((context == "rule" || context == "block") && type == ":") state.stack.push("propertyValue");
 
      else if (context == "propertyValue" && type == ";") state.stack.pop();
 
      else if (context == "@import" && type == ";") state.stack.pop();
 
      return style;
 
    },
 

	
 
    indent: function(state, textAfter) {
 
      var n = state.stack.length;
 
      if (/^\}/.test(textAfter))
 
        n -= state.stack[state.stack.length-1] == "propertyValue" ? 2 : 1;
 
      return state.baseIndent + n * indentUnit;
 
    },
 

	
 
    electricChars: "}",
 
    blockCommentStart: "/*",
 
    blockCommentEnd: "*/"
 
  };
 
});
 

	
 
(function() {
 
  function keySet(array) {
 
    var keys = {};
 
    for (var i = 0; i < array.length; ++i) {
 
      keys[array[i]] = true;
 
    }
 
    return keys;
 
  }
 

	
 
  var atMediaTypes = keySet([
 
    "all", "aural", "braille", "handheld", "print", "projection", "screen",
 
    "tty", "tv", "embossed"
 
  ]);
 

	
 
  var atMediaFeatures = keySet([
 
    "width", "min-width", "max-width", "height", "min-height", "max-height",
 
    "device-width", "min-device-width", "max-device-width", "device-height",
 
    "min-device-height", "max-device-height", "aspect-ratio",
 
    "min-aspect-ratio", "max-aspect-ratio", "device-aspect-ratio",
 
    "min-device-aspect-ratio", "max-device-aspect-ratio", "color", "min-color",
 
    "max-color", "color-index", "min-color-index", "max-color-index",
 
    "monochrome", "min-monochrome", "max-monochrome", "resolution",
 
    "min-resolution", "max-resolution", "scan", "grid"
 
  ]);
 

	
 
  var propertyKeywords = keySet([
 
    "align-content", "align-items", "align-self", "alignment-adjust",
 
    "alignment-baseline", "anchor-point", "animation", "animation-delay",
 
    "animation-direction", "animation-duration", "animation-iteration-count",
 
    "animation-name", "animation-play-state", "animation-timing-function",
 
    "appearance", "azimuth", "backface-visibility", "background",
 
    "background-attachment", "background-clip", "background-color",
 
    "background-image", "background-origin", "background-position",
 
    "background-repeat", "background-size", "baseline-shift", "binding",
 
    "bleed", "bookmark-label", "bookmark-level", "bookmark-state",
 
    "bookmark-target", "border", "border-bottom", "border-bottom-color",
 
    "border-bottom-left-radius", "border-bottom-right-radius",
 
    "border-bottom-style", "border-bottom-width", "border-collapse",
 
    "border-color", "border-image", "border-image-outset",
 
    "border-image-repeat", "border-image-slice", "border-image-source",
 
    "border-image-width", "border-left", "border-left-color",
 
    "border-left-style", "border-left-width", "border-radius", "border-right",
 
    "border-right-color", "border-right-style", "border-right-width",
 
    "border-spacing", "border-style", "border-top", "border-top-color",
 
    "border-top-left-radius", "border-top-right-radius", "border-top-style",
 
    "border-top-width", "border-width", "bottom", "box-decoration-break",
 
    "box-shadow", "box-sizing", "break-after", "break-before", "break-inside",
 
    "caption-side", "clear", "clip", "color", "color-profile", "column-count",
 
    "column-fill", "column-gap", "column-rule", "column-rule-color",
 
    "column-rule-style", "column-rule-width", "column-span", "column-width",
 
    "columns", "content", "counter-increment", "counter-reset", "crop", "cue",
 
    "cue-after", "cue-before", "cursor", "direction", "display",
 
    "dominant-baseline", "drop-initial-after-adjust",
 
    "drop-initial-after-align", "drop-initial-before-adjust",
 
    "drop-initial-before-align", "drop-initial-size", "drop-initial-value",
 
    "elevation", "empty-cells", "fit", "fit-position", "flex", "flex-basis",
 
    "flex-direction", "flex-flow", "flex-grow", "flex-shrink", "flex-wrap",
 
    "float", "float-offset", "font", "font-feature-settings", "font-family",
 
    "font-kerning", "font-language-override", "font-size", "font-size-adjust",
 
    "font-stretch", "font-style", "font-synthesis", "font-variant",
 
    "font-variant-alternates", "font-variant-caps", "font-variant-east-asian",
 
    "font-variant-ligatures", "font-variant-numeric", "font-variant-position",
 
    "font-weight", "grid-cell", "grid-column", "grid-column-align",
 
    "grid-column-sizing", "grid-column-span", "grid-columns", "grid-flow",
 
    "grid-row", "grid-row-align", "grid-row-sizing", "grid-row-span",
 
    "grid-rows", "grid-template", "hanging-punctuation", "height", "hyphens",
 
    "icon", "image-orientation", "image-rendering", "image-resolution",
 
    "inline-box-align", "justify-content", "left", "letter-spacing",
 
    "line-break", "line-height", "line-stacking", "line-stacking-ruby",
 
    "line-stacking-shift", "line-stacking-strategy", "list-style",
 
    "list-style-image", "list-style-position", "list-style-type", "margin",
 
    "margin-bottom", "margin-left", "margin-right", "margin-top",
 
    "marker-offset", "marks", "marquee-direction", "marquee-loop",
 
    "marquee-play-count", "marquee-speed", "marquee-style", "max-height",
 
    "max-width", "min-height", "min-width", "move-to", "nav-down", "nav-index",
 
    "nav-left", "nav-right", "nav-up", "opacity", "order", "orphans", "outline",
 
    "outline-color", "outline-offset", "outline-style", "outline-width",
 
    "overflow", "overflow-style", "overflow-wrap", "overflow-x", "overflow-y",
 
    "padding", "padding-bottom", "padding-left", "padding-right", "padding-top",
 
    "page", "page-break-after", "page-break-before", "page-break-inside",
 
    "page-policy", "pause", "pause-after", "pause-before", "perspective",
 
    "perspective-origin", "pitch", "pitch-range", "play-during", "position",
 
    "presentation-level", "punctuation-trim", "quotes", "rendering-intent",
 
    "resize", "rest", "rest-after", "rest-before", "richness", "right",
 
    "rotation", "rotation-point", "ruby-align", "ruby-overhang",
 
    "ruby-position", "ruby-span", "size", "speak", "speak-as", "speak-header",
 
    "speak-numeral", "speak-punctuation", "speech-rate", "stress", "string-set",
 
    "tab-size", "table-layout", "target", "target-name", "target-new",
 
    "target-position", "text-align", "text-align-last", "text-decoration",
 
    "text-decoration-color", "text-decoration-line", "text-decoration-skip",
 
    "text-decoration-style", "text-emphasis", "text-emphasis-color",
 
    "text-emphasis-position", "text-emphasis-style", "text-height",
 
    "text-indent", "text-justify", "text-outline", "text-shadow",
 
    "text-space-collapse", "text-transform", "text-underline-position",
 
    "text-wrap", "top", "transform", "transform-origin", "transform-style",
 
    "transition", "transition-delay", "transition-duration",
 
    "transition-property", "transition-timing-function", "unicode-bidi",
 
    "vertical-align", "visibility", "voice-balance", "voice-duration",
 
    "voice-family", "voice-pitch", "voice-range", "voice-rate", "voice-stress",
 
    "voice-volume", "volume", "white-space", "widows", "width", "word-break",
 
    "word-spacing", "word-wrap", "z-index",
 
    // SVG-specific
 
    "clip-path", "clip-rule", "mask", "enable-background", "filter", "flood-color",
 
    "flood-opacity", "lighting-color", "stop-color", "stop-opacity", "pointer-events",
 
    "color-interpolation", "color-interpolation-filters", "color-profile",
 
    "color-rendering", "fill", "fill-opacity", "fill-rule", "image-rendering",
 
    "marker", "marker-end", "marker-mid", "marker-start", "shape-rendering", "stroke",
 
    "stroke-dasharray", "stroke-dashoffset", "stroke-linecap", "stroke-linejoin",
 
    "stroke-miterlimit", "stroke-opacity", "stroke-width", "text-rendering",
 
    "baseline-shift", "dominant-baseline", "glyph-orientation-horizontal",
 
    "glyph-orientation-vertical", "kerning", "text-anchor", "writing-mode"
 
  ]);
 

	
 
  var colorKeywords = keySet([
 
    "aliceblue", "antiquewhite", "aqua", "aquamarine", "azure", "beige",
 
    "bisque", "black", "blanchedalmond", "blue", "blueviolet", "brown",
 
    "burlywood", "cadetblue", "chartreuse", "chocolate", "coral", "cornflowerblue",
 
    "cornsilk", "crimson", "cyan", "darkblue", "darkcyan", "darkgoldenrod",
 
    "darkgray", "darkgreen", "darkkhaki", "darkmagenta", "darkolivegreen",
 
    "darkorange", "darkorchid", "darkred", "darksalmon", "darkseagreen",
 
    "darkslateblue", "darkslategray", "darkturquoise", "darkviolet",
 
    "deeppink", "deepskyblue", "dimgray", "dodgerblue", "firebrick",
 
    "floralwhite", "forestgreen", "fuchsia", "gainsboro", "ghostwhite",
 
    "gold", "goldenrod", "gray", "green", "greenyellow", "honeydew",
 
    "hotpink", "indianred", "indigo", "ivory", "khaki", "lavender",
 
    "lavenderblush", "lawngreen", "lemonchiffon", "lightblue", "lightcoral",
 
    "lightcyan", "lightgoldenrodyellow", "lightgray", "lightgreen", "lightpink",
 
    "lightsalmon", "lightseagreen", "lightskyblue", "lightslategray",
 
    "lightsteelblue", "lightyellow", "lime", "limegreen", "linen", "magenta",
 
    "maroon", "mediumaquamarine", "mediumblue", "mediumorchid", "mediumpurple",
 
    "mediumseagreen", "mediumslateblue", "mediumspringgreen", "mediumturquoise",
 
    "mediumvioletred", "midnightblue", "mintcream", "mistyrose", "moccasin",
 
    "navajowhite", "navy", "oldlace", "olive", "olivedrab", "orange", "orangered",
 
    "orchid", "palegoldenrod", "palegreen", "paleturquoise", "palevioletred",
 
    "papayawhip", "peachpuff", "peru", "pink", "plum", "powderblue",
 
    "purple", "red", "rosybrown", "royalblue", "saddlebrown", "salmon",
 
    "sandybrown", "seagreen", "seashell", "sienna", "silver", "skyblue",
 
    "slateblue", "slategray", "snow", "springgreen", "steelblue", "tan",
 
    "teal", "thistle", "tomato", "turquoise", "violet", "wheat", "white",
 
    "whitesmoke", "yellow", "yellowgreen"
 
  ]);
 

	
 
  var valueKeywords = keySet([
 
    "above", "absolute", "activeborder", "activecaption", "afar",
 
    "after-white-space", "ahead", "alias", "all", "all-scroll", "alternate",
 
    "always", "amharic", "amharic-abegede", "antialiased", "appworkspace",
 
    "arabic-indic", "armenian", "asterisks", "auto", "avoid", "background",
 
    "backwards", "baseline", "below", "bidi-override", "binary", "bengali",
 
    "blink", "block", "block-axis", "bold", "bolder", "border", "border-box",
 
    "both", "bottom", "break-all", "break-word", "button", "button-bevel",
 
    "buttonface", "buttonhighlight", "buttonshadow", "buttontext", "cambodian",
 
    "capitalize", "caps-lock-indicator", "caption", "captiontext", "caret",
 
    "cell", "center", "checkbox", "circle", "cjk-earthly-branch",
 
    "cjk-heavenly-stem", "cjk-ideographic", "clear", "clip", "close-quote",
 
    "col-resize", "collapse", "compact", "condensed", "contain", "content",
 
    "content-box", "context-menu", "continuous", "copy", "cover", "crop",
 
    "cross", "crosshair", "currentcolor", "cursive", "dashed", "decimal",
 
    "decimal-leading-zero", "default", "default-button", "destination-atop",
 
    "destination-in", "destination-out", "destination-over", "devanagari",
 
    "disc", "discard", "document", "dot-dash", "dot-dot-dash", "dotted",
 
    "double", "down", "e-resize", "ease", "ease-in", "ease-in-out", "ease-out",
 
    "element", "ellipsis", "embed", "end", "ethiopic", "ethiopic-abegede",
 
    "ethiopic-abegede-am-et", "ethiopic-abegede-gez", "ethiopic-abegede-ti-er",
 
    "ethiopic-abegede-ti-et", "ethiopic-halehame-aa-er",
 
    "ethiopic-halehame-aa-et", "ethiopic-halehame-am-et",
 
    "ethiopic-halehame-gez", "ethiopic-halehame-om-et",
 
    "ethiopic-halehame-sid-et", "ethiopic-halehame-so-et",
 
    "ethiopic-halehame-ti-er", "ethiopic-halehame-ti-et",
 
    "ethiopic-halehame-tig", "ew-resize", "expanded", "extra-condensed",
 
    "extra-expanded", "fantasy", "fast", "fill", "fixed", "flat", "footnotes",
 
    "forwards", "from", "geometricPrecision", "georgian", "graytext", "groove",
 
    "gujarati", "gurmukhi", "hand", "hangul", "hangul-consonant", "hebrew",
 
    "help", "hidden", "hide", "higher", "highlight", "highlighttext",
 
    "hiragana", "hiragana-iroha", "horizontal", "hsl", "hsla", "icon", "ignore",
 
    "inactiveborder", "inactivecaption", "inactivecaptiontext", "infinite",
 
    "infobackground", "infotext", "inherit", "initial", "inline", "inline-axis",
 
    "inline-block", "inline-table", "inset", "inside", "intrinsic", "invert",
 
    "italic", "justify", "kannada", "katakana", "katakana-iroha", "khmer",
 
    "landscape", "lao", "large", "larger", "left", "level", "lighter",
 
    "line-through", "linear", "lines", "list-item", "listbox", "listitem",
 
    "local", "logical", "loud", "lower", "lower-alpha", "lower-armenian",
 
    "lower-greek", "lower-hexadecimal", "lower-latin", "lower-norwegian",
 
    "lower-roman", "lowercase", "ltr", "malayalam", "match",
 
    "media-controls-background", "media-current-time-display",
 
    "media-fullscreen-button", "media-mute-button", "media-play-button",
 
    "media-return-to-realtime-button", "media-rewind-button",
 
    "media-seek-back-button", "media-seek-forward-button", "media-slider",
 
    "media-sliderthumb", "media-time-remaining-display", "media-volume-slider",
 
    "media-volume-slider-container", "media-volume-sliderthumb", "medium",
 
    "menu", "menulist", "menulist-button", "menulist-text",
 
    "menulist-textfield", "menutext", "message-box", "middle", "min-intrinsic",
 
    "mix", "mongolian", "monospace", "move", "multiple", "myanmar", "n-resize",
 
    "narrower", "ne-resize", "nesw-resize", "no-close-quote", "no-drop",
 
    "no-open-quote", "no-repeat", "none", "normal", "not-allowed", "nowrap",
 
    "ns-resize", "nw-resize", "nwse-resize", "oblique", "octal", "open-quote",
 
    "optimizeLegibility", "optimizeSpeed", "oriya", "oromo", "outset",
 
    "outside", "overlay", "overline", "padding", "padding-box", "painted",
 
    "paused", "persian", "plus-darker", "plus-lighter", "pointer", "portrait",
 
    "pre", "pre-line", "pre-wrap", "preserve-3d", "progress", "push-button",
 
    "radio", "read-only", "read-write", "read-write-plaintext-only", "relative",
 
    "repeat", "repeat-x", "repeat-y", "reset", "reverse", "rgb", "rgba",
 
    "ridge", "right", "round", "row-resize", "rtl", "run-in", "running",
 
    "s-resize", "sans-serif", "scroll", "scrollbar", "se-resize", "searchfield",
 
    "searchfield-cancel-button", "searchfield-decoration",
 
    "searchfield-results-button", "searchfield-results-decoration",
 
    "semi-condensed", "semi-expanded", "separate", "serif", "show", "sidama",
 
    "single", "skip-white-space", "slide", "slider-horizontal",
 
    "slider-vertical", "sliderthumb-horizontal", "sliderthumb-vertical", "slow",
 
    "small", "small-caps", "small-caption", "smaller", "solid", "somali",
 
    "source-atop", "source-in", "source-out", "source-over", "space", "square",
 
    "square-button", "start", "static", "status-bar", "stretch", "stroke",
 
    "sub", "subpixel-antialiased", "super", "sw-resize", "table",
 
    "table-caption", "table-cell", "table-column", "table-column-group",
 
    "table-footer-group", "table-header-group", "table-row", "table-row-group",
 
    "telugu", "text", "text-bottom", "text-top", "textarea", "textfield", "thai",
 
    "thick", "thin", "threeddarkshadow", "threedface", "threedhighlight",
 
    "threedlightshadow", "threedshadow", "tibetan", "tigre", "tigrinya-er",
 
    "tigrinya-er-abegede", "tigrinya-et", "tigrinya-et-abegede", "to", "top",
 
    "transparent", "ultra-condensed", "ultra-expanded", "underline", "up",
 
    "upper-alpha", "upper-armenian", "upper-greek", "upper-hexadecimal",
 
    "upper-latin", "upper-norwegian", "upper-roman", "uppercase", "urdu", "url",
 
    "vertical", "vertical-text", "visible", "visibleFill", "visiblePainted",
 
    "visibleStroke", "visual", "w-resize", "wait", "wave", "wider",
 
    "window", "windowframe", "windowtext", "x-large", "x-small", "xor",
 
    "xx-large", "xx-small"
 
  ]);
 

	
 
  function tokenCComment(stream, state) {
 
    var maybeEnd = false, ch;
 
    while ((ch = stream.next()) != null) {
 
      if (maybeEnd && ch == "/") {
 
        state.tokenize = null;
 
        break;
 
      }
 
      maybeEnd = (ch == "*");
 
    }
 
    return ["comment", "comment"];
 
  }
 

	
 
  CodeMirror.defineMIME("text/css", {
 
    atMediaTypes: atMediaTypes,
 
    atMediaFeatures: atMediaFeatures,
 
    propertyKeywords: propertyKeywords,
 
    colorKeywords: colorKeywords,
 
    valueKeywords: valueKeywords,
 
    hooks: {
 
      "<": function(stream, state) {
 
        function tokenSGMLComment(stream, state) {
 
          var dashes = 0, ch;
 
          while ((ch = stream.next()) != null) {
 
            if (dashes >= 2 && ch == ">") {
 
              state.tokenize = null;
 
              break;
 
            }
 
            dashes = (ch == "-") ? dashes + 1 : 0;
 
          }
 
          return ["comment", "comment"];
 
        }
 
        if (stream.eat("!")) {
 
          state.tokenize = tokenSGMLComment;
 
          return tokenSGMLComment(stream, state);
 
        }
 
      },
 
      "/": function(stream, state) {
 
        if (stream.eat("*")) {
 
          state.tokenize = tokenCComment;
 
          return tokenCComment(stream, state);
 
        }
 
        return false;
 
      }
 
    },
 
    name: "css-base"
 
  });
 

	
 
  CodeMirror.defineMIME("text/x-scss", {
 
    atMediaTypes: atMediaTypes,
 
    atMediaFeatures: atMediaFeatures,
 
    propertyKeywords: propertyKeywords,
 
    colorKeywords: colorKeywords,
 
    valueKeywords: valueKeywords,
 
    allowNested: true,
 
    hooks: {
 
      "$": function(stream) {
 
        stream.match(/^[\w-]+/);
 
        if (stream.peek() == ":") {
 
          return ["variable", "variable-definition"];
 
        }
 
        return ["variable", "variable"];
 
      },
 
      "/": function(stream, state) {
 
        if (stream.eat("/")) {
 
          stream.skipToEnd();
 
          return ["comment", "comment"];
 
        } else if (stream.eat("*")) {
 
          state.tokenize = tokenCComment;
 
          return tokenCComment(stream, state);
 
        } else {
 
          return ["operator", "operator"];
 
        }
 
      },
 
      "#": function(stream) {
 
        if (stream.eat("{")) {
 
          return ["operator", "interpolation"];
 
        } else {
 
          stream.eatWhile(/[\w\\\-]/);
 
          return ["atom", "hash"];
 
        }
 
      }
 
    },
 
    name: "css-base"
 
  });
 
})();
rhodecode/public/js/mode/css/index.html
Show inline comments
 
new file 100644
 
<!doctype html>
 
<html>
 
  <head>
 
    <meta charset="utf-8">
 
    <title>CodeMirror: CSS mode</title>
 
    <link rel="stylesheet" href="../../lib/codemirror.css">
 
    <script src="../../lib/codemirror.js"></script>
 
    <script src="css.js"></script>
 
    <style>.CodeMirror {background: #f8f8f8;}</style>
 
    <link rel="stylesheet" href="../../doc/docs.css">
 
  </head>
 
  <body>
 
    <h1>CodeMirror: CSS mode</h1>
 
    <form><textarea id="code" name="code">
 
/* Some example CSS */
 

	
 
@import url("something.css");
 

	
 
body {
 
  margin: 0;
 
  padding: 3em 6em;
 
  font-family: tahoma, arial, sans-serif;
 
  color: #000;
 
}
 

	
 
#navigation a {
 
  font-weight: bold;
 
  text-decoration: none !important;
 
}
 

	
 
h1 {
 
  font-size: 2.5em;
 
}
 

	
 
h2 {
 
  font-size: 1.7em;
 
}
 

	
 
h1:before, h2:before {
 
  content: "::";
 
}
 

	
 
code {
 
  font-family: courier, monospace;
 
  font-size: 80%;
 
  color: #418A8A;
 
}
 
</textarea></form>
 
    <script>
 
      var editor = CodeMirror.fromTextArea(document.getElementById("code"), {});
 
    </script>
 

	
 
    <p><strong>MIME types defined:</strong> <code>text/css</code>.</p>
 

	
 
    <p><strong>Parsing/Highlighting Tests:</strong> <a href="../../test/index.html#css_*">normal</a>,  <a href="../../test/index.html#verbose,css_*">verbose</a>.</p>
 

	
 
  </body>
 
</html>
rhodecode/public/js/mode/css/scss.html
Show inline comments
 
new file 100644
 
<!doctype html>
 
<html>
 
  <head>
 
    <meta charset="utf-8">
 
    <title>CodeMirror: SCSS mode</title>
 
    <link rel="stylesheet" href="../../lib/codemirror.css">
 
    <script src="../../lib/codemirror.js"></script>
 
    <script src="css.js"></script>
 
    <style>.CodeMirror {background: #f8f8f8;}</style>
 
    <link rel="stylesheet" href="../../doc/docs.css">
 
  </head>
 
  <body>
 
    <h1>CodeMirror: SCSS mode</h1>
 
    <form><textarea id="code" name="code">
 
/* Some example SCSS */
 

	
 
@import "compass/css3";
 
$variable: #333;
 

	
 
$blue: #3bbfce;
 
$margin: 16px;
 

	
 
.content-navigation {
 
  #nested {
 
    background-color: black;
 
  }
 
  border-color: $blue;
 
  color:
 
    darken($blue, 9%);
 
}
 

	
 
.border {
 
  padding: $margin / 2;
 
  margin: $margin / 2;
 
  border-color: $blue;
 
}
 

	
 
@mixin table-base {
 
  th {
 
    text-align: center;
 
    font-weight: bold;
 
  }
 
  td, th {padding: 2px}
 
}
 

	
 
table.hl {
 
  margin: 2em 0;
 
  td.ln {
 
    text-align: right;
 
  }
 
}
 

	
 
li {
 
  font: {
 
    family: serif;
 
    weight: bold;
 
    size: 1.2em;
 
  }
 
}
 

	
 
@mixin left($dist) {
 
  float: left;
 
  margin-left: $dist;
 
}
 

	
 
#data {
 
  @include left(10px);
 
  @include table-base;
 
}
 

	
 
.source {
 
  @include flow-into(target);
 
  border: 10px solid green;
 
  margin: 20px;
 
  width: 200px; }
 

	
 
.new-container {
 
  @include flow-from(target);
 
  border: 10px solid red;
 
  margin: 20px;
 
  width: 200px; }
 

	
 
body {
 
  margin: 0;
 
  padding: 3em 6em;
 
  font-family: tahoma, arial, sans-serif;
 
  color: #000;
 
}
 

	
 
@mixin yellow() {
 
  background: yellow;
 
}
 

	
 
.big {
 
  font-size: 14px;
 
}
 

	
 
.nested {
 
  @include border-radius(3px);
 
  @extend .big;
 
  p {
 
    background: whitesmoke;
 
    a {
 
      color: red;
 
    }
 
  }
 
}
 

	
 
#navigation a {
 
  font-weight: bold;
 
  text-decoration: none !important;
 
}
 

	
 
h1 {
 
  font-size: 2.5em;
 
}
 

	
 
h2 {
 
  font-size: 1.7em;
 
}
 

	
 
h1:before, h2:before {
 
  content: "::";
 
}
 

	
 
code {
 
  font-family: courier, monospace;
 
  font-size: 80%;
 
  color: #418A8A;
 
}
 
</textarea></form>
 
    <script>
 
      var editor = CodeMirror.fromTextArea(document.getElementById("code"), {
 
        lineNumbers: true,
 
        matchBrackets: true,
 
        mode: "text/x-scss"
 
      });
 
    </script>
 

	
 
    <p><strong>MIME types defined:</strong> <code>text/scss</code>.</p>
 

	
 
    <p><strong>Parsing/Highlighting Tests:</strong> <a href="../../test/index.html#scss_*">normal</a>,  <a href="../../test/index.html#verbose,scss_*">verbose</a>.</p>
 

	
 
  </body>
 
</html>
rhodecode/public/js/mode/css/scss_test.js
Show inline comments
 
new file 100644
 
(function() {
 
  var mode = CodeMirror.getMode({tabSize: 4}, "text/x-scss");
 
  function MT(name) { test.mode(name, mode, Array.prototype.slice.call(arguments, 1), "scss"); }
 

	
 
  MT('url_with_quotation',
 
    "[tag foo] { [property background][operator :][string-2 url]([string test.jpg]) }");
 

	
 
  MT('url_with_double_quotes',
 
    "[tag foo] { [property background][operator :][string-2 url]([string \"test.jpg\"]) }");
 

	
 
  MT('url_with_single_quotes',
 
    "[tag foo] { [property background][operator :][string-2 url]([string \'test.jpg\']) }");
 

	
 
  MT('string',
 
    "[def @import] [string \"compass/css3\"]");
 

	
 
  MT('important_keyword',
 
    "[tag foo] { [property background][operator :][string-2 url]([string \'test.jpg\']) [keyword !important] }");
 

	
 
  MT('variable',
 
    "[variable-2 $blue][operator :][atom #333]");
 

	
 
  MT('variable_as_attribute',
 
    "[tag foo] { [property color][operator :][variable-2 $blue] }");
 

	
 
  MT('numbers',
 
    "[tag foo] { [property padding][operator :][number 10px] [number 10] [number 10em] [number 8in] }");
 

	
 
  MT('number_percentage',
 
    "[tag foo] { [property width][operator :][number 80%] }");
 

	
 
  MT('selector',
 
    "[builtin #hello][qualifier .world]{}");
 

	
 
  MT('singleline_comment',
 
    "[comment // this is a comment]");
 

	
 
  MT('multiline_comment',
 
    "[comment /*foobar*/]");
 

	
 
  MT('attribute_with_hyphen',
 
    "[tag foo] { [property font-size][operator :][number 10px] }");
 

	
 
  MT('string_after_attribute',
 
    "[tag foo] { [property content][operator :][string \"::\"] }");
 

	
 
  MT('directives',
 
    "[def @include] [qualifier .mixin]");
 

	
 
  MT('basic_structure',
 
    "[tag p] { [property background][operator :][keyword red]; }");
 

	
 
  MT('nested_structure',
 
    "[tag p] { [tag a] { [property color][operator :][keyword red]; } }");
 

	
 
  MT('mixin',
 
    "[def @mixin] [tag table-base] {}");
 

	
 
  MT('number_without_semicolon',
 
    "[tag p] {[property width][operator :][number 12]}",
 
    "[tag a] {[property color][operator :][keyword red];}");
 

	
 
  MT('atom_in_nested_block',
 
    "[tag p] { [tag a] { [property color][operator :][atom #000]; } }");
 

	
 
  MT('interpolation_in_property',
 
    "[tag foo] { [operator #{][variable-2 $hello][operator }:][atom #000]; }");
 

	
 
  MT('interpolation_in_selector',
 
    "[tag foo][operator #{][variable-2 $hello][operator }] { [property color][operator :][atom #000]; }");
 

	
 
  MT('interpolation_error',
 
    "[tag foo][operator #{][error foo][operator }] { [property color][operator :][atom #000]; }");
 

	
 
  MT("divide_operator",
 
    "[tag foo] { [property width][operator :][number 4] [operator /] [number 2] }");
 

	
 
  MT('nested_structure_with_id_selector',
 
    "[tag p] { [builtin #hello] { [property color][operator :][keyword red]; } }");
 
})();
rhodecode/public/js/mode/css/test.js
Show inline comments
 
new file 100644
 
(function() {
 
  var mode = CodeMirror.getMode({tabSize: 4}, "css");
 
  function MT(name) { test.mode(name, mode, Array.prototype.slice.call(arguments, 1)); }
 

	
 
  // Requires at least one media query
 
  MT("atMediaEmpty",
 
     "[def @media] [error {] }");
 

	
 
  MT("atMediaMultiple",
 
     "[def @media] [keyword not] [attribute screen] [operator and] ([property color]), [keyword not] [attribute print] [operator and] ([property color]) { }");
 

	
 
  MT("atMediaCheckStack",
 
     "[def @media] [attribute screen] { } [tag foo] { }");
 

	
 
  MT("atMediaCheckStack",
 
     "[def @media] [attribute screen] ([property color]) { } [tag foo] { }");
 

	
 
  MT("atMediaCheckStackInvalidAttribute",
 
     "[def @media] [attribute&error foobarhello] { } [tag foo] { }");
 

	
 
  // Error, because "and" is only allowed immediately preceding a media expression
 
  MT("atMediaInvalidAttribute",
 
     "[def @media] [attribute&error foobarhello] { }");
 

	
 
  // Error, because "and" is only allowed immediately preceding a media expression
 
  MT("atMediaInvalidAnd",
 
     "[def @media] [error and] [attribute screen] { }");
 

	
 
  // Error, because "not" is only allowed as the first item in each media query
 
  MT("atMediaInvalidNot",
 
     "[def @media] [attribute screen] [error not] ([error not]) { }");
 

	
 
  // Error, because "only" is only allowed as the first item in each media query
 
  MT("atMediaInvalidOnly",
 
     "[def @media] [attribute screen] [error only] ([error only]) { }");
 

	
 
  // Error, because "foobarhello" is neither a known type or property, but
 
  // property was expected (after "and"), and it should be in parenthese.
 
  MT("atMediaUnknownType",
 
     "[def @media] [attribute screen] [operator and] [error foobarhello] { }");
 

	
 
  // Error, because "color" is not a known type, but is a known property, and
 
  // should be in parentheses.
 
  MT("atMediaInvalidType",
 
     "[def @media] [attribute screen] [operator and] [error color] { }");
 

	
 
  // Error, because "print" is not a known property, but is a known type,
 
  // and should not be in parenthese.
 
  MT("atMediaInvalidProperty",
 
     "[def @media] [attribute screen] [operator and] ([error print]) { }");
 

	
 
  // Soft error, because "foobarhello" is not a known property or type.
 
  MT("atMediaUnknownProperty",
 
     "[def @media] [attribute screen] [operator and] ([property&error foobarhello]) { }");
 

	
 
  MT("tagSelector",
 
     "[tag foo] { }");
 

	
 
  MT("classSelector",
 
     "[qualifier .foo-bar_hello] { }");
 

	
 
  MT("idSelector",
 
     "[builtin #foo] { [error #foo] }");
 

	
 
  MT("tagSelectorUnclosed",
 
     "[tag foo] { [property margin][operator :] [number 0] } [tag bar] { }");
 

	
 
  MT("tagStringNoQuotes",
 
     "[tag foo] { [property font-family][operator :] [variable-2 hello] [variable-2 world]; }");
 

	
 
  MT("tagStringDouble",
 
     "[tag foo] { [property font-family][operator :] [string \"hello world\"]; }");
 

	
 
  MT("tagStringSingle",
 
     "[tag foo] { [property font-family][operator :] [string 'hello world']; }");
 

	
 
  MT("tagColorKeyword",
 
     "[tag foo] {" +
 
       "[property color][operator :] [keyword black];" +
 
       "[property color][operator :] [keyword navy];" +
 
       "[property color][operator :] [keyword yellow];" +
 
       "}");
 

	
 
  MT("tagColorHex3",
 
     "[tag foo] { [property background][operator :] [atom #fff]; }");
 

	
 
  MT("tagColorHex6",
 
     "[tag foo] { [property background][operator :] [atom #ffffff]; }");
 

	
 
  MT("tagColorHex4",
 
     "[tag foo] { [property background][operator :] [atom&error #ffff]; }");
 

	
 
  MT("tagColorHexInvalid",
 
     "[tag foo] { [property background][operator :] [atom&error #ffg]; }");
 

	
 
  MT("tagNegativeNumber",
 
     "[tag foo] { [property margin][operator :] [number -5px]; }");
 

	
 
  MT("tagPositiveNumber",
 
     "[tag foo] { [property padding][operator :] [number 5px]; }");
 

	
 
  MT("tagVendor",
 
     "[tag foo] { [meta -foo-][property box-sizing][operator :] [meta -foo-][string-2 border-box]; }");
 

	
 
  MT("tagBogusProperty",
 
     "[tag foo] { [property&error barhelloworld][operator :] [number 0]; }");
 

	
 
  MT("tagTwoProperties",
 
     "[tag foo] { [property margin][operator :] [number 0]; [property padding][operator :] [number 0]; }");
 

	
 
  MT("commentSGML",
 
     "[comment <!--comment-->]");
 
})();
rhodecode/public/js/mode/d/d.js
Show inline comments
 
new file 100755
 
CodeMirror.defineMode("d", function(config, parserConfig) {
 
  var indentUnit = config.indentUnit,
 
      statementIndentUnit = parserConfig.statementIndentUnit || indentUnit,
 
      keywords = parserConfig.keywords || {},
 
      builtin = parserConfig.builtin || {},
 
      blockKeywords = parserConfig.blockKeywords || {},
 
      atoms = parserConfig.atoms || {},
 
      hooks = parserConfig.hooks || {},
 
      multiLineStrings = parserConfig.multiLineStrings;
 
  var isOperatorChar = /[+\-*&%=<>!?|\/]/;
 

	
 
  var curPunc;
 

	
 
  function tokenBase(stream, state) {
 
    var ch = stream.next();
 
    if (hooks[ch]) {
 
      var result = hooks[ch](stream, state);
 
      if (result !== false) return result;
 
    }
 
    if (ch == '"' || ch == "'" || ch == "`") {
 
      state.tokenize = tokenString(ch);
 
      return state.tokenize(stream, state);
 
    }
 
    if (/[\[\]{}\(\),;\:\.]/.test(ch)) {
 
      curPunc = ch;
 
      return null;
 
    }
 
    if (/\d/.test(ch)) {
 
      stream.eatWhile(/[\w\.]/);
 
      return "number";
 
    }
 
    if (ch == "/") {
 
      if (stream.eat("+")) {
 
        state.tokenize = tokenComment;
 
        return tokenNestedComment(stream, state);
 
      }
 
      if (stream.eat("*")) {
 
        state.tokenize = tokenComment;
 
        return tokenComment(stream, state);
 
      }
 
      if (stream.eat("/")) {
 
        stream.skipToEnd();
 
        return "comment";
 
      }
 
    }
 
    if (isOperatorChar.test(ch)) {
 
      stream.eatWhile(isOperatorChar);
 
      return "operator";
 
    }
 
    stream.eatWhile(/[\w\$_]/);
 
    var cur = stream.current();
 
    if (keywords.propertyIsEnumerable(cur)) {
 
      if (blockKeywords.propertyIsEnumerable(cur)) curPunc = "newstatement";
 
      return "keyword";
 
    }
 
    if (builtin.propertyIsEnumerable(cur)) {
 
      if (blockKeywords.propertyIsEnumerable(cur)) curPunc = "newstatement";
 
      return "builtin";
 
    }
 
    if (atoms.propertyIsEnumerable(cur)) return "atom";
 
    return "variable";
 
  }
 

	
 
  function tokenString(quote) {
 
    return function(stream, state) {
 
      var escaped = false, next, end = false;
 
      while ((next = stream.next()) != null) {
 
        if (next == quote && !escaped) {end = true; break;}
 
        escaped = !escaped && next == "\\";
 
      }
 
      if (end || !(escaped || multiLineStrings))
 
        state.tokenize = null;
 
      return "string";
 
    };
 
  }
 

	
 
  function tokenComment(stream, state) {
 
    var maybeEnd = false, ch;
 
    while (ch = stream.next()) {
 
      if (ch == "/" && maybeEnd) {
 
        state.tokenize = null;
 
        break;
 
      }
 
      maybeEnd = (ch == "*");
 
    }
 
    return "comment";
 
  }
 

	
 
  function tokenNestedComment(stream, state) {
 
    var maybeEnd = false, ch;
 
    while (ch = stream.next()) {
 
      if (ch == "/" && maybeEnd) {
 
        state.tokenize = null;
 
        break;
 
      }
 
      maybeEnd = (ch == "+");
 
    }
 
    return "comment";
 
  }
 

	
 
  function Context(indented, column, type, align, prev) {
 
    this.indented = indented;
 
    this.column = column;
 
    this.type = type;
 
    this.align = align;
 
    this.prev = prev;
 
  }
 
  function pushContext(state, col, type) {
 
    var indent = state.indented;
 
    if (state.context && state.context.type == "statement")
 
      indent = state.context.indented;
 
    return state.context = new Context(indent, col, type, null, state.context);
 
  }
 
  function popContext(state) {
 
    var t = state.context.type;
 
    if (t == ")" || t == "]" || t == "}")
 
      state.indented = state.context.indented;
 
    return state.context = state.context.prev;
 
  }
 

	
 
  // Interface
 

	
 
  return {
 
    startState: function(basecolumn) {
 
      return {
 
        tokenize: null,
 
        context: new Context((basecolumn || 0) - indentUnit, 0, "top", false),
 
        indented: 0,
 
        startOfLine: true
 
      };
 
    },
 

	
 
    token: function(stream, state) {
 
      var ctx = state.context;
 
      if (stream.sol()) {
 
        if (ctx.align == null) ctx.align = false;
 
        state.indented = stream.indentation();
 
        state.startOfLine = true;
 
      }
 
      if (stream.eatSpace()) return null;
 
      curPunc = null;
 
      var style = (state.tokenize || tokenBase)(stream, state);
 
      if (style == "comment" || style == "meta") return style;
 
      if (ctx.align == null) ctx.align = true;
 

	
 
      if ((curPunc == ";" || curPunc == ":" || curPunc == ",") && ctx.type == "statement") popContext(state);
 
      else if (curPunc == "{") pushContext(state, stream.column(), "}");
 
      else if (curPunc == "[") pushContext(state, stream.column(), "]");
 
      else if (curPunc == "(") pushContext(state, stream.column(), ")");
 
      else if (curPunc == "}") {
 
        while (ctx.type == "statement") ctx = popContext(state);
 
        if (ctx.type == "}") ctx = popContext(state);
 
        while (ctx.type == "statement") ctx = popContext(state);
 
      }
 
      else if (curPunc == ctx.type) popContext(state);
 
      else if (((ctx.type == "}" || ctx.type == "top") && curPunc != ';') || (ctx.type == "statement" && curPunc == "newstatement"))
 
        pushContext(state, stream.column(), "statement");
 
      state.startOfLine = false;
 
      return style;
 
    },
 

	
 
    indent: function(state, textAfter) {
 
      if (state.tokenize != tokenBase && state.tokenize != null) return CodeMirror.Pass;
 
      var ctx = state.context, firstChar = textAfter && textAfter.charAt(0);
 
      if (ctx.type == "statement" && firstChar == "}") ctx = ctx.prev;
 
      var closing = firstChar == ctx.type;
 
      if (ctx.type == "statement") return ctx.indented + (firstChar == "{" ? 0 : statementIndentUnit);
 
      else if (ctx.align) return ctx.column + (closing ? 0 : 1);
 
      else return ctx.indented + (closing ? 0 : indentUnit);
 
    },
 

	
 
    electricChars: "{}"
 
  };
 
});
 

	
 
(function() {
 
  function words(str) {
 
    var obj = {}, words = str.split(" ");
 
    for (var i = 0; i < words.length; ++i) obj[words[i]] = true;
 
    return obj;
 
  }
 

	
 
  var blockKeywords = "body catch class do else enum for foreach foreach_reverse if in interface mixin " +
 
                      "out scope struct switch try union unittest version while with";
 

	
 
  CodeMirror.defineMIME("text/x-d", {
 
    name: "d",
 
    keywords: words("abstract alias align asm assert auto break case cast cdouble cent cfloat const continue " +
 
                    "debug default delegate delete deprecated export extern final finally function goto immutable " +
 
                    "import inout invariant is lazy macro module new nothrow override package pragma private " +
 
                    "protected public pure ref return shared short static super synchronized template this " +
 
                    "throw typedef typeid typeof volatile __FILE__ __LINE__ __gshared __traits __vector __parameters " +
 
                    blockKeywords),
 
    blockKeywords: words(blockKeywords),
 
    builtin: words("bool byte char creal dchar double float idouble ifloat int ireal long real short ubyte " +
 
                   "ucent uint ulong ushort wchar wstring void size_t sizediff_t"),
 
    atoms: words("exit failure success true false null"),
 
    hooks: {
 
      "@": function(stream, _state) {
 
        stream.eatWhile(/[\w\$_]/);
 
        return "meta";
 
      }
 
    }
 
  });
 
}());
rhodecode/public/js/mode/d/index.html
Show inline comments
 
new file 100755
 
<!doctype html>
 
<html>
 
  <head>
 
    <meta charset="utf-8">
 
    <title>CodeMirror: D mode</title>
 
    <link rel="stylesheet" href="../../lib/codemirror.css">
 
    <script src="../../lib/codemirror.js"></script>
 
    <script src="../../addon/edit/matchbrackets.js"></script>
 
    <script src="d.js"></script>
 
    <link rel="stylesheet" href="../../doc/docs.css">
 
    <style>.CodeMirror {border: 2px inset #dee;}</style>
 
  </head>
 
  <body>
 
    <h1>CodeMirror: D mode</h1>
 

	
 
<form><textarea id="code" name="code">
 
/* D demo code // copied from phobos/sd/metastrings.d */
 
// Written in the D programming language.
 

	
 
/**
 
Templates with which to do compile-time manipulation of strings.
 

	
 
Macros:
 
 WIKI = Phobos/StdMetastrings
 

	
 
Copyright: Copyright Digital Mars 2007 - 2009.
 
License:   <a href="http://www.boost.org/LICENSE_1_0.txt">Boost License 1.0</a>.
 
Authors:   $(WEB digitalmars.com, Walter Bright),
 
           Don Clugston
 
Source:    $(PHOBOSSRC std/_metastrings.d)
 
*/
 
/*
 
         Copyright Digital Mars 2007 - 2009.
 
Distributed under the Boost Software License, Version 1.0.
 
   (See accompanying file LICENSE_1_0.txt or copy at
 
         http://www.boost.org/LICENSE_1_0.txt)
 
 */
 
module std.metastrings;
 

	
 
/**
 
Formats constants into a string at compile time.  Analogous to $(XREF
 
string,format).
 

	
 
Parameters:
 

	
 
A = tuple of constants, which can be strings, characters, or integral
 
    values.
 

	
 
Formats:
 
 *    The formats supported are %s for strings, and %%
 
 *    for the % character.
 
Example:
 
---
 
import std.metastrings;
 
import std.stdio;
 

	
 
void main()
 
{
 
  string s = Format!("Arg %s = %s", "foo", 27);
 
  writefln(s); // "Arg foo = 27"
 
}
 
 * ---
 
 */
 

	
 
template Format(A...)
 
{
 
    static if (A.length == 0)
 
        enum Format = "";
 
    else static if (is(typeof(A[0]) : const(char)[]))
 
        enum Format = FormatString!(A[0], A[1..$]);
 
    else
 
        enum Format = toStringNow!(A[0]) ~ Format!(A[1..$]);
 
}
 

	
 
template FormatString(const(char)[] F, A...)
 
{
 
    static if (F.length == 0)
 
        enum FormatString = Format!(A);
 
    else static if (F.length == 1)
 
        enum FormatString = F[0] ~ Format!(A);
 
    else static if (F[0..2] == "%s")
 
        enum FormatString
 
            = toStringNow!(A[0]) ~ FormatString!(F[2..$],A[1..$]);
 
    else static if (F[0..2] == "%%")
 
        enum FormatString = "%" ~ FormatString!(F[2..$],A);
 
    else
 
    {
 
        static assert(F[0] != '%', "unrecognized format %" ~ F[1]);
 
        enum FormatString = F[0] ~ FormatString!(F[1..$],A);
 
    }
 
}
 

	
 
unittest
 
{
 
    auto s = Format!("hel%slo", "world", -138, 'c', true);
 
    assert(s == "helworldlo-138ctrue", "[" ~ s ~ "]");
 
}
 

	
 
/**
 
 * Convert constant argument to a string.
 
 */
 

	
 
template toStringNow(ulong v)
 
{
 
    static if (v < 10)
 
        enum toStringNow = "" ~ cast(char)(v + '0');
 
    else
 
        enum toStringNow = toStringNow!(v / 10) ~ toStringNow!(v % 10);
 
}
 

	
 
unittest
 
{
 
    static assert(toStringNow!(1uL << 62) == "4611686018427387904");
 
}
 

	
 
/// ditto
 
template toStringNow(long v)
 
{
 
    static if (v < 0)
 
        enum toStringNow = "-" ~ toStringNow!(cast(ulong) -v);
 
    else
 
        enum toStringNow = toStringNow!(cast(ulong) v);
 
}
 

	
 
unittest
 
{
 
    static assert(toStringNow!(0x100000000) == "4294967296");
 
    static assert(toStringNow!(-138L) == "-138");
 
}
 

	
 
/// ditto
 
template toStringNow(uint U)
 
{
 
    enum toStringNow = toStringNow!(cast(ulong)U);
 
}
 

	
 
/// ditto
 
template toStringNow(int I)
 
{
 
    enum toStringNow = toStringNow!(cast(long)I);
 
}
 

	
 
/// ditto
 
template toStringNow(bool B)
 
{
 
    enum toStringNow = B ? "true" : "false";
 
}
 

	
 
/// ditto
 
template toStringNow(string S)
 
{
 
    enum toStringNow = S;
 
}
 

	
 
/// ditto
 
template toStringNow(char C)
 
{
 
    enum toStringNow = "" ~ C;
 
}
 

	
 

	
 
/********
 
 * Parse unsigned integer literal from the start of string s.
 
 * returns:
 
 *    .value = the integer literal as a string,
 
 *    .rest = the string following the integer literal
 
 * Otherwise:
 
 *    .value = null,
 
 *    .rest = s
 
 */
 

	
 
template parseUinteger(const(char)[] s)
 
{
 
    static if (s.length == 0)
 
    {
 
        enum value = "";
 
        enum rest = "";
 
    }
 
    else static if (s[0] >= '0' && s[0] <= '9')
 
    {
 
        enum value = s[0] ~ parseUinteger!(s[1..$]).value;
 
        enum rest = parseUinteger!(s[1..$]).rest;
 
    }
 
    else
 
    {
 
        enum value = "";
 
        enum rest = s;
 
    }
 
}
 

	
 
/********
 
Parse integer literal optionally preceded by $(D '-') from the start
 
of string $(D s).
 

	
 
Returns:
 
   .value = the integer literal as a string,
 
   .rest = the string following the integer literal
 

	
 
Otherwise:
 
   .value = null,
 
   .rest = s
 
*/
 

	
 
template parseInteger(const(char)[] s)
 
{
 
    static if (s.length == 0)
 
    {
 
        enum value = "";
 
        enum rest = "";
 
    }
 
    else static if (s[0] >= '0' && s[0] <= '9')
 
    {
 
        enum value = s[0] ~ parseUinteger!(s[1..$]).value;
 
        enum rest = parseUinteger!(s[1..$]).rest;
 
    }
 
    else static if (s.length >= 2 &&
 
            s[0] == '-' && s[1] >= '0' && s[1] <= '9')
 
    {
 
        enum value = s[0..2] ~ parseUinteger!(s[2..$]).value;
 
        enum rest = parseUinteger!(s[2..$]).rest;
 
    }
 
    else
 
    {
 
        enum value = "";
 
        enum rest = s;
 
    }
 
}
 

	
 
unittest
 
{
 
    assert(parseUinteger!("1234abc").value == "1234");
 
    assert(parseUinteger!("1234abc").rest == "abc");
 
    assert(parseInteger!("-1234abc").value == "-1234");
 
    assert(parseInteger!("-1234abc").rest == "abc");
 
}
 

	
 
/**
 
Deprecated aliases held for backward compatibility.
 
*/
 
deprecated alias toStringNow ToString;
 
/// Ditto
 
deprecated alias parseUinteger ParseUinteger;
 
/// Ditto
 
deprecated alias parseUinteger ParseInteger;
 

	
 
</textarea></form>
 

	
 
    <script>
 
      var editor = CodeMirror.fromTextArea(document.getElementById("code"), {
 
        lineNumbers: true,
 
        matchBrackets: true,
 
        indentUnit: 4,
 
        mode: "text/x-d"
 
      });
 
    </script>
 

	
 
    <p>Simple mode that handle D-Syntax (<a href="http://www.dlang.org">DLang Homepage</a>).</p>
 

	
 
    <p><strong>MIME types defined:</strong> <code>text/x-d</code>
 
    .</p>
 
  </body>
 
</html>
rhodecode/public/js/mode/diff/diff.js
Show inline comments
 
new file 100644
 
CodeMirror.defineMode("diff", function() {
 

	
 
  var TOKEN_NAMES = {
 
    '+': 'positive',
 
    '-': 'negative',
 
    '@': 'meta'
 
  };
 

	
 
  return {
 
    token: function(stream) {
 
      var tw_pos = stream.string.search(/[\t ]+?$/);
 

	
 
      if (!stream.sol() || tw_pos === 0) {
 
        stream.skipToEnd();
 
        return ("error " + (
 
          TOKEN_NAMES[stream.string.charAt(0)] || '')).replace(/ $/, '');
 
      }
 

	
 
      var token_name = TOKEN_NAMES[stream.peek()] || stream.skipToEnd();
 

	
 
      if (tw_pos === -1) {
 
        stream.skipToEnd();
 
      } else {
 
        stream.pos = tw_pos;
 
      }
 

	
 
      return token_name;
 
    }
 
  };
 
});
 

	
 
CodeMirror.defineMIME("text/x-diff", "diff");
rhodecode/public/js/mode/diff/index.html
Show inline comments
 
new file 100644
 
<!doctype html>
 
<html>
 
  <head>
 
    <meta charset="utf-8">
 
    <title>CodeMirror: Diff mode</title>
 
    <link rel="stylesheet" href="../../lib/codemirror.css">
 
    <script src="../../lib/codemirror.js"></script>
 
    <script src="diff.js"></script>
 
    <style>
 
      .CodeMirror {border-top: 1px solid #ddd; border-bottom: 1px solid #ddd;}
 
      span.cm-meta {color: #a0b !important;}
 
      span.cm-error { background-color: black; opacity: 0.4;}
 
      span.cm-error.cm-string { background-color: red; }
 
      span.cm-error.cm-tag { background-color: #2b2; }
 
    </style>
 
    <link rel="stylesheet" href="../../doc/docs.css">
 
  </head>
 
  <body>
 
    <h1>CodeMirror: Diff mode</h1>
 
    <form><textarea id="code" name="code">
 
diff --git a/index.html b/index.html
 
index c1d9156..7764744 100644
 
--- a/index.html
 
+++ b/index.html
 
@@ -95,7 +95,8 @@ StringStream.prototype = {
 
     <script>
 
       var editor = CodeMirror.fromTextArea(document.getElementById("code"), {
 
         lineNumbers: true,
 
-        autoMatchBrackets: true
 
+        autoMatchBrackets: true,
 
+      onGutterClick: function(x){console.log(x);}
 
       });
 
     </script>
 
   </body>
 
diff --git a/lib/codemirror.js b/lib/codemirror.js
 
index 04646a9..9a39cc7 100644
 
--- a/lib/codemirror.js
 
+++ b/lib/codemirror.js
 
@@ -399,10 +399,16 @@ var CodeMirror = (function() {
 
     }
 
 
 
     function onMouseDown(e) {
 
-      var start = posFromMouse(e), last = start;    
 
+      var start = posFromMouse(e), last = start, target = e.target();
 
       if (!start) return;
 
       setCursor(start.line, start.ch, false);
 
       if (e.button() != 1) return;
 
+      if (target.parentNode == gutter) {    
 
+        if (options.onGutterClick)
 
+          options.onGutterClick(indexOf(gutter.childNodes, target) + showingFrom);
 
+        return;
 
+      }
 
+
 
       if (!focused) onFocus();
 
 
 
       e.stop();
 
@@ -808,7 +814,7 @@ var CodeMirror = (function() {
 
       for (var i = showingFrom; i < showingTo; ++i) {
 
         var marker = lines[i].gutterMarker;
 
         if (marker) html.push('<div class="' + marker.style + '">' + htmlEscape(marker.text) + '</div>');
 
-        else html.push("<div>" + (options.lineNumbers ? i + 1 : "\u00a0") + "</div>");
 
+        else html.push("<div>" + (options.lineNumbers ? i + options.firstLineNumber : "\u00a0") + "</div>");
 
       }
 
       gutter.style.display = "none"; // TODO test whether this actually helps
 
       gutter.innerHTML = html.join("");
 
@@ -1371,10 +1377,8 @@ var CodeMirror = (function() {
 
         if (option == "parser") setParser(value);
 
         else if (option === "lineNumbers") setLineNumbers(value);
 
         else if (option === "gutter") setGutter(value);
 
-        else if (option === "readOnly") options.readOnly = value;
 
-        else if (option === "indentUnit") {options.indentUnit = indentUnit = value; setParser(options.parser);}
 
-        else if (/^(?:enterMode|tabMode|indentWithTabs|readOnly|autoMatchBrackets|undoDepth)$/.test(option)) options[option] = value;
 
-        else throw new Error("Can't set option " + option);
 
+        else if (option === "indentUnit") {options.indentUnit = value; setParser(options.parser);}
 
+        else options[option] = value;
 
       },
 
       cursorCoords: cursorCoords,
 
       undo: operation(undo),
 
@@ -1402,7 +1406,8 @@ var CodeMirror = (function() {
 
       replaceRange: operation(replaceRange),
 
 
 
       operation: function(f){return operation(f)();},
 
-      refresh: function(){updateDisplay([{from: 0, to: lines.length}]);}
 
+      refresh: function(){updateDisplay([{from: 0, to: lines.length}]);},
 
+      getInputField: function(){return input;}
 
     };
 
     return instance;
 
   }
 
@@ -1420,6 +1425,7 @@ var CodeMirror = (function() {
 
     readOnly: false,
 
     onChange: null,
 
     onCursorActivity: null,
 
+    onGutterClick: null,
 
     autoMatchBrackets: false,
 
     workTime: 200,
 
     workDelay: 300,
 
</textarea></form>
 
    <script>
 
      var editor = CodeMirror.fromTextArea(document.getElementById("code"), {});
 
    </script>
 

	
 
    <p><strong>MIME types defined:</strong> <code>text/x-diff</code>.</p>
 

	
 
  </body>
 
</html>
rhodecode/public/js/mode/ecl/ecl.js
Show inline comments
 
new file 100644
 
CodeMirror.defineMode("ecl", function(config) {
 

	
 
  function words(str) {
 
    var obj = {}, words = str.split(" ");
 
    for (var i = 0; i < words.length; ++i) obj[words[i]] = true;
 
    return obj;
 
  }
 

	
 
  function metaHook(stream, state) {
 
    if (!state.startOfLine) return false;
 
    stream.skipToEnd();
 
    return "meta";
 
  }
 

	
 
  var indentUnit = config.indentUnit;
 
  var keyword = words("abs acos allnodes ascii asin asstring atan atan2 ave case choose choosen choosesets clustersize combine correlation cos cosh count covariance cron dataset dedup define denormalize distribute distributed distribution ebcdic enth error evaluate event eventextra eventname exists exp failcode failmessage fetch fromunicode getisvalid global graph group hash hash32 hash64 hashcrc hashmd5 having if index intformat isvalid iterate join keyunicode length library limit ln local log loop map matched matchlength matchposition matchtext matchunicode max merge mergejoin min nolocal nonempty normalize parse pipe power preload process project pull random range rank ranked realformat recordof regexfind regexreplace regroup rejected rollup round roundup row rowdiff sample set sin sinh sizeof soapcall sort sorted sqrt stepped stored sum table tan tanh thisnode topn tounicode transfer trim truncate typeof ungroup unicodeorder variance which workunit xmldecode xmlencode xmltext xmlunicode");
 
  var variable = words("apply assert build buildindex evaluate fail keydiff keypatch loadxml nothor notify output parallel sequential soapcall wait");
 
  var variable_2 = words("__compressed__ all and any as atmost before beginc++ best between case const counter csv descend encrypt end endc++ endmacro except exclusive expire export extend false few first flat from full function group header heading hole ifblock import in interface joined keep keyed last left limit load local locale lookup macro many maxcount maxlength min skew module named nocase noroot noscan nosort not of only opt or outer overwrite packed partition penalty physicallength pipe quote record relationship repeat return right scan self separator service shared skew skip sql store terminator thor threshold token transform trim true type unicodeorder unsorted validate virtual whole wild within xml xpath");
 
  var variable_3 = words("ascii big_endian boolean data decimal ebcdic integer pattern qstring real record rule set of string token udecimal unicode unsigned varstring varunicode");
 
  var builtin = words("checkpoint deprecated failcode failmessage failure global independent onwarning persist priority recovery stored success wait when");
 
  var blockKeywords = words("catch class do else finally for if switch try while");
 
  var atoms = words("true false null");
 
  var hooks = {"#": metaHook};
 
  var multiLineStrings;
 
  var isOperatorChar = /[+\-*&%=<>!?|\/]/;
 

	
 
  var curPunc;
 

	
 
  function tokenBase(stream, state) {
 
    var ch = stream.next();
 
    if (hooks[ch]) {
 
      var result = hooks[ch](stream, state);
 
      if (result !== false) return result;
 
    }
 
    if (ch == '"' || ch == "'") {
 
      state.tokenize = tokenString(ch);
 
      return state.tokenize(stream, state);
 
    }
 
    if (/[\[\]{}\(\),;\:\.]/.test(ch)) {
 
      curPunc = ch;
 
      return null;
 
    }
 
    if (/\d/.test(ch)) {
 
      stream.eatWhile(/[\w\.]/);
 
      return "number";
 
    }
 
    if (ch == "/") {
 
      if (stream.eat("*")) {
 
        state.tokenize = tokenComment;
 
        return tokenComment(stream, state);
 
      }
 
      if (stream.eat("/")) {
 
        stream.skipToEnd();
 
        return "comment";
 
      }
 
    }
 
    if (isOperatorChar.test(ch)) {
 
      stream.eatWhile(isOperatorChar);
 
      return "operator";
 
    }
 
    stream.eatWhile(/[\w\$_]/);
 
    var cur = stream.current().toLowerCase();
 
    if (keyword.propertyIsEnumerable(cur)) {
 
      if (blockKeywords.propertyIsEnumerable(cur)) curPunc = "newstatement";
 
      return "keyword";
 
    } else if (variable.propertyIsEnumerable(cur)) {
 
      if (blockKeywords.propertyIsEnumerable(cur)) curPunc = "newstatement";
 
      return "variable";
 
    } else if (variable_2.propertyIsEnumerable(cur)) {
 
      if (blockKeywords.propertyIsEnumerable(cur)) curPunc = "newstatement";
 
      return "variable-2";
 
    } else if (variable_3.propertyIsEnumerable(cur)) {
 
      if (blockKeywords.propertyIsEnumerable(cur)) curPunc = "newstatement";
 
      return "variable-3";
 
    } else if (builtin.propertyIsEnumerable(cur)) {
 
      if (blockKeywords.propertyIsEnumerable(cur)) curPunc = "newstatement";
 
      return "builtin";
 
    } else { //Data types are of from KEYWORD##
 
                var i = cur.length - 1;
 
                while(i >= 0 && (!isNaN(cur[i]) || cur[i] == '_'))
 
                        --i;
 

	
 
                if (i > 0) {
 
                        var cur2 = cur.substr(0, i + 1);
 
                if (variable_3.propertyIsEnumerable(cur2)) {
 
                        if (blockKeywords.propertyIsEnumerable(cur2)) curPunc = "newstatement";
 
                        return "variable-3";
 
                }
 
            }
 
    }
 
    if (atoms.propertyIsEnumerable(cur)) return "atom";
 
    return null;
 
  }
 

	
 
  function tokenString(quote) {
 
    return function(stream, state) {
 
      var escaped = false, next, end = false;
 
      while ((next = stream.next()) != null) {
 
        if (next == quote && !escaped) {end = true; break;}
 
        escaped = !escaped && next == "\\";
 
      }
 
      if (end || !(escaped || multiLineStrings))
 
        state.tokenize = tokenBase;
 
      return "string";
 
    };
 
  }
 

	
 
  function tokenComment(stream, state) {
 
    var maybeEnd = false, ch;
 
    while (ch = stream.next()) {
 
      if (ch == "/" && maybeEnd) {
 
        state.tokenize = tokenBase;
 
        break;
 
      }
 
      maybeEnd = (ch == "*");
 
    }
 
    return "comment";
 
  }
 

	
 
  function Context(indented, column, type, align, prev) {
 
    this.indented = indented;
 
    this.column = column;
 
    this.type = type;
 
    this.align = align;
 
    this.prev = prev;
 
  }
 
  function pushContext(state, col, type) {
 
    return state.context = new Context(state.indented, col, type, null, state.context);
 
  }
 
  function popContext(state) {
 
    var t = state.context.type;
 
    if (t == ")" || t == "]" || t == "}")
 
      state.indented = state.context.indented;
 
    return state.context = state.context.prev;
 
  }
 

	
 
  // Interface
 

	
 
  return {
 
    startState: function(basecolumn) {
 
      return {
 
        tokenize: null,
 
        context: new Context((basecolumn || 0) - indentUnit, 0, "top", false),
 
        indented: 0,
 
        startOfLine: true
 
      };
 
    },
 

	
 
    token: function(stream, state) {
 
      var ctx = state.context;
 
      if (stream.sol()) {
 
        if (ctx.align == null) ctx.align = false;
 
        state.indented = stream.indentation();
 
        state.startOfLine = true;
 
      }
 
      if (stream.eatSpace()) return null;
 
      curPunc = null;
 
      var style = (state.tokenize || tokenBase)(stream, state);
 
      if (style == "comment" || style == "meta") return style;
 
      if (ctx.align == null) ctx.align = true;
 

	
 
      if ((curPunc == ";" || curPunc == ":") && ctx.type == "statement") popContext(state);
 
      else if (curPunc == "{") pushContext(state, stream.column(), "}");
 
      else if (curPunc == "[") pushContext(state, stream.column(), "]");
 
      else if (curPunc == "(") pushContext(state, stream.column(), ")");
 
      else if (curPunc == "}") {
 
        while (ctx.type == "statement") ctx = popContext(state);
 
        if (ctx.type == "}") ctx = popContext(state);
 
        while (ctx.type == "statement") ctx = popContext(state);
 
      }
 
      else if (curPunc == ctx.type) popContext(state);
 
      else if (ctx.type == "}" || ctx.type == "top" || (ctx.type == "statement" && curPunc == "newstatement"))
 
        pushContext(state, stream.column(), "statement");
 
      state.startOfLine = false;
 
      return style;
 
    },
 

	
 
    indent: function(state, textAfter) {
 
      if (state.tokenize != tokenBase && state.tokenize != null) return 0;
 
      var ctx = state.context, firstChar = textAfter && textAfter.charAt(0);
 
      if (ctx.type == "statement" && firstChar == "}") ctx = ctx.prev;
 
      var closing = firstChar == ctx.type;
 
      if (ctx.type == "statement") return ctx.indented + (firstChar == "{" ? 0 : indentUnit);
 
      else if (ctx.align) return ctx.column + (closing ? 0 : 1);
 
      else return ctx.indented + (closing ? 0 : indentUnit);
 
    },
 

	
 
    electricChars: "{}"
 
  };
 
});
 

	
 
CodeMirror.defineMIME("text/x-ecl", "ecl");
rhodecode/public/js/mode/ecl/index.html
Show inline comments
 
new file 100644
 
<!doctype html>
 
<html>
 
  <head>
 
    <title>CodeMirror: ECL mode</title>
 
    <link rel="stylesheet" href="../../lib/codemirror.css">
 
    <script src="../../lib/codemirror.js"></script>
 
    <script src="ecl.js"></script>
 
    <link rel="stylesheet" href="../../doc/docs.css">
 
    <style>.CodeMirror {border: 1px solid black;}</style>
 
  </head>
 
  <body>
 
    <h1>CodeMirror: ECL mode</h1>
 
    <form><textarea id="code" name="code">
 
/*
 
sample useless code to demonstrate ecl syntax highlighting
 
this is a multiline comment!
 
*/
 

	
 
//  this is a singleline comment!
 

	
 
import ut;
 
r := 
 
  record
 
   string22 s1 := '123';
 
   integer4 i1 := 123;
 
  end;
 
#option('tmp', true);
 
d := dataset('tmp::qb', r, thor);
 
output(d);
 
</textarea></form>
 
    <script>
 
      var editor = CodeMirror.fromTextArea(document.getElementById("code"), {});
 
    </script>
 

	
 
    <p>Based on CodeMirror's clike mode.  For more information see <a href="http://hpccsystems.com">HPCC Systems</a> web site.</p>
 
    <p><strong>MIME types defined:</strong> <code>text/x-ecl</code>.</p>
 

	
 
  </body>
 
</html>
rhodecode/public/js/mode/erlang/erlang.js
Show inline comments
 
new file 100644
 
// block; "begin", "case", "fun", "if", "receive", "try": closed by "end"
 
// block internal; "after", "catch", "of"
 
// guard; "when", closed by "->"
 
// "->" opens a clause, closed by ";" or "."
 
// "<<" opens a binary, closed by ">>"
 
// "," appears in arglists, lists, tuples and terminates lines of code
 
// "." resets indentation to 0
 
// obsolete; "cond", "let", "query"
 

	
 
CodeMirror.defineMIME("text/x-erlang", "erlang");
 

	
 
CodeMirror.defineMode("erlang", function(cmCfg) {
 

	
 
  function rval(state,stream,type) {
 
    // distinguish between "." as terminator and record field operator
 
    if (type == "record") {
 
      state.context = "record";
 
    }else{
 
      state.context = false;
 
    }
 

	
 
    // remember last significant bit on last line for indenting
 
    if (type != "whitespace" && type != "comment") {
 
      state.lastToken = stream.current();
 
    }
 
    //     erlang             -> CodeMirror tag
 
    switch (type) {
 
      case "atom":        return "atom";
 
      case "attribute":   return "attribute";
 
      case "builtin":     return "builtin";
 
      case "comment":     return "comment";
 
      case "fun":         return "meta";
 
      case "function":    return "tag";
 
      case "guard":       return "property";
 
      case "keyword":     return "keyword";
 
      case "macro":       return "variable-2";
 
      case "number":      return "number";
 
      case "operator":    return "operator";
 
      case "record":      return "bracket";
 
      case "string":      return "string";
 
      case "type":        return "def";
 
      case "variable":    return "variable";
 
      case "error":       return "error";
 
      case "separator":   return null;
 
      case "open_paren":  return null;
 
      case "close_paren": return null;
 
      default:            return null;
 
    }
 
  }
 

	
 
  var typeWords = [
 
    "-type", "-spec", "-export_type", "-opaque"];
 

	
 
  var keywordWords = [
 
    "after","begin","catch","case","cond","end","fun","if",
 
    "let","of","query","receive","try","when"];
 

	
 
  var separatorWords = [
 
    "->",";",":",".",","];
 

	
 
  var operatorWords = [
 
    "and","andalso","band","bnot","bor","bsl","bsr","bxor",
 
    "div","not","or","orelse","rem","xor"];
 

	
 
  var symbolWords = [
 
    "+","-","*","/",">",">=","<","=<","=:=","==","=/=","/=","||","<-"];
 

	
 
  var openParenWords = [
 
    "<<","(","[","{"];
 

	
 
  var closeParenWords = [
 
    "}","]",")",">>"];
 

	
 
  var guardWords = [
 
    "is_atom","is_binary","is_bitstring","is_boolean","is_float",
 
    "is_function","is_integer","is_list","is_number","is_pid",
 
    "is_port","is_record","is_reference","is_tuple",
 
    "atom","binary","bitstring","boolean","function","integer","list",
 
    "number","pid","port","record","reference","tuple"];
 

	
 
  var bifWords = [
 
    "abs","adler32","adler32_combine","alive","apply","atom_to_binary",
 
    "atom_to_list","binary_to_atom","binary_to_existing_atom",
 
    "binary_to_list","binary_to_term","bit_size","bitstring_to_list",
 
    "byte_size","check_process_code","contact_binary","crc32",
 
    "crc32_combine","date","decode_packet","delete_module",
 
    "disconnect_node","element","erase","exit","float","float_to_list",
 
    "garbage_collect","get","get_keys","group_leader","halt","hd",
 
    "integer_to_list","internal_bif","iolist_size","iolist_to_binary",
 
    "is_alive","is_atom","is_binary","is_bitstring","is_boolean",
 
    "is_float","is_function","is_integer","is_list","is_number","is_pid",
 
    "is_port","is_process_alive","is_record","is_reference","is_tuple",
 
    "length","link","list_to_atom","list_to_binary","list_to_bitstring",
 
    "list_to_existing_atom","list_to_float","list_to_integer",
 
    "list_to_pid","list_to_tuple","load_module","make_ref","module_loaded",
 
    "monitor_node","node","node_link","node_unlink","nodes","notalive",
 
    "now","open_port","pid_to_list","port_close","port_command",
 
    "port_connect","port_control","pre_loaded","process_flag",
 
    "process_info","processes","purge_module","put","register",
 
    "registered","round","self","setelement","size","spawn","spawn_link",
 
    "spawn_monitor","spawn_opt","split_binary","statistics",
 
    "term_to_binary","time","throw","tl","trunc","tuple_size",
 
    "tuple_to_list","unlink","unregister","whereis"];
 

	
 
  // ignored for indenting purposes
 
  var ignoreWords = [
 
    ",", ":", "catch", "after", "of", "cond", "let", "query"];
 

	
 

	
 
  var smallRE      = /[a-z_]/;
 
  var largeRE      = /[A-Z_]/;
 
  var digitRE      = /[0-9]/;
 
  var octitRE      = /[0-7]/;
 
  var anumRE       = /[a-z_A-Z0-9]/;
 
  var symbolRE     = /[\+\-\*\/<>=\|:]/;
 
  var openParenRE  = /[<\(\[\{]/;
 
  var closeParenRE = /[>\)\]\}]/;
 
  var sepRE        = /[\->\.,:;]/;
 

	
 
  function isMember(element,list) {
 
    return (-1 < list.indexOf(element));
 
  }
 

	
 
  function isPrev(stream,string) {
 
    var start = stream.start;
 
    var len = string.length;
 
    if (len <= start) {
 
      var word = stream.string.slice(start-len,start);
 
      return word == string;
 
    }else{
 
      return false;
 
    }
 
  }
 

	
 
  function tokenize(stream, state) {
 
    if (stream.eatSpace()) {
 
      return rval(state,stream,"whitespace");
 
    }
 

	
 
    // attributes and type specs
 
    if ((peekToken(state).token == "" || peekToken(state).token == ".") &&
 
        stream.peek() == '-') {
 
      stream.next();
 
      if (stream.eat(smallRE) && stream.eatWhile(anumRE)) {
 
        if (isMember(stream.current(),typeWords)) {
 
          return rval(state,stream,"type");
 
        }else{
 
          return rval(state,stream,"attribute");
 
        }
 
      }
 
      stream.backUp(1);
 
    }
 

	
 
    var ch = stream.next();
 

	
 
    // comment
 
    if (ch == '%') {
 
      stream.skipToEnd();
 
      return rval(state,stream,"comment");
 
    }
 

	
 
    // macro
 
    if (ch == '?') {
 
      stream.eatWhile(anumRE);
 
      return rval(state,stream,"macro");
 
    }
 

	
 
    // record
 
    if ( ch == "#") {
 
      stream.eatWhile(anumRE);
 
      return rval(state,stream,"record");
 
    }
 

	
 
    // char
 
    if ( ch == "$") {
 
      if (stream.next() == "\\") {
 
        if (!stream.eatWhile(octitRE)) {
 
          stream.next();
 
        }
 
      }
 
      return rval(state,stream,"string");
 
    }
 

	
 
    // quoted atom
 
    if (ch == '\'') {
 
      if (singleQuote(stream)) {
 
        return rval(state,stream,"atom");
 
      }else{
 
        return rval(state,stream,"error");
 
      }
 
    }
 

	
 
    // string
 
    if (ch == '"') {
 
      if (doubleQuote(stream)) {
 
        return rval(state,stream,"string");
 
      }else{
 
        return rval(state,stream,"error");
 
      }
 
    }
 

	
 
    // variable
 
    if (largeRE.test(ch)) {
 
      stream.eatWhile(anumRE);
 
      return rval(state,stream,"variable");
 
    }
 

	
 
    // atom/keyword/BIF/function
 
    if (smallRE.test(ch)) {
 
      stream.eatWhile(anumRE);
 

	
 
      if (stream.peek() == "/") {
 
        stream.next();
 
        if (stream.eatWhile(digitRE)) {
 
          return rval(state,stream,"fun");      // f/0 style fun
 
        }else{
 
          stream.backUp(1);
 
          return rval(state,stream,"atom");
 
        }
 
      }
 

	
 
      var w = stream.current();
 

	
 
      if (isMember(w,keywordWords)) {
 
        pushToken(state,stream);
 
        return rval(state,stream,"keyword");
 
      }
 
      if (stream.peek() == "(") {
 
        // 'put' and 'erlang:put' are bifs, 'foo:put' is not
 
        if (isMember(w,bifWords) &&
 
            (!isPrev(stream,":") || isPrev(stream,"erlang:"))) {
 
          return rval(state,stream,"builtin");
 
        }else{
 
          return rval(state,stream,"function");
 
        }
 
      }
 
      if (isMember(w,guardWords)) {
 
        return rval(state,stream,"guard");
 
      }
 
      if (isMember(w,operatorWords)) {
 
        return rval(state,stream,"operator");
 
      }
 
      if (stream.peek() == ":") {
 
        if (w == "erlang") {
 
          return rval(state,stream,"builtin");
 
        } else {
 
          return rval(state,stream,"function");
 
        }
 
      }
 
      return rval(state,stream,"atom");
 
    }
 

	
 
    // number
 
    if (digitRE.test(ch)) {
 
      stream.eatWhile(digitRE);
 
      if (stream.eat('#')) {
 
        stream.eatWhile(digitRE);    // 16#10  style integer
 
      } else {
 
        if (stream.eat('.')) {       // float
 
          stream.eatWhile(digitRE);
 
        }
 
        if (stream.eat(/[eE]/)) {
 
          stream.eat(/[-+]/);        // float with exponent
 
          stream.eatWhile(digitRE);
 
        }
 
      }
 
      return rval(state,stream,"number");   // normal integer
 
    }
 

	
 
    // open parens
 
    if (nongreedy(stream,openParenRE,openParenWords)) {
 
      pushToken(state,stream);
 
      return rval(state,stream,"open_paren");
 
    }
 

	
 
    // close parens
 
    if (nongreedy(stream,closeParenRE,closeParenWords)) {
 
      pushToken(state,stream);
 
      return rval(state,stream,"close_paren");
 
    }
 

	
 
    // separators
 
    if (greedy(stream,sepRE,separatorWords)) {
 
      // distinguish between "." as terminator and record field operator
 
      if (state.context == false) {
 
        pushToken(state,stream);
 
      }
 
      return rval(state,stream,"separator");
 
    }
 

	
 
    // operators
 
    if (greedy(stream,symbolRE,symbolWords)) {
 
      return rval(state,stream,"operator");
 
    }
 

	
 
    return rval(state,stream,null);
 
  }
 

	
 
  function nongreedy(stream,re,words) {
 
    if (stream.current().length == 1 && re.test(stream.current())) {
 
      stream.backUp(1);
 
      while (re.test(stream.peek())) {
 
        stream.next();
 
        if (isMember(stream.current(),words)) {
 
          return true;
 
        }
 
      }
 
      stream.backUp(stream.current().length-1);
 
    }
 
    return false;
 
  }
 

	
 
  function greedy(stream,re,words) {
 
    if (stream.current().length == 1 && re.test(stream.current())) {
 
      while (re.test(stream.peek())) {
 
        stream.next();
 
      }
 
      while (0 < stream.current().length) {
 
        if (isMember(stream.current(),words)) {
 
          return true;
 
        }else{
 
          stream.backUp(1);
 
        }
 
      }
 
      stream.next();
 
    }
 
    return false;
 
  }
 

	
 
  function doubleQuote(stream) {
 
    return quote(stream, '"', '\\');
 
  }
 

	
 
  function singleQuote(stream) {
 
    return quote(stream,'\'','\\');
 
  }
 

	
 
  function quote(stream,quoteChar,escapeChar) {
 
    while (!stream.eol()) {
 
      var ch = stream.next();
 
      if (ch == quoteChar) {
 
        return true;
 
      }else if (ch == escapeChar) {
 
        stream.next();
 
      }
 
    }
 
    return false;
 
  }
 

	
 
  function Token(stream) {
 
    this.token  = stream ? stream.current() : "";
 
    this.column = stream ? stream.column() : 0;
 
    this.indent = stream ? stream.indentation() : 0;
 
  }
 

	
 
  function myIndent(state,textAfter) {
 
    var indent = cmCfg.indentUnit;
 
    var outdentWords = ["after","catch"];
 
    var token = (peekToken(state)).token;
 
    var wordAfter = takewhile(textAfter,/[^a-z]/);
 

	
 
    if (isMember(token,openParenWords)) {
 
      return (peekToken(state)).column+token.length;
 
    }else if (token == "." || token == ""){
 
      return 0;
 
    }else if (token == "->") {
 
      if (wordAfter == "end") {
 
        return peekToken(state,2).column;
 
      }else if (peekToken(state,2).token == "fun") {
 
        return peekToken(state,2).column+indent;
 
      }else{
 
        return (peekToken(state)).indent+indent;
 
      }
 
    }else if (isMember(wordAfter,outdentWords)) {
 
      return (peekToken(state)).indent;
 
    }else{
 
      return (peekToken(state)).column+indent;
 
    }
 
  }
 

	
 
  function takewhile(str,re) {
 
    var m = str.match(re);
 
    return m ? str.slice(0,m.index) : str;
 
  }
 

	
 
  function popToken(state) {
 
    return state.tokenStack.pop();
 
  }
 

	
 
  function peekToken(state,depth) {
 
    var len = state.tokenStack.length;
 
    var dep = (depth ? depth : 1);
 
    if (len < dep) {
 
      return new Token;
 
    }else{
 
      return state.tokenStack[len-dep];
 
    }
 
  }
 

	
 
  function pushToken(state,stream) {
 
    var token = stream.current();
 
    var prev_token = peekToken(state).token;
 
    if (isMember(token,ignoreWords)) {
 
      return false;
 
    }else if (drop_both(prev_token,token)) {
 
      popToken(state);
 
      return false;
 
    }else if (drop_first(prev_token,token)) {
 
      popToken(state);
 
      return pushToken(state,stream);
 
    }else{
 
      state.tokenStack.push(new Token(stream));
 
      return true;
 
    }
 
  }
 

	
 
  function drop_first(open, close) {
 
    switch (open+" "+close) {
 
      case "when ->":       return true;
 
      case "-> end":        return true;
 
      case "-> .":          return true;
 
      case ". .":           return true;
 
      default:              return false;
 
    }
 
  }
 

	
 
  function drop_both(open, close) {
 
    switch (open+" "+close) {
 
      case "( )":         return true;
 
      case "[ ]":         return true;
 
      case "{ }":         return true;
 
      case "<< >>":       return true;
 
      case "begin end":   return true;
 
      case "case end":    return true;
 
      case "fun end":     return true;
 
      case "if end":      return true;
 
      case "receive end": return true;
 
      case "try end":     return true;
 
      case "-> ;":        return true;
 
      default:            return false;
 
    }
 
  }
 

	
 
  return {
 
    startState:
 
      function() {
 
        return {tokenStack: [],
 
                context: false,
 
                lastToken: null};
 
      },
 

	
 
    token:
 
      function(stream, state) {
 
        return tokenize(stream, state);
 
      },
 

	
 
    indent:
 
      function(state, textAfter) {
 
        return myIndent(state,textAfter);
 
      },
 

	
 
    lineComment: "%"
 
  };
 
});
rhodecode/public/js/mode/erlang/index.html
Show inline comments
 
new file 100644
 
<!doctype html>
 
<html>
 
  <head>
 
    <meta charset="utf-8">
 
    <title>CodeMirror: Erlang mode</title>
 
    <link rel="stylesheet" href="../../lib/codemirror.css">
 
    <script src="../../lib/codemirror.js"></script>
 
    <script src="../../addon/edit/matchbrackets.js"></script>
 
    <script src="erlang.js"></script>
 
    <link rel="stylesheet" href="../../theme/erlang-dark.css">
 
    <style type="text/css">.CodeMirror {border-top: 1px solid black; border-bottom: 1px solid black;}</style>
 
    <link rel="stylesheet" href="../../doc/docs.css">
 
  </head>
 
  <body>
 
    <h1>CodeMirror: Erlang mode</h1>
 

	
 
<form><textarea id="code" name="code">
 
%% -*- mode: erlang; erlang-indent-level: 2 -*-
 
%%% Created :  7 May 2012 by mats cronqvist <masse@klarna.com>
 

	
 
%% @doc
 
%% Demonstrates how to print a record.
 
%% @end
 

	
 
-module('ex').
 
-author('mats cronqvist').
 
-export([demo/0,
 
         rec_info/1]).
 

	
 
-record(demo,{a="One",b="Two",c="Three",d="Four"}).
 

	
 
rec_info(demo) -> record_info(fields,demo).
 

	
 
demo() -> expand_recs(?MODULE,#demo{a="A",b="BB"}).
 
  
 
expand_recs(M,List) when is_list(List) ->
 
  [expand_recs(M,L)||L<-List];
 
expand_recs(M,Tup) when is_tuple(Tup) ->
 
  case tuple_size(Tup) of
 
    L when L < 1 -> Tup;
 
    L ->
 
      try Fields = M:rec_info(element(1,Tup)),
 
          L = length(Fields)+1,
 
          lists:zip(Fields,expand_recs(M,tl(tuple_to_list(Tup))))
 
      catch _:_ ->
 
          list_to_tuple(expand_recs(M,tuple_to_list(Tup)))
 
      end
 
  end;
 
expand_recs(_,Term) ->
 
  Term.
 
</textarea></form>
 

	
 
    <script>
 
      var editor = CodeMirror.fromTextArea(document.getElementById("code"), {
 
        lineNumbers: true,
 
        matchBrackets: true,
 
        extraKeys: {"Tab":  "indentAuto"},
 
        theme: "erlang-dark"
 
      });
 
    </script>
 

	
 
    <p><strong>MIME types defined:</strong> <code>text/x-erlang</code>.</p>
 
  </body>
 
</html>
rhodecode/public/js/mode/gas/gas.js
Show inline comments
 
new file 100644
 
CodeMirror.defineMode("gas", function(_config, parserConfig) {
 
  'use strict';
 

	
 
  // If an architecture is specified, its initialization function may
 
  // populate this array with custom parsing functions which will be
 
  // tried in the event that the standard functions do not find a match.
 
  var custom = [];
 

	
 
  // The symbol used to start a line comment changes based on the target
 
  // architecture.
 
  // If no architecture is pased in "parserConfig" then only multiline
 
  // comments will have syntax support.
 
  var lineCommentStartSymbol = "";
 

	
 
  // These directives are architecture independent.
 
  // Machine specific directives should go in their respective
 
  // architecture initialization function.
 
  // Reference:
 
  // http://sourceware.org/binutils/docs/as/Pseudo-Ops.html#Pseudo-Ops
 
  var directives = {
 
    ".abort" : "builtin",
 
    ".align" : "builtin",
 
    ".altmacro" : "builtin",
 
    ".ascii" : "builtin",
 
    ".asciz" : "builtin",
 
    ".balign" : "builtin",
 
    ".balignw" : "builtin",
 
    ".balignl" : "builtin",
 
    ".bundle_align_mode" : "builtin",
 
    ".bundle_lock" : "builtin",
 
    ".bundle_unlock" : "builtin",
 
    ".byte" : "builtin",
 
    ".cfi_startproc" : "builtin",
 
    ".comm" : "builtin",
 
    ".data" : "builtin",
 
    ".def" : "builtin",
 
    ".desc" : "builtin",
 
    ".dim" : "builtin",
 
    ".double" : "builtin",
 
    ".eject" : "builtin",
 
    ".else" : "builtin",
 
    ".elseif" : "builtin",
 
    ".end" : "builtin",
 
    ".endef" : "builtin",
 
    ".endfunc" : "builtin",
 
    ".endif" : "builtin",
 
    ".equ" : "builtin",
 
    ".equiv" : "builtin",
 
    ".eqv" : "builtin",
 
    ".err" : "builtin",
 
    ".error" : "builtin",
 
    ".exitm" : "builtin",
 
    ".extern" : "builtin",
 
    ".fail" : "builtin",
 
    ".file" : "builtin",
 
    ".fill" : "builtin",
 
    ".float" : "builtin",
 
    ".func" : "builtin",
 
    ".global" : "builtin",
 
    ".gnu_attribute" : "builtin",
 
    ".hidden" : "builtin",
 
    ".hword" : "builtin",
 
    ".ident" : "builtin",
 
    ".if" : "builtin",
 
    ".incbin" : "builtin",
 
    ".include" : "builtin",
 
    ".int" : "builtin",
 
    ".internal" : "builtin",
 
    ".irp" : "builtin",
 
    ".irpc" : "builtin",
 
    ".lcomm" : "builtin",
 
    ".lflags" : "builtin",
 
    ".line" : "builtin",
 
    ".linkonce" : "builtin",
 
    ".list" : "builtin",
 
    ".ln" : "builtin",
 
    ".loc" : "builtin",
 
    ".loc_mark_labels" : "builtin",
 
    ".local" : "builtin",
 
    ".long" : "builtin",
 
    ".macro" : "builtin",
 
    ".mri" : "builtin",
 
    ".noaltmacro" : "builtin",
 
    ".nolist" : "builtin",
 
    ".octa" : "builtin",
 
    ".offset" : "builtin",
 
    ".org" : "builtin",
 
    ".p2align" : "builtin",
 
    ".popsection" : "builtin",
 
    ".previous" : "builtin",
 
    ".print" : "builtin",
 
    ".protected" : "builtin",
 
    ".psize" : "builtin",
 
    ".purgem" : "builtin",
 
    ".pushsection" : "builtin",
 
    ".quad" : "builtin",
 
    ".reloc" : "builtin",
 
    ".rept" : "builtin",
 
    ".sbttl" : "builtin",
 
    ".scl" : "builtin",
 
    ".section" : "builtin",
 
    ".set" : "builtin",
 
    ".short" : "builtin",
 
    ".single" : "builtin",
 
    ".size" : "builtin",
 
    ".skip" : "builtin",
 
    ".sleb128" : "builtin",
 
    ".space" : "builtin",
 
    ".stab" : "builtin",
 
    ".string" : "builtin",
 
    ".struct" : "builtin",
 
    ".subsection" : "builtin",
 
    ".symver" : "builtin",
 
    ".tag" : "builtin",
 
    ".text" : "builtin",
 
    ".title" : "builtin",
 
    ".type" : "builtin",
 
    ".uleb128" : "builtin",
 
    ".val" : "builtin",
 
    ".version" : "builtin",
 
    ".vtable_entry" : "builtin",
 
    ".vtable_inherit" : "builtin",
 
    ".warning" : "builtin",
 
    ".weak" : "builtin",
 
    ".weakref" : "builtin",
 
    ".word" : "builtin"
 
  };
 

	
 
  var registers = {};
 

	
 
  function x86(_parserConfig) {
 
    lineCommentStartSymbol = "#";
 

	
 
    registers.ax  = "variable";
 
    registers.eax = "variable-2";
 
    registers.rax = "variable-3";
 

	
 
    registers.bx  = "variable";
 
    registers.ebx = "variable-2";
 
    registers.rbx = "variable-3";
 

	
 
    registers.cx  = "variable";
 
    registers.ecx = "variable-2";
 
    registers.rcx = "variable-3";
 

	
 
    registers.dx  = "variable";
 
    registers.edx = "variable-2";
 
    registers.rdx = "variable-3";
 

	
 
    registers.si  = "variable";
 
    registers.esi = "variable-2";
 
    registers.rsi = "variable-3";
 

	
 
    registers.di  = "variable";
 
    registers.edi = "variable-2";
 
    registers.rdi = "variable-3";
 

	
 
    registers.sp  = "variable";
 
    registers.esp = "variable-2";
 
    registers.rsp = "variable-3";
 

	
 
    registers.bp  = "variable";
 
    registers.ebp = "variable-2";
 
    registers.rbp = "variable-3";
 

	
 
    registers.ip  = "variable";
 
    registers.eip = "variable-2";
 
    registers.rip = "variable-3";
 

	
 
    registers.cs  = "keyword";
 
    registers.ds  = "keyword";
 
    registers.ss  = "keyword";
 
    registers.es  = "keyword";
 
    registers.fs  = "keyword";
 
    registers.gs  = "keyword";
 
  }
 

	
 
  function armv6(_parserConfig) {
 
    // Reference:
 
    // http://infocenter.arm.com/help/topic/com.arm.doc.qrc0001l/QRC0001_UAL.pdf
 
    // http://infocenter.arm.com/help/topic/com.arm.doc.ddi0301h/DDI0301H_arm1176jzfs_r0p7_trm.pdf
 
    lineCommentStartSymbol = "@";
 
    directives.syntax = "builtin";
 

	
 
    registers.r0  = "variable";
 
    registers.r1  = "variable";
 
    registers.r2  = "variable";
 
    registers.r3  = "variable";
 
    registers.r4  = "variable";
 
    registers.r5  = "variable";
 
    registers.r6  = "variable";
 
    registers.r7  = "variable";
 
    registers.r8  = "variable";
 
    registers.r9  = "variable";
 
    registers.r10 = "variable";
 
    registers.r11 = "variable";
 
    registers.r12 = "variable";
 

	
 
    registers.sp  = "variable-2";
 
    registers.lr  = "variable-2";
 
    registers.pc  = "variable-2";
 
    registers.r13 = registers.sp;
 
    registers.r14 = registers.lr;
 
    registers.r15 = registers.pc;
 

	
 
    custom.push(function(ch, stream) {
 
      if (ch === '#') {
 
        stream.eatWhile(/\w/);
 
        return "number";
 
      }
 
    });
 
  }
 

	
 
  var arch = parserConfig.architecture.toLowerCase();
 
  if (arch === "x86") {
 
    x86(parserConfig);
 
  } else if (arch === "arm" || arch === "armv6") {
 
    armv6(parserConfig);
 
  }
 

	
 
  function nextUntilUnescaped(stream, end) {
 
    var escaped = false, next;
 
    while ((next = stream.next()) != null) {
 
      if (next === end && !escaped) {
 
        return false;
 
      }
 
      escaped = !escaped && next === "\\";
 
    }
 
    return escaped;
 
  }
 

	
 
  function clikeComment(stream, state) {
 
    var maybeEnd = false, ch;
 
    while ((ch = stream.next()) != null) {
 
      if (ch === "/" && maybeEnd) {
 
        state.tokenize = null;
 
        break;
 
      }
 
      maybeEnd = (ch === "*");
 
    }
 
    return "comment";
 
  }
 

	
 
  return {
 
    startState: function() {
 
      return {
 
        tokenize: null
 
      };
 
    },
 

	
 
    token: function(stream, state) {
 
      if (state.tokenize) {
 
        return state.tokenize(stream, state);
 
      }
 

	
 
      if (stream.eatSpace()) {
 
        return null;
 
      }
 

	
 
      var style, cur, ch = stream.next();
 

	
 
      if (ch === "/") {
 
        if (stream.eat("*")) {
 
          state.tokenize = clikeComment;
 
          return clikeComment(stream, state);
 
        }
 
      }
 

	
 
      if (ch === lineCommentStartSymbol) {
 
        stream.skipToEnd();
 
        return "comment";
 
      }
 

	
 
      if (ch === '"') {
 
        nextUntilUnescaped(stream, '"');
 
        return "string";
 
      }
 

	
 
      if (ch === '.') {
 
        stream.eatWhile(/\w/);
 
        cur = stream.current().toLowerCase();
 
        style = directives[cur];
 
        return style || null;
 
      }
 

	
 
      if (ch === '=') {
 
        stream.eatWhile(/\w/);
 
        return "tag";
 
      }
 

	
 
      if (ch === '{') {
 
        return "braket";
 
      }
 

	
 
      if (ch === '}') {
 
        return "braket";
 
      }
 

	
 
      if (/\d/.test(ch)) {
 
        if (ch === "0" && stream.eat("x")) {
 
          stream.eatWhile(/[0-9a-fA-F]/);
 
          return "number";
 
        }
 
        stream.eatWhile(/\d/);
 
        return "number";
 
      }
 

	
 
      if (/\w/.test(ch)) {
 
        stream.eatWhile(/\w/);
 
        if (stream.eat(":")) {
 
          return 'tag';
 
        }
 
        cur = stream.current().toLowerCase();
 
        style = registers[cur];
 
        return style || null;
 
      }
 

	
 
      for (var i = 0; i < custom.length; i++) {
 
        style = custom[i](ch, stream, state);
 
        if (style) {
 
          return style;
 
        }
 
      }
 
    },
 

	
 
    lineComment: lineCommentStartSymbol,
 
    blockCommentStart: "/*",
 
    blockCommentEnd: "*/"
 
  };
 
});
rhodecode/public/js/mode/gas/index.html
Show inline comments
 
new file 100644
 
<!doctype html>
 
<html>
 
    <head>
 
        <meta charset="utf-8">
 
        <title>CodeMirror: Gas mode</title>
 
        <link rel="stylesheet" href="../../lib/codemirror.css">
 
        <script src="../../lib/codemirror.js"></script>
 
        <script src="gas.js"></script>
 
        <link rel="stylesheet" href="../../doc/docs.css">
 
        <style>.CodeMirror {border: 2px inset #dee;}</style>
 
    </head>
 
    <body>
 
        <h1>CodeMirror: Gas mode</h1>
 

	
 
        <form>
 
<textarea id="code" name="code">
 
.syntax unified
 
.global main
 

	
 
/* 
 
 *  A
 
 *  multi-line
 
 *  comment.
 
 */
 

	
 
@ A single line comment.
 

	
 
main:
 
        push    {sp, lr}
 
        ldr     r0, =message
 
        bl      puts
 
        mov     r0, #0
 
        pop     {sp, pc}
 

	
 
message:
 
        .asciz "Hello world!<br />"
 
</textarea>
 
        </form>
 

	
 
        <script>
 
            var editor = CodeMirror.fromTextArea(document.getElementById("code"), {
 
                lineNumbers: true,
 
                mode: {name: "gas", architecture: "ARMv6"},
 
            });
 
        </script>
 

	
 
        <p>Handles AT&amp;T assembler syntax (more specifically this handles
 
        the GNU Assembler (gas) syntax.)
 
        It takes a single optional configuration parameter:
 
        <code>architecture</code>, which can be one of <code>"ARM"</code>,
 
        <code>"ARMv6"</code> or <code>"x86"</code>.
 
        Including the parameter adds syntax for the registers and special
 
        directives for the supplied architecture.
 

	
 
        <p><strong>MIME types defined:</strong> <code>text/x-gas</code></p>
 
    </body>
 
</html>
rhodecode/public/js/mode/gfm/gfm.js
Show inline comments
 
new file 100644
 
CodeMirror.defineMode("gfm", function(config) {
 
  var codeDepth = 0;
 
  function blankLine(state) {
 
    state.code = false;
 
    return null;
 
  }
 
  var gfmOverlay = {
 
    startState: function() {
 
      return {
 
        code: false,
 
        codeBlock: false,
 
        ateSpace: false
 
      };
 
    },
 
    copyState: function(s) {
 
      return {
 
        code: s.code,
 
        codeBlock: s.codeBlock,
 
        ateSpace: s.ateSpace
 
      };
 
    },
 
    token: function(stream, state) {
 
      // Hack to prevent formatting override inside code blocks (block and inline)
 
      if (state.codeBlock) {
 
        if (stream.match(/^```/)) {
 
          state.codeBlock = false;
 
          return null;
 
        }
 
        stream.skipToEnd();
 
        return null;
 
      }
 
      if (stream.sol()) {
 
        state.code = false;
 
      }
 
      if (stream.sol() && stream.match(/^```/)) {
 
        stream.skipToEnd();
 
        state.codeBlock = true;
 
        return null;
 
      }
 
      // If this block is changed, it may need to be updated in Markdown mode
 
      if (stream.peek() === '`') {
 
        stream.next();
 
        var before = stream.pos;
 
        stream.eatWhile('`');
 
        var difference = 1 + stream.pos - before;
 
        if (!state.code) {
 
          codeDepth = difference;
 
          state.code = true;
 
        } else {
 
          if (difference === codeDepth) { // Must be exact
 
            state.code = false;
 
          }
 
        }
 
        return null;
 
      } else if (state.code) {
 
        stream.next();
 
        return null;
 
      }
 
      // Check if space. If so, links can be formatted later on
 
      if (stream.eatSpace()) {
 
        state.ateSpace = true;
 
        return null;
 
      }
 
      if (stream.sol() || state.ateSpace) {
 
        state.ateSpace = false;
 
        if(stream.match(/^(?:[a-zA-Z0-9\-_]+\/)?(?:[a-zA-Z0-9\-_]+@)?(?:[a-f0-9]{7,40}\b)/)) {
 
          // User/Project@SHA
 
          // User@SHA
 
          // SHA
 
          return "link";
 
        } else if (stream.match(/^(?:[a-zA-Z0-9\-_]+\/)?(?:[a-zA-Z0-9\-_]+)?#[0-9]+\b/)) {
 
          // User/Project#Num
 
          // User#Num
 
          // #Num
 
          return "link";
 
        }
 
      }
 
      if (stream.match(/^((?:[a-z][\w-]+:(?:\/{1,3}|[a-z0-9%])|www\d{0,3}[.]|[a-z0-9.\-]+[.][a-z]{2,4}\/)(?:[^\s()<>]+|\([^\s()<>]*\))+(?:\([^\s()<>]*\)|[^\s`!()\[\]{};:'".,<>?«»“”‘’]))/i)) {
 
        // URLs
 
        // Taken from http://daringfireball.net/2010/07/improved_regex_for_matching_urls
 
        // And then (issue #1160) simplified to make it not crash the Chrome Regexp engine
 
        return "link";
 
      }
 
      stream.next();
 
      return null;
 
    },
 
    blankLine: blankLine
 
  };
 
  CodeMirror.defineMIME("gfmBase", {
 
    name: "markdown",
 
    underscoresBreakWords: false,
 
    taskLists: true,
 
    fencedCodeBlocks: true
 
  });
 
  return CodeMirror.overlayMode(CodeMirror.getMode(config, "gfmBase"), gfmOverlay);
 
}, "markdown");
rhodecode/public/js/mode/gfm/index.html
Show inline comments
 
new file 100644
 
<!doctype html>
 
<html>
 
  <head>
 
    <meta charset="utf-8">
 
    <title>CodeMirror: GFM mode</title>
 
    <link rel="stylesheet" href="../../lib/codemirror.css">
 
    <script src="../../lib/codemirror.js"></script>
 
    <script src="../../addon/mode/overlay.js"></script>
 
    <script src="../xml/xml.js"></script>
 
    <script src="../markdown/markdown.js"></script>
 
    <script src="gfm.js"></script>
 
    
 
    <!-- Code block highlighting modes -->
 
    <script src="../javascript/javascript.js"></script>
 
    <script src="../css/css.js"></script>
 
    <script src="../htmlmixed/htmlmixed.js"></script>
 
    <script src="../clike/clike.js"></script>
 
    
 
    <style type="text/css">.CodeMirror {border-top: 1px solid black; border-bottom: 1px solid black;}</style>
 
    <link rel="stylesheet" href="../../doc/docs.css">
 
  </head>
 
  <body>
 
    <h1>CodeMirror: GFM mode</h1>
 

	
 
<form><textarea id="code" name="code">
 
GitHub Flavored Markdown
 
========================
 

	
 
Everything from markdown plus GFM features:
 

	
 
## URL autolinking
 

	
 
Underscores_are_allowed_between_words.
 

	
 
## Fenced code blocks (and syntax highlighting)
 

	
 
```javascript
 
for (var i = 0; i &lt; items.length; i++) {
 
    console.log(items[i], i); // log them
 
}
 
```
 

	
 
## Task Lists
 

	
 
- [ ] Incomplete task list item
 
- [x] **Completed** task list item
 

	
 
## A bit of GitHub spice
 

	
 
* SHA: be6a8cc1c1ecfe9489fb51e4869af15a13fc2cd2
 
* User@SHA ref: mojombo@be6a8cc1c1ecfe9489fb51e4869af15a13fc2cd2
 
* User/Project@SHA: mojombo/god@be6a8cc1c1ecfe9489fb51e4869af15a13fc2cd2
 
* \#Num: #1
 
* User/#Num: mojombo#1
 
* User/Project#Num: mojombo/god#1
 

	
 
See http://github.github.com/github-flavored-markdown/.
 

	
 
</textarea></form>
 

	
 
    <script>
 
      var editor = CodeMirror.fromTextArea(document.getElementById("code"), {
 
        mode: 'gfm',
 
        lineNumbers: true,
 
        theme: "default"
 
      });
 
    </script>
 

	
 
    <p>Optionally depends on other modes for properly highlighted code blocks.</p>
 

	
 
    <p><strong>Parsing/Highlighting Tests:</strong> <a href="../../test/index.html#gfm_*">normal</a>,  <a href="../../test/index.html#verbose,gfm_*">verbose</a>.</p>
 

	
 
  </body>
 
</html>

Changeset was too big and was cut off... Show full diff anyway

0 comments (0 inline, 0 general)