rouge 3.18.0

data/lib/rouge/demos/ruby

@@ -0,0 +1,9 @@
+class Greeter
+  def initialize(name="World")
+    @name = name
+  end
+
+  def say_hi
+    puts "Hi #{@name}!"
+  end
+end

data/lib/rouge/demos/rust

@@ -0,0 +1,12 @@
+use core::*;
+
+fn main() {
+    for ["Alice", "Bob", "Carol"].each |&name| {
+        do task::spawn {
+            let v = rand::Rng().shuffle([1, 2, 3]);
+            for v.each |&num| {
+                io::print(fmt!("%s says: '%d'\n", name, num))
+            }
+        }
+    }
+}

data/lib/rouge/demos/sas

@@ -0,0 +1,13 @@
+data sim;
+    do i = 1 to 100;
+        x1 = rand("Normal");
+        x2 = rand("Binomial", 0.5, 100);
+        output;
+    end;
+run;
+
+proc means data=sashelp.class;
+    class sex;
+    var height weight;
+    output out = mean_by_sex;
+run;

data/lib/rouge/demos/sass

@@ -0,0 +1,3 @@
+@for $i from 1 through 3
+  .item-#{$i}
+    width: 2em * $i

data/lib/rouge/demos/scala

@@ -0,0 +1,3 @@
+class Greeter(name: String = "World") {
+  def sayHi() { println("Hi " + name + "!") }
+}

data/lib/rouge/demos/scheme

@@ -0,0 +1,4 @@
+(define Y
+  (lambda (m)
+    ((lambda (f) (m (lambda (a) ((f f) a))))
+     (lambda (f) (m (lambda (a) ((f f) a)))))))

data/lib/rouge/demos/scss

@@ -0,0 +1,5 @@
+@for $i from 1 through 3 {
+  .item-#{$i} {
+    width: 2em * $i;
+  }
+}

data/lib/rouge/demos/sed

@@ -0,0 +1,4 @@
+/begin/,/end/ {
+  /begin/n # skip over the line that has "begin" on it
+  s/old/new/
+}

data/lib/rouge/demos/shell

@@ -0,0 +1,2 @@
+# If not running interactively, don't do anything
+[[ -z "$PS1" ]] && return

data/lib/rouge/demos/sieve

@@ -0,0 +1,10 @@
+require "fileinto";
+require "imap4flags";
+
+if header :is "X-Spam" "Yes" {
+    fileinto "Junk";
+    setflag "\\seen";
+    stop;
+}
+
+/* Other messages get filed into Inbox or to user's scripts */

data/lib/rouge/demos/slice

@@ -0,0 +1,10 @@
+// Printer.ice
+module Demo
+{
+    interface Printer
+    {
+        // A client can invoke this operation on a server.
+        // In this example we print the string s
+        void printString(string s);
+    }
+}

data/lib/rouge/demos/slim

@@ -0,0 +1,17 @@
+doctype html
+html
+  body
+    h1 Markup examples   
+    #content
+      p 
+      | Slim can have #{ruby_code} interpolated!
+      /[if IE]
+        javascript:
+          alert('Slim supports embedded javascript!')
+
+      - unless items.empty?
+        table
+          - for item in items do
+            tr
+              td.name = item.name
+              td.price = item.price

data/lib/rouge/demos/smalltalk

@@ -0,0 +1,6 @@
+quadMultiply: i1 and: i2 
+    "This method multiplies the given numbers by each other
+    and the result by 4."
+    | mul |
+    mul := i1 * i2.
+    ^mul * 4

data/lib/rouge/demos/smarty

@@ -0,0 +1,12 @@
+{foo bar='single quotes' baz="double quotes" test3=$test3}
+
+<ul>
+  {foreach from=$myvariable item=data}
+    <li>{$data.field}</li>
+  {foreachelse}
+    <li>No Data</li>
+  {/foreach}
+</ul>
+
+<div class="{if $foo}class1{else}class2{/if}">{$foo.bar.baz}</div>
+

data/lib/rouge/demos/sml

@@ -0,0 +1,4 @@
+datatype shape
+   = Circle   of loc * real      (* center and radius *)
+   | Square   of loc * real      (* upper-left corner and side length; axis-aligned *)
+   | Triangle of loc * loc * loc (* corners *)

data/lib/rouge/demos/solidity

@@ -0,0 +1,13 @@
+pragma solidity ~0.4.15;
+
+interface IMirror {
+    function reflect() external payable returns(bool /* ain't I pretty?.. */);
+}
+
+contract Mirror is IMirror {
+    event logMessage(address indexed sender, uint256 value, uint256 gas, bytes data);
+
+    function () { // no funny stuff
+       revert();
+    }
+}

