RubyGems - rouge-alda - Versions diffs - 3.3.0 - Mend

rouge-alda 3.3.0

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

Files changed (335) hide show

checksums.yaml +7 -0
data/Gemfile +28 -0
data/LICENSE +186 -0
data/bin/rougify +18 -0
data/lib/rouge/cli.rb +432 -0
data/lib/rouge/demos/abap +6 -0
data/lib/rouge/demos/actionscript +4 -0
data/lib/rouge/demos/alda +10 -0
data/lib/rouge/demos/apache +21 -0
data/lib/rouge/demos/apiblueprint +33 -0
data/lib/rouge/demos/applescript +2 -0
data/lib/rouge/demos/awk +4 -0
data/lib/rouge/demos/biml +38 -0
data/lib/rouge/demos/bsl +7 -0
data/lib/rouge/demos/c +8 -0
data/lib/rouge/demos/ceylon +7 -0
data/lib/rouge/demos/cfscript +18 -0
data/lib/rouge/demos/clojure +5 -0
data/lib/rouge/demos/cmake +7 -0
data/lib/rouge/demos/coffeescript +5 -0
data/lib/rouge/demos/common_lisp +1 -0
data/lib/rouge/demos/conf +4 -0
data/lib/rouge/demos/console +6 -0
data/lib/rouge/demos/coq +13 -0
data/lib/rouge/demos/cpp +8 -0
data/lib/rouge/demos/crystal +45 -0
data/lib/rouge/demos/csharp +5 -0
data/lib/rouge/demos/css +4 -0
data/lib/rouge/demos/d +16 -0
data/lib/rouge/demos/dart +6 -0
data/lib/rouge/demos/diff +7 -0
data/lib/rouge/demos/digdag +19 -0
data/lib/rouge/demos/docker +9 -0
data/lib/rouge/demos/dot +5 -0
data/lib/rouge/demos/eiffel +30 -0
data/lib/rouge/demos/elixir +1 -0
data/lib/rouge/demos/elm +4 -0
data/lib/rouge/demos/erb +1 -0
data/lib/rouge/demos/erlang +7 -0
data/lib/rouge/demos/factor +5 -0
data/lib/rouge/demos/fortran +22 -0
data/lib/rouge/demos/fsharp +12 -0
data/lib/rouge/demos/gherkin +17 -0
data/lib/rouge/demos/glsl +14 -0
data/lib/rouge/demos/go +7 -0
data/lib/rouge/demos/gradle +10 -0
data/lib/rouge/demos/graphql +17 -0
data/lib/rouge/demos/groovy +9 -0
data/lib/rouge/demos/hack +5 -0
data/lib/rouge/demos/haml +5 -0
data/lib/rouge/demos/handlebars +7 -0
data/lib/rouge/demos/haskell +6 -0
data/lib/rouge/demos/hcl +7 -0
data/lib/rouge/demos/html +8 -0
data/lib/rouge/demos/http +14 -0
data/lib/rouge/demos/hylang +10 -0
data/lib/rouge/demos/idlang +8 -0
data/lib/rouge/demos/igorpro +9 -0
data/lib/rouge/demos/ini +4 -0
data/lib/rouge/demos/io +11 -0
data/lib/rouge/demos/irb +4 -0
data/lib/rouge/demos/irb_output +2 -0
data/lib/rouge/demos/java +5 -0
data/lib/rouge/demos/javascript +1 -0
data/lib/rouge/demos/jinja +9 -0
data/lib/rouge/demos/json +1 -0
data/lib/rouge/demos/json-doc +1 -0
data/lib/rouge/demos/jsonnet +28 -0
data/lib/rouge/demos/jsp +29 -0
data/lib/rouge/demos/jsx +17 -0
data/lib/rouge/demos/julia +11 -0
data/lib/rouge/demos/kotlin +3 -0
data/lib/rouge/demos/lasso +12 -0
data/lib/rouge/demos/liquid +11 -0
data/lib/rouge/demos/literate_coffeescript +3 -0
data/lib/rouge/demos/literate_haskell +7 -0
data/lib/rouge/demos/llvm +20 -0
data/lib/rouge/demos/lua +12 -0
data/lib/rouge/demos/m68k +16 -0
data/lib/rouge/demos/make +6 -0
data/lib/rouge/demos/markdown +4 -0
data/lib/rouge/demos/mathematica +8 -0
data/lib/rouge/demos/matlab +6 -0
data/lib/rouge/demos/moonscript +16 -0
data/lib/rouge/demos/mosel +10 -0
data/lib/rouge/demos/mxml +22 -0
data/lib/rouge/demos/nasm +26 -0
data/lib/rouge/demos/nginx +5 -0
data/lib/rouge/demos/nim +27 -0
data/lib/rouge/demos/nix +19 -0
data/lib/rouge/demos/objective_c +18 -0
data/lib/rouge/demos/ocaml +12 -0
data/lib/rouge/demos/pascal +14 -0
data/lib/rouge/demos/perl +5 -0
data/lib/rouge/demos/php +3 -0
data/lib/rouge/demos/plaintext +1 -0
data/lib/rouge/demos/plist +142 -0
data/lib/rouge/demos/pony +17 -0
data/lib/rouge/demos/powershell +49 -0
data/lib/rouge/demos/praat +26 -0
data/lib/rouge/demos/prolog +9 -0
data/lib/rouge/demos/prometheus +9 -0
data/lib/rouge/demos/properties +7 -0
data/lib/rouge/demos/protobuf +5 -0
data/lib/rouge/demos/puppet +6 -0
data/lib/rouge/demos/python +6 -0
data/lib/rouge/demos/q +2 -0
data/lib/rouge/demos/qml +9 -0
data/lib/rouge/demos/r +8 -0
data/lib/rouge/demos/racket +24 -0
data/lib/rouge/demos/ruby +9 -0
data/lib/rouge/demos/rust +12 -0
data/lib/rouge/demos/sass +3 -0
data/lib/rouge/demos/scala +3 -0
data/lib/rouge/demos/scheme +4 -0
data/lib/rouge/demos/scss +5 -0
data/lib/rouge/demos/sed +4 -0
data/lib/rouge/demos/shell +2 -0
data/lib/rouge/demos/sieve +10 -0
data/lib/rouge/demos/slim +17 -0
data/lib/rouge/demos/smalltalk +6 -0
data/lib/rouge/demos/smarty +12 -0
data/lib/rouge/demos/sml +4 -0
data/lib/rouge/demos/sqf +14 -0
data/lib/rouge/demos/sql +1 -0
data/lib/rouge/demos/swift +5 -0
data/lib/rouge/demos/tap +5 -0
data/lib/rouge/demos/tcl +1 -0
data/lib/rouge/demos/terraform +31 -0
data/lib/rouge/demos/tex +1 -0
data/lib/rouge/demos/toml +9 -0
data/lib/rouge/demos/tsx +17 -0
data/lib/rouge/demos/tulip +13 -0
data/lib/rouge/demos/turtle +26 -0
data/lib/rouge/demos/twig +9 -0
data/lib/rouge/demos/typescript +1 -0
data/lib/rouge/demos/vala +8 -0
data/lib/rouge/demos/vb +4 -0
data/lib/rouge/demos/verilog +27 -0
data/lib/rouge/demos/vhdl +23 -0
data/lib/rouge/demos/viml +14 -0
data/lib/rouge/demos/vue +11 -0
data/lib/rouge/demos/wollok +11 -0
data/lib/rouge/demos/xml +2 -0
data/lib/rouge/demos/yaml +4 -0
data/lib/rouge/formatter.rb +76 -0
data/lib/rouge/formatters/html.rb +38 -0
data/lib/rouge/formatters/html_inline.rb +31 -0
data/lib/rouge/formatters/html_legacy.rb +45 -0
data/lib/rouge/formatters/html_linewise.rb +28 -0
data/lib/rouge/formatters/html_pygments.rb +18 -0
data/lib/rouge/formatters/html_table.rb +62 -0
data/lib/rouge/formatters/null.rb +20 -0
data/lib/rouge/formatters/terminal256.rb +181 -0
data/lib/rouge/guesser.rb +57 -0
data/lib/rouge/guessers/disambiguation.rb +106 -0
data/lib/rouge/guessers/filename.rb +27 -0
data/lib/rouge/guessers/glob_mapping.rb +45 -0
data/lib/rouge/guessers/mimetype.rb +16 -0
data/lib/rouge/guessers/modeline.rb +46 -0
data/lib/rouge/guessers/source.rb +31 -0
data/lib/rouge/guessers/util.rb +34 -0
data/lib/rouge/lexer.rb +462 -0
data/lib/rouge/lexers/abap.rb +240 -0
data/lib/rouge/lexers/actionscript.rb +196 -0
data/lib/rouge/lexers/alda.rb +43 -0
data/lib/rouge/lexers/apache/keywords.yml +764 -0
data/lib/rouge/lexers/apache.rb +73 -0
data/lib/rouge/lexers/apiblueprint.rb +49 -0
data/lib/rouge/lexers/apple_script.rb +369 -0
data/lib/rouge/lexers/awk.rb +162 -0
data/lib/rouge/lexers/biml.rb +43 -0
data/lib/rouge/lexers/bsl.rb +82 -0
data/lib/rouge/lexers/c.rb +213 -0
data/lib/rouge/lexers/ceylon.rb +124 -0
data/lib/rouge/lexers/cfscript.rb +154 -0
data/lib/rouge/lexers/clojure.rb +113 -0
data/lib/rouge/lexers/cmake.rb +207 -0
data/lib/rouge/lexers/coffeescript.rb +175 -0
data/lib/rouge/lexers/common_lisp.rb +346 -0
data/lib/rouge/lexers/conf.rb +25 -0
data/lib/rouge/lexers/console.rb +137 -0
data/lib/rouge/lexers/coq.rb +188 -0
data/lib/rouge/lexers/cpp.rb +79 -0
data/lib/rouge/lexers/crystal.rb +430 -0
data/lib/rouge/lexers/csharp.rb +115 -0
data/lib/rouge/lexers/css.rb +274 -0
data/lib/rouge/lexers/d.rb +177 -0
data/lib/rouge/lexers/dart.rb +105 -0
data/lib/rouge/lexers/diff.rb +33 -0
data/lib/rouge/lexers/digdag.rb +70 -0
data/lib/rouge/lexers/docker.rb +51 -0
data/lib/rouge/lexers/dot.rb +69 -0
data/lib/rouge/lexers/eiffel.rb +66 -0
data/lib/rouge/lexers/elixir.rb +134 -0
data/lib/rouge/lexers/elm.rb +90 -0
data/lib/rouge/lexers/erb.rb +53 -0
data/lib/rouge/lexers/erlang.rb +115 -0
data/lib/rouge/lexers/factor.rb +303 -0
data/lib/rouge/lexers/fortran.rb +178 -0
data/lib/rouge/lexers/fsharp.rb +119 -0
data/lib/rouge/lexers/gherkin/keywords.rb +16 -0
data/lib/rouge/lexers/gherkin.rb +138 -0
data/lib/rouge/lexers/glsl.rb +136 -0
data/lib/rouge/lexers/go.rb +175 -0
data/lib/rouge/lexers/gradle.rb +38 -0
data/lib/rouge/lexers/graphql.rb +254 -0
data/lib/rouge/lexers/groovy.rb +113 -0
data/lib/rouge/lexers/hack.rb +49 -0
data/lib/rouge/lexers/haml.rb +230 -0
data/lib/rouge/lexers/handlebars.rb +80 -0
data/lib/rouge/lexers/haskell.rb +198 -0
data/lib/rouge/lexers/hcl.rb +163 -0
data/lib/rouge/lexers/html.rb +140 -0
data/lib/rouge/lexers/http.rb +81 -0
data/lib/rouge/lexers/hylang.rb +94 -0
data/lib/rouge/lexers/idlang.rb +312 -0
data/lib/rouge/lexers/igorpro.rb +664 -0
data/lib/rouge/lexers/ini.rb +54 -0
data/lib/rouge/lexers/io.rb +69 -0
data/lib/rouge/lexers/irb.rb +67 -0
data/lib/rouge/lexers/java.rb +88 -0
data/lib/rouge/lexers/javascript.rb +283 -0
data/lib/rouge/lexers/jinja.rb +138 -0
data/lib/rouge/lexers/json.rb +30 -0
data/lib/rouge/lexers/json_doc.rb +24 -0
data/lib/rouge/lexers/jsonnet.rb +152 -0
data/lib/rouge/lexers/jsp.rb +120 -0
data/lib/rouge/lexers/jsx.rb +104 -0
data/lib/rouge/lexers/julia.rb +167 -0
data/lib/rouge/lexers/kotlin.rb +127 -0
data/lib/rouge/lexers/lasso/keywords.yml +446 -0
data/lib/rouge/lexers/lasso.rb +215 -0
data/lib/rouge/lexers/liquid.rb +288 -0
data/lib/rouge/lexers/literate_coffeescript.rb +34 -0
data/lib/rouge/lexers/literate_haskell.rb +37 -0
data/lib/rouge/lexers/llvm.rb +81 -0
data/lib/rouge/lexers/lua/builtins.rb +24 -0
data/lib/rouge/lexers/lua.rb +126 -0
data/lib/rouge/lexers/m68k.rb +144 -0
data/lib/rouge/lexers/make.rb +113 -0
data/lib/rouge/lexers/markdown.rb +155 -0
data/lib/rouge/lexers/mathematica/builtins.rb +13 -0
data/lib/rouge/lexers/mathematica.rb +96 -0
data/lib/rouge/lexers/matlab/builtins.rb +13 -0
data/lib/rouge/lexers/matlab.rb +72 -0
data/lib/rouge/lexers/moonscript.rb +115 -0
data/lib/rouge/lexers/mosel.rb +232 -0
data/lib/rouge/lexers/mxml.rb +69 -0
data/lib/rouge/lexers/nasm.rb +199 -0
data/lib/rouge/lexers/nginx.rb +72 -0
data/lib/rouge/lexers/nim.rb +153 -0
data/lib/rouge/lexers/nix.rb +211 -0
data/lib/rouge/lexers/objective_c.rb +195 -0
data/lib/rouge/lexers/ocaml.rb +101 -0
data/lib/rouge/lexers/pascal.rb +67 -0
data/lib/rouge/lexers/perl.rb +201 -0
data/lib/rouge/lexers/php/builtins.rb +196 -0
data/lib/rouge/lexers/php.rb +194 -0
data/lib/rouge/lexers/plain_text.rb +27 -0
data/lib/rouge/lexers/plist.rb +47 -0
data/lib/rouge/lexers/pony.rb +94 -0
data/lib/rouge/lexers/powershell.rb +679 -0
data/lib/rouge/lexers/praat.rb +351 -0
data/lib/rouge/lexers/prolog.rb +61 -0
data/lib/rouge/lexers/prometheus.rb +123 -0
data/lib/rouge/lexers/properties.rb +52 -0
data/lib/rouge/lexers/protobuf.rb +71 -0
data/lib/rouge/lexers/puppet.rb +129 -0
data/lib/rouge/lexers/python.rb +247 -0
data/lib/rouge/lexers/q.rb +125 -0
data/lib/rouge/lexers/qml.rb +74 -0
data/lib/rouge/lexers/r.rb +90 -0
data/lib/rouge/lexers/racket.rb +545 -0
data/lib/rouge/lexers/ruby.rb +439 -0
data/lib/rouge/lexers/rust.rb +198 -0
data/lib/rouge/lexers/sass/common.rb +181 -0
data/lib/rouge/lexers/sass.rb +75 -0
data/lib/rouge/lexers/scala.rb +143 -0
data/lib/rouge/lexers/scheme.rb +113 -0
data/lib/rouge/lexers/scss.rb +35 -0
data/lib/rouge/lexers/sed.rb +173 -0
data/lib/rouge/lexers/shell.rb +190 -0
data/lib/rouge/lexers/sieve.rb +97 -0
data/lib/rouge/lexers/slim.rb +229 -0
data/lib/rouge/lexers/smalltalk.rb +117 -0
data/lib/rouge/lexers/smarty.rb +81 -0
data/lib/rouge/lexers/sml.rb +345 -0
data/lib/rouge/lexers/sqf/commands.rb +15 -0
data/lib/rouge/lexers/sqf.rb +109 -0
data/lib/rouge/lexers/sql.rb +141 -0
data/lib/rouge/lexers/swift.rb +182 -0
data/lib/rouge/lexers/tap.rb +89 -0
data/lib/rouge/lexers/tcl.rb +193 -0
data/lib/rouge/lexers/terraform.rb +105 -0
data/lib/rouge/lexers/tex.rb +70 -0
data/lib/rouge/lexers/toml.rb +68 -0
data/lib/rouge/lexers/tsx.rb +20 -0
data/lib/rouge/lexers/tulip.rb +108 -0
data/lib/rouge/lexers/turtle.rb +64 -0
data/lib/rouge/lexers/twig.rb +40 -0
data/lib/rouge/lexers/typescript/common.rb +34 -0
data/lib/rouge/lexers/typescript.rb +23 -0
data/lib/rouge/lexers/vala.rb +78 -0
data/lib/rouge/lexers/vb.rb +165 -0
data/lib/rouge/lexers/verilog.rb +165 -0
data/lib/rouge/lexers/vhdl.rb +98 -0
data/lib/rouge/lexers/viml/keywords.rb +14 -0
data/lib/rouge/lexers/viml.rb +102 -0
data/lib/rouge/lexers/vue.rb +124 -0
data/lib/rouge/lexers/wollok.rb +104 -0
data/lib/rouge/lexers/xml.rb +58 -0
data/lib/rouge/lexers/yaml.rb +374 -0
data/lib/rouge/plugins/redcarpet.rb +31 -0
data/lib/rouge/regex_lexer.rb +442 -0
data/lib/rouge/template_lexer.rb +21 -0
data/lib/rouge/text_analyzer.rb +50 -0
data/lib/rouge/theme.rb +214 -0
data/lib/rouge/themes/base16.rb +131 -0
data/lib/rouge/themes/colorful.rb +68 -0
data/lib/rouge/themes/github.rb +72 -0
data/lib/rouge/themes/gruvbox.rb +168 -0
data/lib/rouge/themes/igor_pro.rb +21 -0
data/lib/rouge/themes/molokai.rb +83 -0
data/lib/rouge/themes/monokai.rb +93 -0
data/lib/rouge/themes/monokai_sublime.rb +92 -0
data/lib/rouge/themes/pastie.rb +70 -0
data/lib/rouge/themes/thankful_eyes.rb +75 -0
data/lib/rouge/themes/tulip.rb +70 -0
data/lib/rouge/token.rb +183 -0
data/lib/rouge/util.rb +102 -0
data/lib/rouge/version.rb +8 -0
data/lib/rouge.rb +84 -0
data/rouge.gemspec +25 -0
metadata +384 -0

