summaryrefslogtreecommitdiff
path: root/public/vendor/codemirror/mode/r
diff options
context:
space:
mode:
Diffstat (limited to 'public/vendor/codemirror/mode/r')
-rw-r--r--public/vendor/codemirror/mode/r/index.html85
-rw-r--r--public/vendor/codemirror/mode/r/r.js164
2 files changed, 0 insertions, 249 deletions
diff --git a/public/vendor/codemirror/mode/r/index.html b/public/vendor/codemirror/mode/r/index.html
deleted file mode 100644
index 6dd96346..00000000
--- a/public/vendor/codemirror/mode/r/index.html
+++ /dev/null
@@ -1,85 +0,0 @@
-<!doctype html>
-
-<title>CodeMirror: R mode</title>
-<meta charset="utf-8"/>
-<link rel=stylesheet href="../../doc/docs.css">
-
-<link rel="stylesheet" href="../../lib/codemirror.css">
-<script src="../../lib/codemirror.js"></script>
-<script src="r.js"></script>
-<style>
- .CodeMirror { border-top: 1px solid silver; border-bottom: 1px solid silver; }
- .cm-s-default span.cm-semi { color: blue; font-weight: bold; }
- .cm-s-default span.cm-dollar { color: orange; font-weight: bold; }
- .cm-s-default span.cm-arrow { color: brown; }
- .cm-s-default span.cm-arg-is { color: brown; }
- </style>
-<div id=nav>
- <a href="http://codemirror.net"><h1>CodeMirror</h1><img id=logo src="../../doc/logo.png"></a>
-
- <ul>
- <li><a href="../../index.html">Home</a>
- <li><a href="../../doc/manual.html">Manual</a>
- <li><a href="https://github.com/codemirror/codemirror">Code</a>
- </ul>
- <ul>
- <li><a href="../index.html">Language modes</a>
- <li><a class=active href="#">R</a>
- </ul>
-</div>
-
-<article>
-<h2>R mode</h2>
-<form><textarea id="code" name="code">
-# Code from http://www.mayin.org/ajayshah/KB/R/
-
-# FIRST LEARN ABOUT LISTS --
-X = list(height=5.4, weight=54)
-print("Use default printing --")
-print(X)
-print("Accessing individual elements --")
-cat("Your height is ", X$height, " and your weight is ", X$weight, "\n")
-
-# FUNCTIONS --
-square <- function(x) {
- return(x*x)
-}
-cat("The square of 3 is ", square(3), "\n")
-
- # default value of the arg is set to 5.
-cube <- function(x=5) {
- return(x*x*x);
-}
-cat("Calling cube with 2 : ", cube(2), "\n") # will give 2^3
-cat("Calling cube : ", cube(), "\n") # will default to 5^3.
-
-# LEARN ABOUT FUNCTIONS THAT RETURN MULTIPLE OBJECTS --
-powers <- function(x) {
- parcel = list(x2=x*x, x3=x*x*x, x4=x*x*x*x);
- return(parcel);
-}
-
-X = powers(3);
-print("Showing powers of 3 --"); print(X);
-
-# WRITING THIS COMPACTLY (4 lines instead of 7)
-
-powerful <- function(x) {
- return(list(x2=x*x, x3=x*x*x, x4=x*x*x*x));
-}
-print("Showing powers of 3 --"); print(powerful(3));
-
-# In R, the last expression in a function is, by default, what is
-# returned. So you could equally just say:
-powerful <- function(x) {list(x2=x*x, x3=x*x*x, x4=x*x*x*x)}
-</textarea></form>
- <script>
- var editor = CodeMirror.fromTextArea(document.getElementById("code"), {});
- </script>
-
- <p><strong>MIME types defined:</strong> <code>text/x-rsrc</code>.</p>
-
- <p>Development of the CodeMirror R mode was kindly sponsored
- by <a href="https://twitter.com/ubalo">Ubalo</a>.</p>
-
- </article>
diff --git a/public/vendor/codemirror/mode/r/r.js b/public/vendor/codemirror/mode/r/r.js
deleted file mode 100644
index d41d1c54..00000000
--- a/public/vendor/codemirror/mode/r/r.js
+++ /dev/null
@@ -1,164 +0,0 @@
-// CodeMirror, copyright (c) by Marijn Haverbeke and others
-// Distributed under an MIT license: http://codemirror.net/LICENSE
-
-(function(mod) {
- if (typeof exports == "object" && typeof module == "object") // CommonJS
- mod(require("../../lib/codemirror"));
- else if (typeof define == "function" && define.amd) // AMD
- define(["../../lib/codemirror"], mod);
- else // Plain browser env
- mod(CodeMirror);
-})(function(CodeMirror) {
-"use strict";
-
-CodeMirror.registerHelper("wordChars", "r", /[\w.]/);
-
-CodeMirror.defineMode("r", function(config) {
- function wordObj(str) {
- var words = str.split(" "), res = {};
- for (var i = 0; i < words.length; ++i) res[words[i]] = true;
- return res;
- }
- var atoms = wordObj("NULL NA Inf NaN NA_integer_ NA_real_ NA_complex_ NA_character_");
- var builtins = wordObj("list quote bquote eval return call parse deparse");
- var keywords = wordObj("if else repeat while function for in next break");
- var blockkeywords = wordObj("if else repeat while function for");
- var opChars = /[+\-*\/^<>=!&|~$:]/;
- var curPunc;
-
- function tokenBase(stream, state) {
- curPunc = null;
- var ch = stream.next();
- if (ch == "#") {
- stream.skipToEnd();
- return "comment";
- } else if (ch == "0" && stream.eat("x")) {
- stream.eatWhile(/[\da-f]/i);
- return "number";
- } else if (ch == "." && stream.eat(/\d/)) {
- stream.match(/\d*(?:e[+\-]?\d+)?/);
- return "number";
- } else if (/\d/.test(ch)) {
- stream.match(/\d*(?:\.\d+)?(?:e[+\-]\d+)?L?/);
- return "number";
- } else if (ch == "'" || ch == '"') {
- state.tokenize = tokenString(ch);
- return "string";
- } else if (ch == "." && stream.match(/.[.\d]+/)) {
- return "keyword";
- } else if (/[\w\.]/.test(ch) && ch != "_") {
- stream.eatWhile(/[\w\.]/);
- var word = stream.current();
- if (atoms.propertyIsEnumerable(word)) return "atom";
- if (keywords.propertyIsEnumerable(word)) {
- // Block keywords start new blocks, except 'else if', which only starts
- // one new block for the 'if', no block for the 'else'.
- if (blockkeywords.propertyIsEnumerable(word) &&
- !stream.match(/\s*if(\s+|$)/, false))
- curPunc = "block";
- return "keyword";
- }
- if (builtins.propertyIsEnumerable(word)) return "builtin";
- return "variable";
- } else if (ch == "%") {
- if (stream.skipTo("%")) stream.next();
- return "variable-2";
- } else if (ch == "<" && stream.eat("-")) {
- return "arrow";
- } else if (ch == "=" && state.ctx.argList) {
- return "arg-is";
- } else if (opChars.test(ch)) {
- if (ch == "$") return "dollar";
- stream.eatWhile(opChars);
- return "operator";
- } else if (/[\(\){}\[\];]/.test(ch)) {
- curPunc = ch;
- if (ch == ";") return "semi";
- return null;
- } else {
- return null;
- }
- }
-
- function tokenString(quote) {
- return function(stream, state) {
- if (stream.eat("\\")) {
- var ch = stream.next();
- if (ch == "x") stream.match(/^[a-f0-9]{2}/i);
- else if ((ch == "u" || ch == "U") && stream.eat("{") && stream.skipTo("}")) stream.next();
- else if (ch == "u") stream.match(/^[a-f0-9]{4}/i);
- else if (ch == "U") stream.match(/^[a-f0-9]{8}/i);
- else if (/[0-7]/.test(ch)) stream.match(/^[0-7]{1,2}/);
- return "string-2";
- } else {
- var next;
- while ((next = stream.next()) != null) {
- if (next == quote) { state.tokenize = tokenBase; break; }
- if (next == "\\") { stream.backUp(1); break; }
- }
- return "string";
- }
- };
- }
-
- function push(state, type, stream) {
- state.ctx = {type: type,
- indent: state.indent,
- align: null,
- column: stream.column(),
- prev: state.ctx};
- }
- function pop(state) {
- state.indent = state.ctx.indent;
- state.ctx = state.ctx.prev;
- }
-
- return {
- startState: function() {
- return {tokenize: tokenBase,
- ctx: {type: "top",
- indent: -config.indentUnit,
- align: false},
- indent: 0,
- afterIdent: false};
- },
-
- token: function(stream, state) {
- if (stream.sol()) {
- if (state.ctx.align == null) state.ctx.align = false;
- state.indent = stream.indentation();
- }
- if (stream.eatSpace()) return null;
- var style = state.tokenize(stream, state);
- if (style != "comment" && state.ctx.align == null) state.ctx.align = true;
-
- var ctype = state.ctx.type;
- if ((curPunc == ";" || curPunc == "{" || curPunc == "}") && ctype == "block") pop(state);
- if (curPunc == "{") push(state, "}", stream);
- else if (curPunc == "(") {
- push(state, ")", stream);
- if (state.afterIdent) state.ctx.argList = true;
- }
- else if (curPunc == "[") push(state, "]", stream);
- else if (curPunc == "block") push(state, "block", stream);
- else if (curPunc == ctype) pop(state);
- state.afterIdent = style == "variable" || style == "keyword";
- return style;
- },
-
- indent: function(state, textAfter) {
- if (state.tokenize != tokenBase) return 0;
- var firstChar = textAfter && textAfter.charAt(0), ctx = state.ctx,
- closing = firstChar == ctx.type;
- if (ctx.type == "block") return ctx.indent + (firstChar == "{" ? 0 : config.indentUnit);
- else if (ctx.align) return ctx.column + (closing ? 0 : 1);
- else return ctx.indent + (closing ? 0 : config.indentUnit);
- },
-
- lineComment: "#"
- };
-});
-
-CodeMirror.defineMIME("text/x-rsrc", "r");
-
-});