data/lib/rouge/demos/sparql

@@ -0,0 +1,6 @@
+SELECT ?item ?itemLabel
+WHERE
+{
+  ?item wdt:P31 wd:Q146.
+  SERVICE wikibase:label { bd:serviceParam wikibase:language "[AUTO_LANGUAGE],en". }
+}

data/lib/rouge/demos/sqf

@@ -0,0 +1,14 @@
+// Creates a dot marker at the given position
+#include "script_component.hpp"
+params ["_pos", "_txt"];
+
+if (isNil QGVAR(markerID)) then {
+    GVAR(markerID) = 0;
+};
+
+_markerstr = createMarker [QGVAR(marker) + str GVAR(markerID), _pos];
+_markerstr setMarkerShape "ICON";
+_markerstr setMarkerType "hd_dot";
+_markerstr setMarkerText _txt;
+
+GVAR(markerID) = GVAR(markerID) + 1;

data/lib/rouge/demos/sql

@@ -0,0 +1 @@
+SELECT * FROM `users` WHERE `user`.`id` = 1

data/lib/rouge/demos/supercollider

@@ -0,0 +1,11 @@
+// modulate a sine frequency and a noise amplitude with another sine
+// whose frequency depends on the horizontal mouse pointer position
+~myFunction = {
+        var x = SinOsc.ar(MouseX.kr(1, 100));
+        SinOsc.ar(300 * x + 800, 0, 0.1)
+        +
+        PinkNoise.ar(0.1 * x + 0.1)
+};
+
+~myFunction.play;
+"that's all, folks!".postln;

data/lib/rouge/demos/swift

@@ -0,0 +1,5 @@
+// Say hello to poeple
+func sayHello(personName: String) -> String {
+    let greeting = "Hello, " + personName + "!"
+    return greeting
+}

data/lib/rouge/demos/tap

@@ -0,0 +1,5 @@
+ok 1 - Input file opened
+not ok 2 - First line of the input valid
+ok 3 - Read the rest of the file
+not ok 4 - Summarized correctly # TODO Not written yet
+1..4

data/lib/rouge/demos/tcl

@@ -0,0 +1 @@
+proc cross_sum {s} {expr [join [split $s ""] +]}

data/lib/rouge/demos/terraform

@@ -0,0 +1,16 @@
+resource "aws_elb" "web" {
+  name = "terraform-example-elb"
+
+  # The same availability zone as our instances
+  availability_zones = ["${aws_instance.web.*.availability_zone}"]
+
+  listener {
+    instance_port     = 80
+    instance_protocol = "http"
+    lb_port           = 80
+    lb_protocol       = "http"
+  }
+
+  # The instances are registered automatically
+  instances = ["${aws_instance.web.*.id}"]
+}

data/lib/rouge/demos/tex

@@ -0,0 +1 @@
+To write \LaTeX\ you would type \verb:\LaTeX:.

data/lib/rouge/demos/toml

@@ -0,0 +1,9 @@
+# This is a TOML document. Boom.
+
+title = "TOML Example"
+
+[owner]
+name = "Tom Preston-Werner"
+organization = "GitHub"
+bio = "GitHub Cofounder & CEO\nLikes tater tots and beer."
+dob = 1979-05-27T07:32:00Z # First class dates? Why not?

data/lib/rouge/demos/tsx