data/lib/rouge/demos/javascript ADDED Viewed

	@@ -0,0 +1 @@
1	+ $(document).ready(function() { alert('ready!'); });

data/lib/rouge/demos/jinja ADDED Viewed

@@ -0,0 +1,9 @@
+{% extends "layout.html" %}
+{% block body %}
+  <ul>
+  {% for user in users %}
+    <li><a href="{{ user.url }}">{{ user.username }}</a></li>
+  {% endfor %}
+  </ul>
+{% endblock %}

data/lib/rouge/demos/json ADDED Viewed

	@@ -0,0 +1 @@
1	+ { "one": 1, "two": 2, "null": null, "simple": true }

data/lib/rouge/demos/json-doc ADDED Viewed

	@@ -0,0 +1 @@
1	+ { "one": 1, "two": 2, "null": null, "simple": true } // a simple json object

data/lib/rouge/demos/jsonnet ADDED Viewed

@@ -0,0 +1,28 @@
+// Compiler template
+local CCompiler = {
+  cFlags: [],
+  out: "a.out",
+  local flags_str = std.join(" ", self.cFlags),
+  local files_str = std.join(" ", self.files),
+  cmd: "%s %s %s -o %s" % [self.compiler, flags_str, files_str, self.out],
+};
+// GCC specialization
+local Gcc = CCompiler { compiler: "gcc" };
+// Another specialization
+local Clang = CCompiler { compiler: "clang" };
+// Mixins - append flags
+local Opt = { cFlags: super.cFlags + ["-O3", "-DNDEBUG"] };
+local Dbg = { cFlags: super.cFlags + ["-g"] };
+// Output:
+{
+  targets: [
+    Gcc { files: ["a.c", "b.c"] },
+    Clang { files: ["test.c"], out: "test" },
+    Clang + Opt { files: ["test2.c"], out: "test2" },
+    Gcc + Opt + Dbg { files: ["foo.c", "bar.c"], out: "baz" },
+  ]
+}

