pygments.rb 0.6.3 → 1.0.0

data/vendor/pygments-main/tests/examplefiles/unicode.applescript

@@ -1,5 +0,0 @@
-set jp to "日本語"
-
-set ru to "Русский"
-
-jp & " and " & ru -- returns "日本語 and Русский"

data/vendor/pygments-main/tests/examplefiles/unicode.go

@@ -1,10 +0,0 @@
-package main
-
-import "fmt"
-
-func main() {
-    世界 := "Hello, world!"
-    さようなら := "Goodbye, world!"
-    fmt.Println(世界)
-    fmt.Println(さようなら)
-}

data/vendor/pygments-main/tests/examplefiles/unicodedoc.py

@@ -1,11 +0,0 @@
-def foo():
-    ur"""unicode-raw"""
-
-def bar():
-    u"""unicode"""
-
-def baz():
-    r'raw'
-
-def zap():
-    """docstring"""

data/vendor/pygments-main/tests/examplefiles/unix-io.lid

@@ -1,37 +0,0 @@
-Library:       io
-Synopsis:      A portable IO library
-Author:        Gail Zacharias
-Files:	library
-	streams/defs
-	streams/stream
-	streams/sequence-stream
-        streams/native-buffer
-	streams/buffer
-	streams/typed-stream
-	streams/external-stream
-	streams/buffered-stream
-	streams/convenience
-	streams/wrapper-stream
-	streams/cleanup-streams
-        streams/native-speed
-        streams/async-writes
-        streams/file-stream
-        streams/multi-buffered-streams
-        pprint
-        print
-        print-double-integer-kludge
-	format
-	buffered-format
-	format-condition
-        unix-file-accessor
-	unix-standard-io
-	unix-interface
-	format-out
-C-Source-Files:	unix-portability.c
-Major-Version: 2
-Minor-Version: 1
-Target-Type:   dll
-Copyright:    Original Code is Copyright (c) 1995-2004 Functional Objects, Inc.
-              All rights reserved.
-License:      See License.txt in this distribution for details.
-Warranty:     Distributed WITHOUT WARRANTY OF ANY KIND

data/vendor/pygments-main/tests/examplefiles/vbnet_test.bas

@@ -1,29 +0,0 @@
-Public Class Form1
-    Inherits System.Windows.Forms.Form
-
-    Private t As New System.Timers.Timer(2000)
-
-    Private Sub Form1_Load(ByVal sender As Object, _
-          ByVal e As System.EventArgs) Handles MyBase.Load
-        
-        AddHandler t.Elapsed, AddressOf TimerFired
-    End Sub
-
-    Private Sub btnStart_Click(ByVal sender As System.Object, _ 
-          ByVal e As System.EventArgs) Handles btnStart.Click
-          
-        t.Enabled = True
-    End Sub
-
-    Private Sub btnStop_Click(ByVal sender As System.Object, _
-          ByVal e As System.EventArgs) Handles btnStop.Click
-          
-        t.Enabled = False
-    End Sub
-
-    Public Sub TimerFired(ByVal sender As Object, _ 
-           ByVal e As System.Timers.ElapsedEventArgs)
-           
-        Label1.Text = "Signal Time = " & e.SignalTime.ToString
-    End Sub
-End Class

data/vendor/pygments-main/tests/examplefiles/vctreestatus_hg

@@ -1,4 +0,0 @@
-M LICENSE
-M setup.py
-! setup.cfg
-? vctreestatus_hg

data/vendor/pygments-main/tests/examplefiles/vimrc

@@ -1,21 +0,0 @@
-" A comment
-
-:py print "py"
-::pyt print 'pyt'
-  pyth	print '''pyth'''
- : pytho print "pytho"
-python print """python"""
-
-  : : python<<E OF
-print """my script"""
-
-def MyFunc(str):
-  """ My Function """
-  print str
-E OF
-
-let py = 42
-echo py
-
-let foo = 42
-echo foo

