mortar-pygments.rb 0.5.5

data/vendor/pygments-main/tests/examplefiles/moin_SyntaxReference.txt

@@ -0,0 +1,340 @@
+## Please edit system and help pages ONLY in the moinmaster wiki! For more
+## information, please see MoinMaster:MoinPagesEditorGroup.
+##master-page:Unknown-Page
+##master-date:Unknown-Date
+#acl MoinPagesEditorGroup:read,write,delete,revert All:read
+#format wiki
+#language en
+
+This page aims to introduce the most important elements of MoinMoin``'s syntax at a glance, showing first the markup verbatim and then how it is rendered by the wiki engine. Additionally, you'll find links to the relative help pages. Please note that some of the features depend on your configuration.
+
+= Table of Contents =
+{{{
+'''Contents''' (up to the 2nd level)
+[[TableOfContents(2)]]
+}}}
+'''Contents''' (up to the 2nd level)
+[[TableOfContents(2)]]
+
+= Headings =
+'''''see:''' HelpOnHeadlines''
+{{{
+= heading 1st level =
+== heading 2nd level ==
+=== heading 3rd level ===
+==== heading 4th level ====
+===== heading 5th level =====
+}}}
+= heading 1st level =
+== heading 2nd level ==
+=== heading 3rd level ===
+==== heading 4th level ====
+===== heading 5th level =====
+
+= Text Formatting =
+'''''see:''' HelpOnFormatting''
+{{{
+ * ''emphasized (italics)''
+ * '''boldface'''
+ * '''''bold italics'''''
+ * `monospace`
+ * {{{source code}}}
+ * __underline__
+ * ,,sub,,script
+ * ^super^script
+ * ~-smaller-~
+ * ~+larger+~
+ * --(strike through)--
+}}}
+ * ''emphasized (italics)''
+ * '''boldface'''
+ * '''''bold italics'''''
+ * `monospace`
+ * {{{source code}}}
+ * __underline__
+ * ,,sub,,script
+ * ^super^script
+ * ~-smaller-~
+ * ~+larger+~
+ * --(strike through)--
+
+= Hyperlinks =
+'''''see:''' HelpOnLinking''
+== Internal Links ==
+{{{
+ * FrontPage
+ * ["FrontPage"]
+ * HelpOnEditing/SubPages
+ * /SubPage
+ * ../SiblingPage
+ * [:FrontPage:named link]
+ * [#anchorname]
+ * [#anchorname description]
+ * [wiki:Self:PageName#anchorname]
+ * [wiki:Self:PageName#anchorname description]
+ * attachment:filename.txt
+}}}
+ * FrontPage
+ * ["FrontPage"]
+ * HelpOnEditing/SubPages
+ * /SubPage
+ * ../SiblingPage
+ * [:FrontPage:named link]
+ * [#anchorname]
+ * [#anchorname description]
+ * [wiki:Self:PageName#anchorname]
+ * [wiki:Self:PageName#anchorname description]
+ * attachment:filename.txt
+
+== External Links ==
+{{{
+ * http://moinmoin.wikiwikiweb.de/
+ * [http://moinmoin.wikiwikiweb.de/]
+ * [http://moinmoin.wikiwikiweb.de/ MoinMoin Wiki]
+ * [http://moinmoin.wikiwikiweb.de/wiki/moinmoin.png]
+ * http://moinmoin.wikiwikiweb.de/wiki/moinmoin.png
+ * [http://moinmoin.wikiwikiweb.de/wiki/moinmoin.png moinmoin.png]
+ * MeatBall:InterWiki
+ * wiki:MeatBall/InterWiki
+ * [wiki:MeatBall/InterWiki]
+ * [wiki:MeatBall/InterWiki InterWiki page on MeatBall]
+ * [file://///servername/share/full/path/to/file/filename%20with%20spaces.txt link to file filename with spaces.txt]
+ * user@example.com
+}}}
+ * http://moinmoin.wikiwikiweb.de/
+ * [http://moinmoin.wikiwikiweb.de/]
+ * [http://moinmoin.wikiwikiweb.de/ MoinMoin Wiki]
+ * [http://moinmoin.wikiwikiweb.de/wiki/moinmoin.png]
+ * http://moinmoin.wikiwikiweb.de/wiki/moinmoin.png
+ * [http://moinmoin.wikiwikiweb.de/wiki/moinmoin.png moinmoin.png]
+ * MeatBall:InterWiki
+ * wiki:MeatBall/InterWiki
+ * [wiki:MeatBall/InterWiki]
+ * [wiki:MeatBall/InterWiki InterWiki page on MeatBall]
+ * [file://///servername/share/full/path/to/file/filename%20with%20spaces.txt link to file filename with spaces.txt]
+ * user@example.com
+
+== Avoid or Limit Automatical Linking ==
+{{{
+ * Wiki''''''Name
+ * Wiki``Name
+ * !WikiName
+ * WikiName''''''s
+ * WikiName``s
+ * `http://www.example.com`
+}}}
+ * Wiki''''''Name
+ * Wiki``Name
+ * !WikiName
+ * WikiName''''''s
+ * WikiName``s
+ * `http://www.example.com`
+
+= Blockquotes and Indentions =
+{{{
+ indented text
+  text indented to the 2nd level
+}}}
+ indented text
+  text indented to the 2nd level
+
+= Lists =
+'''''see:''' HelpOnLists''
+== Unordered Lists ==
+{{{
+ * item 1
+
+ * item 2 (preceding white space)
+  * item 2.1
+   * item 2.1.1
+ * item 3
+  . item 3.1 (bulletless)
+ . item 4 (bulletless)
+  * item 4.1
+   . item 4.1.1 (bulletless)
+}}}
+ * item 1
+
+ * item 2 (preceding white space)
+  * item 2.1
+   * item 2.1.1
+ * item 3
+  . item 3.1 (bulletless)
+ . item 4 (bulletless)
+  * item 4.1
+   . item 4.1.1 (bulletless)
+
+== Ordered Lists ==
+=== with Numbers ===
+{{{
+ 1. item 1
+   1. item 1.1
+   1. item 1.2
+ 1. item 2
+}}}
+ 1. item 1
+   1. item 1.1
+   1. item 1.2
+ 1. item 2
+
+=== with Roman Numbers ===
+{{{
+ I. item 1
+   i. item 1.1
+   i. item 1.2
+ I. item 2
+}}}
+ I. item 1
+   i. item 1.1
+   i. item 1.2
+ I. item 2
+
+=== with Letters ===
+{{{
+ A. item A
+   a. item A. a)
+   a. item A. b)
+ A. item B
+}}}
+ A. item A
+   a. item A. a)
+   a. item A. b)
+ A. item B
+
+== Definition Lists ==
+{{{
+ term:: definition
+ object:: description 1
+ :: description 2
+ Action Items::
+ :: First Item
+ :: Second Item
+}}}
+ term:: definition
+ object:: description 1
+ :: description 2
+ Action Items::
+ :: First Item
+ :: Second Item
+
+= Horizontal Rules =
+'''''see:''' HelpOnRules''
+{{{
+----
+-----
+------
+-------
+--------
+---------
+----------
+}}}
+----
+-----
+------
+-------
+--------
+---------
+----------
+
+= Tables =
+'''''see:''' HelpOnTables''
+== Tables ==
+{{{
+||'''A'''||'''B'''||'''C'''||
+||1      ||2      ||3      ||
+}}}
+||'''A'''||'''B'''||'''C'''||
+||1      ||2      ||3      ||
+
+== Cell Width ==
+{{{
+||minimal width ||<99%>maximal width ||
+}}}
+||minimal width ||<99%>maximal width ||
+
+== Spanning Rows and Columns  ==
+{{{
+||<|2> cell spanning 2 rows ||cell in the 2nd column ||
+||cell in the 2nd column of the 2nd row ||
+||<-2> cell spanning 2 columns ||
+||||use empty cells as a shorthand ||
+}}}
+||<|2> cell spanning 2 rows ||cell in the 2nd column ||
+||cell in the 2nd column of the 2nd row ||
+||<-2> cell spanning 2 columns ||
+||||use empty cells as a shorthand ||
+
+== Alignment of Cell Contents ==
+{{{
+||<^|3> top (combined) ||<:99%> center (combined) ||<v|3> bottom (combined) ||
+||<)> right ||
+||<(> left ||
+}}}
+||<^|3> top (combined) ||<:99%> center (combined) ||<v|3> bottom (combined) ||
+||<)> right ||
+||<(> left ||
+
+== Coulored Table Cells ==
+{{{
+||<#0000FF> blue ||<#00FF00> green    ||<#FF0000> red    ||
+||<#00FFFF> cyan ||<#FF00FF> magenta  ||<#FFFF00> yellow ||
+}}}
+||<#0000FF> blue ||<#00FF00> green    ||<#FF0000> red    ||
+||<#00FFFF> cyan ||<#FF00FF> magenta  ||<#FFFF00> yellow ||
+
+== HTML-like Options for Tables ==
+{{{
+||A ||<rowspan="2"> like <|2> ||
+||<bgcolor="#00FF00"> like <#00FF00> ||
+||<colspan="2"> like <-2>||
+}}}
+||A ||<rowspan="2"> like <|2> ||
+||<bgcolor="#00FF00"> like <#00FF00> ||
+||<colspan="2"> like <-2>||
+
+= Macros and Variables =
+== Macros ==
+'''''see:''' HelpOnMacros''
+ * `[[Anchor(anchorname)]]` inserts a link anchor `anchorname`
+ * `[[BR]]` inserts a hard line break
+ * `[[FootNote(Note)]]` inserts a footnote saying `Note`
+ * `[[Include(HelpOnMacros/Include)]]` inserts the contents of the page `HelpOnMacros/Include` inline
+ * `[[MailTo(user AT example DOT com)]]` obfuscates the email address `user@example.com` to users not logged in
+
+== Variables ==
+'''''see:''' HelpOnVariables''
+ * `@``SIG``@` inserts your login name and timestamp of modification
+ * `@``TIME``@` inserts date and time of modification
+
+= Smileys and Icons =
+'''''see:''' HelpOnSmileys''
+[[ShowSmileys]]
+
+= Source code =
+'''''see:''' HelpOnParsers''
+== Verbatim Display ==
+{{{
+{ { {
+def hello():
+    print "Hello World!"
+} } }
+}}}
+/!\ Remove spaces between "`{ { {`" and "`} } }`".
+{{{
+def hello():
+    print "Hello World!"
+}}}
+
+== Syntax Highlighting ==
+{{{
+{ { {#!python
+def hello():
+    print "Hello World!"
+} } }
+}}}
+/!\ Remove spaces between "`{ { {`" and "`} } }`".
+{{{#!python
+def hello():
+    print "Hello World!"
+}}}
+

data/vendor/pygments-main/tests/examplefiles/multiline_regexes.rb

@@ -0,0 +1,38 @@
+/
+this is a
+multiline
+regex
+/
+
+this /is a
+multiline regex too/
+
+foo = /is also
+one/
+
+also /4
+is one/
+
+this(/
+too
+/)
+
+# this not
+2 /4
+asfsadf/
+
+# this is also not one
+0x4d /25
+foo/
+
+42 and /this
+is also a multiline
+regex/
+
+
+# And here some special string cases
+foo = % blah            # comment here to ensure whitespace
+foo(% blah )
+foo << % blah           # stupid but has to work
+foo = % blah + % blub   # wicked
+foo = %q wicked         # works too

data/vendor/pygments-main/tests/examplefiles/nanomsg.intr

@@ -0,0 +1,95 @@
+module: nanomsg
+synopsis: generated bindings for the nanomsg library
+author: Bruce Mitchener, Jr.
+copyright: See LICENSE file in this distribution.
+
+define simple-C-mapped-subtype <C-buffer-offset> (<C-char*>)
+  export-map <machine-word>, export-function: identity;
+end;
+
+define interface
+  #include {
+      "sp/sp.h",
+      "sp/fanin.h",
+      "sp/inproc.h",
+      "sp/pair.h",
+      "sp/reqrep.h",
+      "sp/survey.h",
+      "sp/fanout.h",
+      "sp/ipc.h",
+      "sp/pubsub.h",
+      "sp/tcp.h"
+    },
+
+    exclude: {
+      "SP_HAUSNUMERO",
+      "SP_PAIR_ID",
+      "SP_PUBSUB_ID",
+      "SP_REQREP_ID",
+      "SP_FANIN_ID",
+      "SP_FANOUT_ID",
+      "SP_SURVEY_ID"
+    },
+
+    equate: {"char *" => <c-string>},
+
+    rename: {
+      "sp_recv" => %sp-recv,
+      "sp_send" => %sp-send,
+      "sp_setsockopt" => %sp-setsockopt
+    };
+
+    function "sp_version",
+      output-argument: 1,
+      output-argument: 2,
+      output-argument: 3;
+
+    function "sp_send",
+      map-argument: { 2 => <C-buffer-offset> };
+
+    function "sp_recv",
+      map-argument: { 2 => <C-buffer-offset> };
+
+end interface;
+
+// Function for adding the base address of the repeated slots of a <buffer>
+// to an offset and returning the result as a <machine-word>.  This is
+// necessary for passing <buffer> contents across the FFI.
+
+define function buffer-offset
+    (the-buffer :: <buffer>, data-offset :: <integer>)
+ => (result-offset :: <machine-word>)
+  u%+(data-offset,
+      primitive-wrap-machine-word
+        (primitive-repeated-slot-as-raw
+           (the-buffer, primitive-repeated-slot-offset(the-buffer))))
+end function;
+
+define inline function sp-send (socket :: <integer>, data :: <buffer>, flags :: <integer>) => (res :: <integer>)
+  %sp-send(socket, buffer-offset(data, 0), data.size, flags)
+end;
+
+define inline function sp-recv (socket :: <integer>, data :: <buffer>, flags :: <integer>) => (res :: <integer>)
+  %sp-recv(socket, buffer-offset(data, 0), data.size, flags);
+end;
+
+define inline method sp-setsockopt (socket :: <integer>, level :: <integer>, option :: <integer>, value :: <integer>)
+  with-stack-structure (int :: <C-int*>)
+    pointer-value(int) := value;
+    let setsockopt-result =
+      %sp-setsockopt(socket, level, option, int, size-of(<C-int*>));
+    if (setsockopt-result < 0)
+      // Check error!
+    end;
+    setsockopt-result
+  end;
+end;
+
+define inline method sp-setsockopt (socket :: <integer>, level :: <integer>, option :: <integer>, data :: <byte-string>)
+  let setsockopt-result =
+    %sp-setsockopt(socket, level, option, as(<c-string>, data), data.size);
+  if (setsockopt-result < 0)
+    // Check error!
+  end;
+  setsockopt-result
+end;

data/vendor/pygments-main/tests/examplefiles/nasm_aoutso.asm

@@ -0,0 +1,96 @@
+; test source file for assembling to NetBSD/FreeBSD a.out shared library
+; build with:
+;    nasm -f aoutb aoutso.asm
+;    ld -Bshareable -o aoutso.so aoutso.o
+; test with:
+;    cc -o aoutso aouttest.c aoutso.so
+;    ./aoutso
+
+; This file should test the following:
+; [1] Define and export a global text-section symbol
+; [2] Define and export a global data-section symbol
+; [3] Define and export a global BSS-section symbol
+; [4] Define a non-global text-section symbol
+; [5] Define a non-global data-section symbol
+; [6] Define a non-global BSS-section symbol
+; [7] Define a COMMON symbol
+; [8] Define a NASM local label
+; [9] Reference a NASM local label
+; [10] Import an external symbol
+; [11] Make a PC-relative call to an external symbol
+; [12] Reference a text-section symbol in the text section
+; [13] Reference a data-section symbol in the text section
+; [14] Reference a BSS-section symbol in the text section
+; [15] Reference a text-section symbol in the data section
+; [16] Reference a data-section symbol in the data section
+; [17] Reference a BSS-section symbol in the data section
+
+	  BITS 32
+	  EXTERN __GLOBAL_OFFSET_TABLE_
+	  GLOBAL _lrotate:function ; [1]
+	  GLOBAL _greet:function ; [1]
+	  GLOBAL _asmstr:data _asmstr.end-_asmstr ; [2]
+	  GLOBAL _textptr:data 4 ; [2]
+	  GLOBAL _selfptr:data 4 ; [2]
+	  GLOBAL _integer:data 4 ; [3]
+	  EXTERN _printf	; [10]
+	  COMMON _commvar 4	; [7]
+
+	  SECTION .text
+
+; prototype: long lrotate(long x, int num);
+_lrotate:			; [1]
+	  push ebp
+	  mov ebp,esp
+	  mov eax,[ebp+8]
+	  mov ecx,[ebp+12]
+.label	  rol eax,1		; [4] [8]
+	  loop .label		; [9] [12]
+	  mov esp,ebp
+	  pop ebp
+	  ret
+
+; prototype: void greet(void);
+_greet	  push ebx		; we'll use EBX for GOT, so save it
+	  call .getgot
+.getgot:  pop ebx
+	  add ebx,__GLOBAL_OFFSET_TABLE_ + $$ - .getgot wrt ..gotpc
+	  mov eax,[ebx+_integer wrt ..got] ; [14]
+	  mov eax,[eax]
+	  inc eax
+	  mov [ebx+localint wrt ..gotoff],eax ; [14]
+	  mov eax,[ebx+_commvar wrt ..got]
+	  push dword [eax]
+	  mov eax,[ebx+localptr wrt ..gotoff] ; [13]
+	  push dword [eax]
+	  mov eax,[ebx+_integer wrt ..got] ; [1] [14]
+	  push dword [eax]
+	  lea eax,[ebx+_printfstr wrt ..gotoff]
+	  push eax		; [13]
+	  call _printf wrt ..plt ; [11]
+	  add esp,16
+	  pop ebx
+	  ret
+
+	  SECTION .data
+
+; a string
+_asmstr	  db 'hello, world', 0	; [2]
+.end
+
+; a string for Printf
+_printfstr db "integer==%d, localint==%d, commvar=%d"
+	  db 10, 0
+
+; some pointers
+localptr  dd localint		; [5] [17]
+_textptr  dd _greet wrt ..sym	; [15]
+_selfptr  dd _selfptr wrt ..sym	; [16]
+
+	  SECTION .bss
+
+; an integer
+_integer  resd 1		; [3]
+
+; a local integer
+localint  resd 1		; [6]

data/vendor/pygments-main/tests/examplefiles/nasm_objexe.asm

@@ -0,0 +1,30 @@
+; Demonstration of how to write an entire .EXE format program as a .OBJ
+; file to be linked. Tested with the VAL free linker.
+; To build:
+;    nasm -fobj objexe.asm
+;    val objexe.obj,objexe.exe;
+; To test:
+;    objexe
+; (should print `hello, world')
+	  
+	  segment code
+
+..start:  mov ax,data
+	  mov ds,ax
+	  mov ax,stack
+	  mov ss,ax
+	  mov sp,stacktop
+
+	  mov dx,hello
+	  mov ah,9
+	  int 0x21
+
+	  mov ax,0x4c00
+	  int 0x21
+
+	  segment data
+hello:	  db 'hello, world', 13, 10, '$'
+
+	  segment stack stack
+	  resb 64
+stacktop:

data/vendor/pygments-main/tests/examplefiles/nemerle_sample.n

@@ -0,0 +1,87 @@
+using System;
+
+namespace Demo.Ns
+{
+  /// sample class
+  public class ClassSample : Base
+  {
+    /* sample multiline comment */
+#region region sample
+    fieldSample : int;
+#endregion
+
+    public virtual someMethod(str : string) : list[double]
+    {
+      def x = "simple string";
+      def x = $"simple $splice string $(spliceMethod() + 1)";
+      def x = <#
+        recursive <# string #> sample
+      #>;
+      def x = $<#
+        recursive $splice <# string #> sample
+        ..$(lst; "; "; x => $"x * 2 = $(x * 2)") str
+      #>;
+      def x = @"somestring \";
+
+      def localFunc(arg)
+      {
+         arg + 1;
+      }
+
+      match (localFunc(2))
+      {
+        | 3 => "ok";
+        | _ => "fail";
+      }
+
+      using (x = SomeObject())
+      {
+        foreach (item in someCollection)
+        {
+          def i = try
+          {
+            int.Parse(item)
+          }
+          catch
+          {
+            | _ is FormatException => 0;
+          }
+          when (i > 0xff)
+            unless (i < 555L)
+              WriteLine(i);
+          
+        }
+      }
+      protected override overrideSample() : void
+      {}
+
+      private privateSample() : void
+      {}
+
+      public abstract abstractSample() : void
+      {}
+    }
+
+  }
+
+  module ModuleSample
+  {
+  }
+
+  variant RgbColor {
+   | Red
+   | Yellow
+   | Green
+   | Different {
+       red : float;
+       green : float;
+       blue : float;
+     }
+  }
+
+  macro sampleMacro(expr)
+  syntax ("write", expr)
+  {
+    <[ WriteLine($(expr : dyn)) ]>
+  }
+}