data/lib/rouge/demos/jsp ADDED Viewed

@@ -0,0 +1,29 @@
+<%@ page contentType="text/html;charset=UTF-8" language="java" %>
+<%@ page import="java.time.LocalDateTime" %>
+<%! int day = 3; %>
+<!DOCTYPE html>
+<html>
+	<head>
+		<title>Simple JSP Application</title>
+	</head>
+	<body>
+        <%-- This is a JSP comment --%>
+		<h1>Hello world!</h1>
+		<h2>Current time is <%= LocalDateTime.now() %></h2>
+        <% if (day == 1 || day == 7) { %>
+            <p> Today is weekend</p>
+        <% } else { %>
+            <p> Today is not weekend</p>
+        <% } %>
+        h2>Using JavaBeans in JSP</h2>
+        <jsp:useBean id="test" class="action.TestBean" />
+        <jsp:setProperty name="test"  property="message"  value="Hello JSP..." />
+        <p>Got message:</p>
+        <jsp:getProperty name="test" property="message" />
+	</body>
+</html>

data/lib/rouge/demos/jsx ADDED Viewed

@@ -0,0 +1,17 @@
+var HelloWorld = React.createClass({
+  render: function() {
+    return (
+      <p>
+        Hello, <input type="text" placeholder="Your name here" />!
+        It is {this.props.date.toTimeString()}
+      </p>
+    );
+  }
+});
+setInterval(function() {
+  ReactDOM.render(
+    <HelloWorld date={new Date()} />,
+    document.getElementById('example')
+  );
+}, 500);