data/vendor/pygments-main/tests/examplefiles/webkit-transition.css

@@ -1,3 +0,0 @@
-p {
-    -webkit-transition: opacity 1s linear;
-}

data/vendor/pygments-main/tests/examplefiles/while.pov

@@ -1,13 +0,0 @@
-#declare Index1 = 0;
-#while(Index1 <= 9)
-
-   #declare Index2 = 0;
-   #while(Index2 <= 19)
-
-      sphere { <Index1, Index2, 0>, .5 }
-
-      #declare Index2 = Index2 + 1;
-   #end
-
-   #declare Index1 = Index1 + 1;
-#end

data/vendor/pygments-main/tests/examplefiles/wiki.factor

@@ -1,384 +0,0 @@
-! Copyright (C) 2008 Slava Pestov
-! See http://factorcode.org/license.txt for BSD license.
-USING: accessors kernel hashtables calendar random assocs
-namespaces make splitting sequences sorting math.order present
-io.files io.directories io.encodings.ascii
-syndication farkup
-html.components html.forms
-http.server
-http.server.dispatchers
-furnace.actions
-furnace.utilities
-furnace.redirection
-furnace.auth
-furnace.auth.login
-furnace.boilerplate
-furnace.syndication
-validators
-db.types db.tuples lcs urls ;
-IN: webapps.wiki
-
-: wiki-url ( rest path -- url )
-    [ "$wiki/" % % "/" % present % ] "" make
-    <url> swap >>path ;
-
-: view-url ( title -- url ) "view" wiki-url ;
-
-: edit-url ( title -- url ) "edit" wiki-url ;
-
-: revisions-url ( title -- url ) "revisions" wiki-url ;
-
-: revision-url ( id -- url ) "revision" wiki-url ;
-
-: user-edits-url ( author -- url ) "user-edits" wiki-url ;
-
-TUPLE: wiki < dispatcher ;
-
-SYMBOL: can-delete-wiki-articles?
-
-can-delete-wiki-articles? define-capability
-
-TUPLE: article title revision ;
-
-article "ARTICLES" {
-    { "title" "TITLE" { VARCHAR 256 } +not-null+ +user-assigned-id+ }
-    { "revision" "REVISION" INTEGER +not-null+ } ! revision id
-} define-persistent
-
-: <article> ( title -- article ) article new swap >>title ;
-
-TUPLE: revision id title author date content description ;
-
-revision "REVISIONS" {
-    { "id" "ID" INTEGER +db-assigned-id+ }
-    { "title" "TITLE" { VARCHAR 256 } +not-null+ } ! article id
-    { "author" "AUTHOR" { VARCHAR 256 } +not-null+ } ! uid
-    { "date" "DATE" TIMESTAMP +not-null+ }
-    { "content" "CONTENT" TEXT +not-null+ }
-    { "description" "DESCRIPTION" TEXT }
-} define-persistent
-
-M: revision feed-entry-title
-    [ title>> ] [ drop " by " ] [ author>> ] tri 3append ;
-
-M: revision feed-entry-date date>> ;
-
-M: revision feed-entry-url id>> revision-url ;
-
-: reverse-chronological-order ( seq -- sorted )
-    [ date>> ] inv-sort-with ;
-
-: <revision> ( id -- revision )
-    revision new swap >>id ;
-
-: validate-title ( -- )
-    { { "title" [ v-one-line ] } } validate-params ;
-
-: validate-author ( -- )
-    { { "author" [ v-username ] } } validate-params ;
-
-: <article-boilerplate> ( responder -- responder' )
-    <boilerplate>
-        { wiki "page-common" } >>template ;
-
-: <main-article-action> ( -- action )
-    <action>
-        [ "Front Page" view-url <redirect> ] >>display ;
-
-: latest-revision ( title -- revision/f )
-    <article> select-tuple
-    dup [ revision>> <revision> select-tuple ] when ;
-
-: <view-article-action> ( -- action )
-    <action>
-
-        "title" >>rest
-
-        [ validate-title ] >>init
-
-        [
-            "title" value dup latest-revision [
-                from-object
-                { wiki "view" } <chloe-content>
-            ] [
-                edit-url <redirect>
-            ] ?if
-        ] >>display
-
-    <article-boilerplate> ;
-
-: <view-revision-action> ( -- action )
-    <page-action>
-
-        "id" >>rest
-
-        [
-            validate-integer-id
-            "id" value <revision>
-            select-tuple from-object
-        ] >>init
-
-        { wiki "view" } >>template
-    
-    <article-boilerplate> ;
-
-: <random-article-action> ( -- action )
-    <action>
-        [
-            article new select-tuples random
-            [ title>> ] [ "Front Page" ] if*
-            view-url <redirect>
-        ] >>display ;
-
-: amend-article ( revision article -- )
-    swap id>> >>revision update-tuple ;
-
-: add-article ( revision -- )
-    [ title>> ] [ id>> ] bi article boa insert-tuple ;
-
-: add-revision ( revision -- )
-    [ insert-tuple ]
-    [
-        dup title>> <article> select-tuple
-        [ amend-article ] [ add-article ] if*
-    ]
-    bi ;
-
-: <edit-article-action> ( -- action )
-    <page-action>
-
-        "title" >>rest
-
-        [
-            validate-title
-
-            "title" value <article> select-tuple
-            [ revision>> <revision> select-tuple ]
-            [ f <revision> "title" value >>title ]
-            if*
-
-            [ title>> "title" set-value ]
-            [ content>> "content" set-value ]
-            bi
-        ] >>init
-
-        { wiki "edit" } >>template
-
-    <article-boilerplate> ;
-
-: <submit-article-action> ( -- action )
-    <action>
-        [
-            validate-title
-
-            {
-                { "content" [ v-required ] }
-                { "description" [ [ v-one-line ] v-optional ] }
-            } validate-params
-
-            f <revision>
-                "title" value >>title
-                now >>date
-                username >>author
-                "content" value >>content
-                "description" value >>description
-            [ add-revision ] [ title>> view-url <redirect> ] bi
-        ] >>submit
-
-    <protected>
-        "edit wiki articles" >>description ;
-
-: <revisions-boilerplate> ( responder -- responder )
-    <boilerplate>
-        { wiki "revisions-common" } >>template ;
-
-: list-revisions ( -- seq )
-    f <revision> "title" value >>title select-tuples
-    reverse-chronological-order ;
-
-: <list-revisions-action> ( -- action )
-    <page-action>
-
-        "title" >>rest
-
-        [
-            validate-title
-            list-revisions "revisions" set-value
-        ] >>init
-
-        { wiki "revisions" } >>template
-
-    <revisions-boilerplate>
-    <article-boilerplate> ;
-
-: <list-revisions-feed-action> ( -- action )
-    <feed-action>
-
-        "title" >>rest
-
-        [ validate-title ] >>init
-
-        [ "Revisions of " "title" value append ] >>title
-
-        [ "title" value revisions-url ] >>url
-
-        [ list-revisions ] >>entries ;
-
-: rollback-description ( description -- description' )
-    [ "Rollback of '" "'" surround ] [ "Rollback" ] if* ;
-
-: <rollback-action> ( -- action )
-    <action>
-
-        [ validate-integer-id ] >>validate
-
-        [
-            "id" value <revision> select-tuple
-                f >>id
-                now >>date
-                username >>author
-                [ rollback-description ] change-description
-            [ add-revision ]
-            [ title>> revisions-url <redirect> ] bi
-        ] >>submit
-    
-    <protected>
-        "rollback wiki articles" >>description ;
-
-: list-changes ( -- seq )
-    f <revision> select-tuples
-    reverse-chronological-order ;
-
-: <list-changes-action> ( -- action )
-    <page-action>
-        [ list-changes "revisions" set-value ] >>init
-        { wiki "changes" } >>template
-
-    <revisions-boilerplate> ;
-
-: <list-changes-feed-action> ( -- action )
-    <feed-action>
-        [ URL" $wiki/changes" ] >>url
-        [ "All changes" ] >>title
-        [ list-changes ] >>entries ;
-
-: <delete-action> ( -- action )
-    <action>
-
-        [ validate-title ] >>validate
-
-        [
-            "title" value <article> delete-tuples
-            f <revision> "title" value >>title delete-tuples
-            URL" $wiki" <redirect>
-        ] >>submit
-
-     <protected>
-        "delete wiki articles" >>description
-        { can-delete-wiki-articles? } >>capabilities ;
-
-: <diff-action> ( -- action )
-    <page-action>
-
-        [
-            {
-                { "old-id" [ v-integer ] }
-                { "new-id" [ v-integer ] }
-            } validate-params
-
-            "old-id" "new-id"
-            [ value <revision> select-tuple ] bi@
-            [
-                over title>> "title" set-value
-                [ "old" [ from-object ] nest-form ]
-                [ "new" [ from-object ] nest-form ]
-                bi*
-            ]
-            [ [ content>> string-lines ] bi@ diff "diff" set-value ]
-            2bi
-        ] >>init
-
-        { wiki "diff" } >>template
-
-    <article-boilerplate> ;
-
-: <list-articles-action> ( -- action )
-    <page-action>
-
-        [
-            f <article> select-tuples
-            [ title>> ] sort-with
-            "articles" set-value
-        ] >>init
-
-        { wiki "articles" } >>template ;
-
-: list-user-edits ( -- seq )
-    f <revision> "author" value >>author select-tuples
-    reverse-chronological-order ;
-
-: <user-edits-action> ( -- action )
-    <page-action>
-
-        "author" >>rest
-
-        [
-            validate-author
-            list-user-edits "revisions" set-value
-        ] >>init
-
-        { wiki "user-edits" } >>template
-
-    <revisions-boilerplate> ;
-
-: <user-edits-feed-action> ( -- action )
-    <feed-action>
-        "author" >>rest
-        [ validate-author ] >>init
-        [ "Edits by " "author" value append ] >>title
-        [ "author" value user-edits-url ] >>url
-        [ list-user-edits ] >>entries ;
-
-: init-sidebars ( -- )
-    "Contents" latest-revision [ "contents" [ from-object ] nest-form ] when*
-    "Footer" latest-revision [ "footer" [ from-object ] nest-form ] when* ;
-
-: init-relative-link-prefix ( -- )
-    URL" $wiki/view/" adjust-url present relative-link-prefix set ;
-
-: <wiki> ( -- dispatcher )
-    wiki new-dispatcher
-        <main-article-action> "" add-responder
-        <view-article-action> "view" add-responder
-        <view-revision-action> "revision" add-responder
-        <random-article-action> "random" add-responder
-        <list-revisions-action> "revisions" add-responder
-        <list-revisions-feed-action> "revisions.atom" add-responder
-        <diff-action> "diff" add-responder
-        <edit-article-action> "edit" add-responder
-        <submit-article-action> "submit" add-responder
-        <rollback-action> "rollback" add-responder
-        <user-edits-action> "user-edits" add-responder
-        <list-articles-action> "articles" add-responder
-        <list-changes-action> "changes" add-responder
-        <user-edits-feed-action> "user-edits.atom" add-responder
-        <list-changes-feed-action> "changes.atom" add-responder
-        <delete-action> "delete" add-responder
-    <boilerplate>
-        [ init-sidebars init-relative-link-prefix ] >>init
-        { wiki "wiki-common" } >>template ;
-
-: init-wiki ( -- )
-    "resource:extra/webapps/wiki/initial-content" [
-        [
-            dup ".txt" ?tail [
-                swap ascii file-contents
-                f <revision>
-                    swap >>content
-                    swap >>title
-                    "slava" >>author
-                    now >>date
-                add-revision
-            ] [ 2drop ] if
-        ] each
-    ] with-directory-files ;