@@ -0,0 +1,17 @@
+class HelloWorld extends React.Component<{date: Date}, void> {
+  render() {
+    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/ttcn3

@@ -0,0 +1,6 @@
+module DNSTester {
+  type integer Identification( 0..65535 ); // 16-bit integer
+  type enumerated MessageKind {e_Question, e_Answer};
+  type charstring Question;
+  type charstring Answer;
+}

data/lib/rouge/demos/tulip

@@ -0,0 +1,13 @@
+@module ref
+
+ref value = Ref (spawn [ ! => loop value ])
+
+loop value = receive [
+  .set new-value => loop new-value
+  p, id, .get => { send p (id, value); loop value }
+]
+
+@object Ref pid [
+  set val = .set val > send pid
+  get! = .get > send-wait pid
+]

data/lib/rouge/demos/turtle

@@ -0,0 +1,26 @@
+@prefix xsd:          <http://www.w3.org/2001/XMLSchema#>
+@prefix dcat:         <http://www.w3.org/ns/dcat#> .
+@prefix dcterms:      <http://purl.org/dc/terms/> .
+@prefix foaf:         <http://xmlns.com/foaf/0.1/> .
+@base                 <http://base.of.relative.iris> .
+
+PREFIX  test:         <http://example.org>
+PrEfIx  insensitive:  <http://insensitive.example.org>
+
+GRAPH <https://trig.testing.graph> {
+    <https://example.org/resource/dataset> a dcat:Dataset ; 
+
+#-----Mandatory-----#
+
+    dcterms:title 'Test title'@cs, "Test title"@en ;
+    dcterms:description """Multiline
+        string"""@cs, '''Another
+        multiline string '''@en ;
+
+#-----Recommended-----#
+    dcat:contactPoint [ a foaf:Person ] ;
+    test:list ( <http://ex.org> 1 1.1 +1 -1 1.2E+4 "Test" "\"Quote\"" ) ;
+    test:datatype "2016-07-20"^^xsd:date ;
+    test:text """next multiline""";
+    .
+}

data/lib/rouge/demos/twig

@@ -0,0 +1,9 @@
+{% include 'header.html' %}
+
+{% for user in users %}
+  * {{ user.name }}
+{% else %}
+  No users have been found.
+{% endfor %}
+
+{% include 'footer.html' %}

data/lib/rouge/demos/typescript

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

data/lib/rouge/demos/vala

@@ -0,0 +1,8 @@
+class Demo.HelloWorld : GLib.Object
+{
+    public static int main (String[] args)
+    {
+        stdout.printf("Hello World\n");
+        return 0;
+    }
+}

data/lib/rouge/demos/vb

@@ -0,0 +1,4 @@
+Private Sub Form_Load()
+    ' Execute a simple message box that says "Hello, World!"
+    MsgBox "Hello, World!"
+End Sub

data/lib/rouge/demos/vcl

@@ -0,0 +1,12 @@
+vcl 4.0;
+
+backend server1 {
+      .host = "server1.example.com";
+      .probe = {
+              .url = "/";
+              .timeout = 1s;
+              .interval = 5s;
+              .window = 5;
+              .threshold = 3;
+      }
+}

data/lib/rouge/demos/verilog

@@ -0,0 +1,27 @@
+/**
+ * Verilog Lexer
+ */
+module Foo(
+  input logic Clk_CI,
+  input logic Rst_RBI,
+  input logic A,
+  input logic B,
+  output logic C
+);
+  logic C_DN, C_DP;
+
+  assign C = C_DP;
+
+  always_comb begin : proc_next_state
+    C_DN = A + B;
+  end
+
+  // Clocked process
+  always_ff @(posedge Clk_CI, negedge Rst_RBI) begin
+    if(~Rst_RBI) begin
+      C_DP <= 1'b0;
+    end else begin
+      C_DP <= C_DN;
+    end
+  end
+endmodule

data/lib/rouge/demos/vhdl

@@ -0,0 +1,23 @@
+entity toggle_demo is
+	port (
+		clk_in : in  std_logic; -- System Clock
+		data_q : out std_logic	-- Toggling Port
+	);
+end entity toggle_demo;
+
+architecture RTL of toggle_demo is
+	signal data : std_logic := '0';
+begin
+
+	data_q <= data;
+
+	data_proc : process (clk_in)
+	begin
+	
+		if (rising_edge(clk_in)) then
+			data <= not data;
+		end if;
+	
+	end process; 
+
+end architecture RTL;

data/lib/rouge/demos/viml

@@ -0,0 +1,14 @@
+function! s:Make(dir, make, format, name) abort
+  let cd = exists('*haslocaldir') && haslocaldir() ? 'lcd' : 'cd'
+  let cwd = getcwd()
+  let [mp, efm, cc] = [&l:mp, &l:efm, get(b:, 'current_compiler', '')]
+  try
+    execute cd fnameescape(dir)
+    let [&l:mp, &l:efm, b:current_compiler] = [a:make, a:format, a:compiler]
+    execute (exists(':Make') == 2 ? 'Make' : 'make')
+  finally
+    let [&l:mp, &l:efm, b:current_compiler] = [mp, efm, cc]
+    if empty(cc) | unlet! b:current_compiler | endif
+    execute cd fnameescape(cwd)
+  endtry
+endfunction

data/lib/rouge/demos/vue

@@ -0,0 +1,11 @@
+<template>
+  <div id="app">
+    {{ message }}
+  </div>
+</template>
+
+<script lang=coffee>
+  app = new Vue
+    el: '#app'
+    data: { message: 'Hello Vue!' }
+</script>

data/lib/rouge/demos/wollok

@@ -0,0 +1,11 @@
+object pepita {
+    var energy = 100
+
+    method energy() = energy
+
+    method fly(kilometers) {
+        energy -= kilometers + 10
+    }
+
+    method sayHi() = "Coo!"
+}