data/lib/rouge/demos/julia ADDED Viewed

@@ -0,0 +1,11 @@
+function mandel(z)
+    c = z
+    maxiter = 80
+    for n = 1:maxiter
+        if abs(z) > 2
+            return n-1
+        end
+        z = z^2 + c
+    end
+    return maxiter
+end

data/lib/rouge/demos/kotlin ADDED Viewed

@@ -0,0 +1,3 @@
+fun main(args: Array<String>) {
+    println("Hello, world!")
+}

data/lib/rouge/demos/lasso ADDED Viewed

@@ -0,0 +1,12 @@
+/**!
+  Inserts all of the elements from #rhs into the array.
+*/
+define array->+(rhs::trait_forEach) => {
+  local(a = .asCopy);
+  #rhs->forEach => {
+    #a->insert(#1)
+  }
+  return (#a)
+}
+define array->onCompare(n::null) => 1

data/lib/rouge/demos/liquid ADDED Viewed

@@ -0,0 +1,11 @@
+<ul id="products">
+  {% for product in products %}
+    <li>
+      <h2>{{ product.title }}</h2>
+      Only {{ product.price | format_as_money }}
+      <p>{{ product.description | prettyprint | truncate: 200  }}</p>
+    </li>
+  {% endfor %}
+</ul>

data/lib/rouge/demos/literate_coffeescript ADDED Viewed

@@ -0,0 +1,3 @@
+Import the helpers we plan to use.
+    {extend, last} = require './helpers'

data/lib/rouge/demos/literate_haskell ADDED Viewed

@@ -0,0 +1,7 @@
+In Bird-style you have to leave a blank before the code.
+> fact :: Integer -> Integer
+> fact 0 = 1
+> fact n = n * fact (n-1)
+And you have to leave a blank line after the code as well.

data/lib/rouge/demos/llvm ADDED Viewed

@@ -0,0 +1,20 @@
+; copied from http://llvm.org/docs/LangRef.html#module-structure
+; Declare the string constant as a global constant.
+@.str = private unnamed_addr constant [13 x i8] c"hello world\0A\00"
+; External declaration of the puts function
+declare i32 @puts(i8* nocapture) nounwind
+; Definition of main function
+define i32 @main() {   ; i32()*
+  ; Convert [13 x i8]* to i8  *...
+  %cast210 = getelementptr [13 x i8]* @.str, i64 0, i64 0
+  ; Call puts function to write out the string to stdout.
+  call i32 @puts(i8* %cast210)
+  ret i32 0
+}
+; Named metadata
+!1 = metadata !{i32 42}
+!foo = !{!1, null}

data/lib/rouge/demos/lua ADDED Viewed

@@ -0,0 +1,12 @@
+-- defines a factorial function
+function fact (n)
+  if n == 0 then
+    return 1
+  else
+    return n * fact(n-1)
+  end
+end
+print("enter a number:")
+a = io.read("*number")        -- read a number
+print(fact(a))

data/lib/rouge/demos/m68k ADDED Viewed

@@ -0,0 +1,16 @@
+initialize:                     ; go into super user mode
+   clr.l -(a7)
+   move.w #32,-(a7)
+   trap #1
+   addq.l #6,a7
+   move.l d0,oldstack
+   rts
+restore:                        ; go back into user mode
+   move.l oldstack,-(a7)
+   move.w #32,-(a7)
+   trap #1
+   addq.l #6,a7
+   rts
+oldstack dc.l 0

data/lib/rouge/demos/make ADDED Viewed

@@ -0,0 +1,6 @@
+.PHONY: all
+all: $(OBJ)
+$(OBJ): $(SOURCE)
+	@echo "compiling..."
+	$(GCC) $(CFLAGS) $< > $@

data/lib/rouge/demos/markdown ADDED Viewed

@@ -0,0 +1,4 @@
+Markdown has cool [reference links][ref 1]
+and [regular links too](http://example.com)
+[ref 1]: http://example.com

data/lib/rouge/demos/mathematica ADDED Viewed

@@ -0,0 +1,8 @@
+(* Fibonacci numbers with memoization *)
+fib::usage = "f[n] calculates the n'th Fibonacci number.";
+fib[0] = fib[1] = 1;
+fib[n_Integer?Positive]:= fib[n] = fib[n-1] + fib[n-2];
+In[4]:= fib[42]
+Out[4]= 433494437

data/lib/rouge/demos/matlab ADDED Viewed

@@ -0,0 +1,6 @@
+A = cat( 3, [1 2 3; 9 8 7; 4 6 5], [0 3 2; 8 8 4; 5 3 5], ...
+                 [6 4 7; 6 8 5; 5 4 3]);
+% The EIG function is applied to each of the horizontal 'slices' of A.
+for i = 1:3
+    eig(squeeze(A(i,:,:)))
+end

data/lib/rouge/demos/moonscript ADDED Viewed

@@ -0,0 +1,16 @@
+util = require "my.module"
+a_table = {
+  foo: 'bar'
+  interpolated: "foo-#{other.stuff 2 + 3}"
+  "string": 2
+  do: 'keyword'
+}
+class MyClass extends SomeClass
+  new: (@init, arg2 = 'default') =>
+    @derived = @init + 2
+    super!
+  other: =>
+    @foo + 2

data/lib/rouge/demos/mosel ADDED Viewed

@@ -0,0 +1,10 @@
+(!******************************************************
+   Mosel Example Problems
+*******************************************************!)
+! Objective function: total daily cost
+ Cost:= sum(p in TYPES, t in TIME) (CSTART(p)*start(p,t) +
+          LEN(t)*(CMIN(p)*work(p,t) + CADD(p)*padd(p,t)))
+! Limit on power production above minimum level
+ forall(p in TYPES, t in TIME) padd(p,t) <= (PMAX(p)-PMIN(p))*work(p,t)

data/lib/rouge/demos/mxml ADDED Viewed

@@ -0,0 +1,22 @@
+<?xml version="1.0"?>
+<s:ComboBox xmlns:fx="http://ns.adobe.com/mxml/2009"
+    xmlns:s="library://ns.adobe.com/flex/spark"
+    xmlns:mx="library://ns.adobe.com/flex/mx">
+    <fx:Script>
+        <![CDATA[
+            [Bindable]
+            private var buttonLabel:String = "Click me!";
+            private var clicks:int = 0;
+            function button_clicked():void {
+                clicks++;
+                buttonLabel = clicks.toString();
+            }
+        ]]>
+    </fx:Script>
+    <s:Button id="button"
+              label="{buttonLabel}"
+              click="{button_clicked()}" />
+</s:ComboBox>

data/lib/rouge/demos/nasm ADDED Viewed

@@ -0,0 +1,26 @@
+%macro IRQ 2
+    global irq%1
+    irq%1:
+        cli
+        push byte 0     ; push a dummy error code
+        push byte %2    ; push the IRQ number
+        jmp  irq_common_stub
+%endmacro
+extern irq_handler
+irq_common_stub:
+    pusha           ; Pushes edi,esi,ebp,esp,ebx,edx,ecx,eax
+    mov ax, ds      ; Lower 16-bits of eax = ds.
+    push eax        ; save the data segment descriptor
+    mov ax, 0x10    ; load the kernel data segment descriptor
+    mov edx, eax
+    call irq_handler
+%assign i 0
+%rep 8
+ISR_NOERRCODE i
+%assign i i+1
+%endrep
+ISR_NOERRCODE 9

data/lib/rouge/demos/nginx ADDED Viewed

@@ -0,0 +1,5 @@
+server {
+  listen          80;
+  server_name     example.com *.example.com;
+  rewrite ^       http://www.domain.com$request_uri? permanent;
+}

data/lib/rouge/demos/nim ADDED Viewed

@@ -0,0 +1,27 @@
+import math,strutils
+proc fixedWidth(input: string, minFieldSize: int):string {.inline.} =
+  # Note that field size is a minimum- will expand field if input
+  # string is larger
+  if input.startsWith("-"):
+    return(input & repeatchar(count=(abs(minFieldSize-len(input))),c=' '))
+  else:
+    return(" " & input & repeatchar(count=(abs(minFieldSize-len(input))-1),c=' '))
+template mathOnInterval(lowbound,highbound:float,counts: int,p:proc) =
+  block:
+    var step:    float = (highbound - lowbound)/(max(counts,1))
+    var current: float = lowbound
+    while current < highbound:
+      echo($fixedWidth($current,25) & ": " & $fixedWidth($p(current),25))
+      current += step
+echo "Sine of theta from 0 to 2*PI by PI/12"
+mathOnInterval(0.0,2.0*PI,12,sin)
+echo("\n")
+echo "Cosine of theta from 0 to 2*PI by PI/12"
+mathOnInterval(0.0,2.0*PI,12,cos)
+# The first example above is much the same as:
+# for i in 1..100:
+#   echo($sin( (float(i)/100.0) * 2.0*PI ))

data/lib/rouge/demos/nix ADDED Viewed

@@ -0,0 +1,19 @@
+# See https://nixos.org/nix/manual/#sec-expression-syntax
+{ stdenv, fetchurl, perl }: # 1
+stdenv.mkDerivation { # 2
+  name = "hello-2.1.1"; # 3
+  builder = ./builder.sh; # 4
+  meta = rec {
+    name = "rouge";
+    version = "${name}-2.1.1";
+    number = 55 + 12;
+    isSmaller = number < 42;
+    bool = true;
+  };
+  src = fetchurl { # 5
+    url = ftp://ftp.nluug.nl/pub/gnu/hello/hello-2.1.1.tar.gz; # path
+    md5 = "70c9ccf9fac07f762c24f2df2290784d";
+  };
+  inherit perl; # 6
+}

data/lib/rouge/demos/objective_c ADDED Viewed

@@ -0,0 +1,18 @@
+@interface Person : NSObject {
+  @public
+  NSString *name;
+  @private
+  int age;
+}
+@property(copy) NSString *name;
+@property(readonly) int age;
+-(id)initWithAge:(int)age;
+@end
+NSArray *arrayLiteral = @[@"abc", @1];
+NSDictionary *dictLiteral = @{
+  @"hello": @"world",
+  @"goodbye": @"cruel world"
+};

data/lib/rouge/demos/ocaml ADDED Viewed

@@ -0,0 +1,12 @@
+(* Binary tree with leaves carrying an integer. *)
+type tree = Leaf of int | Node of tree * tree
+let rec exists_leaf test tree =
+  match tree with
+  | Leaf v -> test v
+  | Node (left, right) ->
+      exists_leaf test left
+      || exists_leaf test right
+let has_even_leaf tree =
+  exists_leaf (fun n -> n mod 2 = 0) tree

data/lib/rouge/demos/pascal ADDED Viewed

@@ -0,0 +1,14 @@
+program FizzBuzz(output);
+var
+  i: Integer;
+begin
+  for i := 1 to 100 do
+    if i mod 15 = 0 then
+      WriteLn('FizzBuzz')
+    else if i mod 3 = 0 then
+      WriteLn('Fizz')
+    else if i mod 5 = 0 then
+      WriteLn('Buzz')
+    else
+      WriteLn(i)
+end.

data/lib/rouge/demos/perl ADDED Viewed

@@ -0,0 +1,5 @@
+#!/usr/bin/env perl
+use warnings;
+print "a: ";
+my $a = "foo";
+print $a;

data/lib/rouge/demos/php ADDED Viewed

@@ -0,0 +1,3 @@
+<?php
+  print("Hello {$world}");
+?>

data/lib/rouge/demos/plaintext ADDED Viewed

	@@ -0,0 +1 @@
1	+ plain text :)

data/lib/rouge/demos/plist ADDED Viewed

@@ -0,0 +1,142 @@
+// !$*UTF8*$!
+{
+	archiveVersion = 1;
+	classes = {
+	};
+	objectVersion = 46;
+	objects = {
+/* Begin PBXGroup section */
+		1D67B9537FE4C81097096F85 /* Frameworks */ = {
+			isa = PBXGroup;
+			children = (
+			);
+			name = Frameworks;
+			sourceTree = "<group>";
+		};
+		74946460D3EE9E1FA4792785 = {
+			isa = PBXGroup;
+			children = (
+				E3060171E73473A889949AB5 /* Products */,
+				1D67B9537FE4C81097096F85 /* Frameworks */,
+			);
+			sourceTree = "<group>";
+		};
+		E3060171E73473A889949AB5 /* Products */ = {
+			isa = PBXGroup;
+			children = (
+			);
+			name = Products;
+			sourceTree = "<group>";
+		};
+/* End PBXGroup section */
+/* Begin PBXProject section */
+		B3A67937542EC2041CBF1CA2 /* Project object */ = {
+			isa = PBXProject;
+			attributes = {
+				LastSwiftUpdateCheck = 0730;
+				LastUpgradeCheck = 0700;
+			};
+			buildConfigurationList = 442CE273DD7DF2DFDC620C8B /* Build configuration list for PBXProject "foo" */;
+			compatibilityVersion = "Xcode 3.2";
+			developmentRegion = English;
+			hasScannedForEncodings = 0;
+			knownRegions = (
+				en,
+			);
+			mainGroup = 74946460D3EE9E1FA4792785;
+			productRefGroup = E3060171E73473A889949AB5 /* Products */;
+			projectDirPath = "";
+			projectRoot = "";
+			targets = (
+			);
+		};
+/* End PBXProject section */
+/* Begin XCBuildConfiguration section */
+		09AC0D63F19B6944E1045E60 /* Release */ = {
+			isa = XCBuildConfiguration;
+			buildSettings = {
+				ALWAYS_SEARCH_USER_PATHS = NO;
+				CLANG_ANALYZER_NONNULL = YES;
+				CLANG_CXX_LANGUAGE_STANDARD = "gnu++0x";
+				CLANG_CXX_LIBRARY = "libc++";
+				CLANG_ENABLE_MODULES = YES;
+				CLANG_ENABLE_OBJC_ARC = YES;
+				CLANG_WARN_BOOL_CONVERSION = YES;
+				CLANG_WARN_CONSTANT_CONVERSION = YES;
+				CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES;
+				CLANG_WARN_EMPTY_BODY = YES;
+				CLANG_WARN_ENUM_CONVERSION = YES;
+				CLANG_WARN_INT_CONVERSION = YES;
+				CLANG_WARN_OBJC_ROOT_CLASS = YES;
+				CLANG_WARN_UNREACHABLE_CODE = YES;
+				CLANG_WARN__DUPLICATE_METHOD_MATCH = YES;
+				COPY_PHASE_STRIP = YES;
+				ENABLE_NS_ASSERTIONS = NO;
+				GCC_C_LANGUAGE_STANDARD = gnu99;
+				GCC_WARN_64_TO_32_BIT_CONVERSION = YES;
+				GCC_WARN_ABOUT_RETURN_TYPE = YES;
+				GCC_WARN_UNDECLARED_SELECTOR = YES;
+				GCC_WARN_UNINITIALIZED_AUTOS = YES;
+				GCC_WARN_UNUSED_FUNCTION = YES;
+				GCC_WARN_UNUSED_VARIABLE = YES;
+				VALIDATE_PRODUCT = YES;
+			};
+			name = Release;
+		};
+		4D494CA5F82DCCAB3194BA09 /* Debug */ = {
+			isa = XCBuildConfiguration;
+			buildSettings = {
+				ALWAYS_SEARCH_USER_PATHS = NO;
+				CLANG_ANALYZER_NONNULL = YES;
+				CLANG_CXX_LANGUAGE_STANDARD = "gnu++0x";
+				CLANG_CXX_LIBRARY = "libc++";
+				CLANG_ENABLE_MODULES = YES;
+				CLANG_ENABLE_OBJC_ARC = YES;
+				CLANG_WARN_BOOL_CONVERSION = YES;
+				CLANG_WARN_CONSTANT_CONVERSION = YES;
+				CLANG_WARN_DIRECT_OBJC_ISA_USAGE = YES;
+				CLANG_WARN_EMPTY_BODY = YES;
+				CLANG_WARN_ENUM_CONVERSION = YES;
+				CLANG_WARN_INT_CONVERSION = YES;
+				CLANG_WARN_OBJC_ROOT_CLASS = YES;
+				CLANG_WARN_UNREACHABLE_CODE = YES;
+				CLANG_WARN__DUPLICATE_METHOD_MATCH = YES;
+				COPY_PHASE_STRIP = NO;
+				ENABLE_TESTABILITY = YES;
+				GCC_C_LANGUAGE_STANDARD = gnu99;
+				GCC_DYNAMIC_NO_PIC = NO;
+				GCC_OPTIMIZATION_LEVEL = 0;
+				GCC_PREPROCESSOR_DEFINITIONS = (
+					"DEBUG=1",
+					"$(inherited)",
+				);
+				GCC_SYMBOLS_PRIVATE_EXTERN = NO;
+				GCC_WARN_64_TO_32_BIT_CONVERSION = YES;
+				GCC_WARN_ABOUT_RETURN_TYPE = YES;
+				GCC_WARN_UNDECLARED_SELECTOR = YES;
+				GCC_WARN_UNINITIALIZED_AUTOS = YES;
+				GCC_WARN_UNUSED_FUNCTION = YES;
+				GCC_WARN_UNUSED_VARIABLE = YES;
+				ONLY_ACTIVE_ARCH = YES;
+			};
+			name = Debug;
+		};
+/* End XCBuildConfiguration section */
+/* Begin XCConfigurationList section */
+		442CE273DD7DF2DFDC620C8B /* Build configuration list for PBXProject "foo" */ = {
+			isa = XCConfigurationList;
+			buildConfigurations = (
+				4D494CA5F82DCCAB3194BA09 /* Debug */,
+				09AC0D63F19B6944E1045E60 /* Release */,
+			);
+			defaultConfigurationIsVisible = 0;
+			defaultConfigurationName = Release;
+		};
+/* End XCConfigurationList section */
+	};
+	rootObject = B3A67937542EC2041CBF1CA2 /* Project object */;
+}

data/lib/rouge/demos/pony ADDED Viewed

@@ -0,0 +1,17 @@
+use "ponytest"
+actor Main is TestList
+  new create(env: Env) => PonyTest(env, this)
+  new make() => None
+  fun tag tests(test: PonyTest) =>
+    test(_TestAddition)
+class iso _TestAddition is UnitTest
+  """
+  Adding 2 numbers
+  """
+  fun name(): String => "u32/add"
+  fun apply(h: TestHelper): TestResult =>
+    h.expect_eq[U32](2 + 2, 4)

data/lib/rouge/demos/powershell ADDED Viewed

@@ -0,0 +1,49 @@
+Function Get-IPv4Scopes
+<#
+	.SYNOPSIS
+		Read IPv4Scopes from an array of servers
+	.PARAMETER Servers
+		Specifies an array of servers
+	.EXAMPLE
+		Get-IPv4Scopes
+		Will prompt for all inputs
+#>
+{
+    [CmdletBinding()]
+    Param(
+    # 1
+    [parameter(
+        Mandatory=$true,
+        Position=0,
+        ValueFromPipelineByPropertyName=$true,
+        HelpMessage="Server List"
+        )]
+    [string[]]$Servers,
+    #2
+    [parameter(Mandatory=$false,ValueFromPipeline=$false)]
+    [bool]$Unique=$false
+    )  #EndParam
+    Begin {}
+    Process {
+        $arrayJobs=@()
+        foreach ($server in $Servers) {
+            $arrayJobs+=Invoke-Command -ComputerName $server -scriptblock {Get-DhcpServerv4Scope}  -AsJob
+        }
+        $complete=$false
+        while (-not $complete) {
+            $arrayJobsInProgress= $arrayJobs | Where-Object { $_.State -match 'running' }
+            if (-not $arrayJobsInProgress) { $complete=$true }
+        }
+        $Scopes=$arrayJobs|Receive-Job
+        $UniqueScopes=$Scopes|Sort-Object -Property ScopeId -Unique
+    }
+    End {
+        if ($Unique) { return $UniqueScopes }
+        else { return $Scopes }
+    }
+} #end function

data/lib/rouge/demos/praat ADDED Viewed

@@ -0,0 +1,26 @@
+form Copy selected files...
+  word Prefix
+  word Suffix _copy
+  boolean Keep_original 1
+endform
+total_objects = numberOfSelected()
+for i to total_objects
+  my_object[i] = selected(i)
+endfor
+for i to total_objects
+  selectObject: my_object[i]
+  @copy()
+  new[i] = selected()
+endfor
+if total_objects
+  selectObject: new[1]
+  for i from 2 to total_objects
+    plusObject: new[i]
+  endfor
+endif
+procedure copy ()
+  .name$ = extractWord$(selected$(), " ")
+  Copy: prefix$ + .name$ + suffix$
+endproc