mirror of
https://github.com/KevinMidboe/linguist.git
synced 2025-12-08 20:38:47 +00:00
Merge branch 'master' into 985
Conflicts: lib/linguist/languages.yml
This commit is contained in:
Arfon Smith
@@ -2,11 +2,8 @@ before_install:
|
|||||||
- sudo apt-get install libicu-dev -y
|
- sudo apt-get install libicu-dev -y
|
||||||
- gem update --system 2.1.11
|
- gem update --system 2.1.11
|
||||||
rvm:
|
rvm:
|
||||||
- 1.8.7
|
|
||||||
- 1.9.2
|
|
||||||
- 1.9.3
|
- 1.9.3
|
||||||
- 2.0.0
|
- 2.0.0
|
||||||
- 2.1.1
|
- 2.1.1
|
||||||
- ree
|
|
||||||
notifications:
|
notifications:
|
||||||
disabled: true
|
disabled: true
|
||||||
|
|||||||
5
Gemfile
5
Gemfile
@@ -1,7 +1,2 @@
|
|||||||
source 'https://rubygems.org'
|
source 'https://rubygems.org'
|
||||||
gemspec
|
gemspec
|
||||||
|
|
||||||
if RUBY_VERSION < "1.9.3"
|
|
||||||
# escape_utils 1.0.0 requires 1.9.3 and above
|
|
||||||
gem "escape_utils", "0.3.2"
|
|
||||||
end
|
|
||||||
|
|||||||
@@ -14,7 +14,7 @@ Gem::Specification.new do |s|
|
|||||||
s.executables << 'linguist'
|
s.executables << 'linguist'
|
||||||
|
|
||||||
s.add_dependency 'charlock_holmes', '~> 0.6.6'
|
s.add_dependency 'charlock_holmes', '~> 0.6.6'
|
||||||
s.add_dependency 'escape_utils', '>= 0.3.1'
|
s.add_dependency 'escape_utils', '~> 1.0.1'
|
||||||
s.add_dependency 'mime-types', '~> 1.19'
|
s.add_dependency 'mime-types', '~> 1.19'
|
||||||
s.add_dependency 'pygments.rb', '~> 0.5.4'
|
s.add_dependency 'pygments.rb', '~> 0.5.4'
|
||||||
|
|
||||||
|
|||||||
@@ -9,7 +9,7 @@
|
|||||||
# includes name.downcase)
|
# includes name.downcase)
|
||||||
# ace_mode - A String name of Ace Mode (if available)
|
# ace_mode - A String name of Ace Mode (if available)
|
||||||
# wrap - Boolean wrap to enable line wrapping (default: false)
|
# wrap - Boolean wrap to enable line wrapping (default: false)
|
||||||
# extension - An Array of associated extensions (the first one is
|
# extensions - An Array of associated extensions (the first one is
|
||||||
# considered the primary extension)
|
# considered the primary extension)
|
||||||
# interpreters - An Array of associated interpreters
|
# interpreters - An Array of associated interpreters
|
||||||
# searchable - Boolean flag to enable searching (defaults to true)
|
# searchable - Boolean flag to enable searching (defaults to true)
|
||||||
@@ -91,7 +91,8 @@ Alloy:
|
|||||||
type: programming # 'modeling' would be more appropiate
|
type: programming # 'modeling' would be more appropiate
|
||||||
lexer: Text only
|
lexer: Text only
|
||||||
color: "#cc5c24"
|
color: "#cc5c24"
|
||||||
primary_extension: .als
|
extensions:
|
||||||
|
- .als
|
||||||
|
|
||||||
ApacheConf:
|
ApacheConf:
|
||||||
type: markup
|
type: markup
|
||||||
@@ -144,7 +145,8 @@ AspectJ:
|
|||||||
type: programming
|
type: programming
|
||||||
lexer: AspectJ
|
lexer: AspectJ
|
||||||
color: "#1957b0"
|
color: "#1957b0"
|
||||||
primary_extension: .aj
|
extensions:
|
||||||
|
- .aj
|
||||||
|
|
||||||
Assembly:
|
Assembly:
|
||||||
type: programming
|
type: programming
|
||||||
@@ -167,7 +169,7 @@ AutoHotkey:
|
|||||||
color: "#6594b9"
|
color: "#6594b9"
|
||||||
aliases:
|
aliases:
|
||||||
- ahk
|
- ahk
|
||||||
extension:
|
extensions:
|
||||||
- .ahk
|
- .ahk
|
||||||
|
|
||||||
AutoIt:
|
AutoIt:
|
||||||
@@ -490,13 +492,13 @@ DM:
|
|||||||
type: programming
|
type: programming
|
||||||
color: "#075ff1"
|
color: "#075ff1"
|
||||||
lexer: C++
|
lexer: C++
|
||||||
extension:
|
extensions:
|
||||||
- .dm
|
- .dm
|
||||||
aliases:
|
aliases:
|
||||||
- byond
|
- byond
|
||||||
|
|
||||||
DOT:
|
DOT:
|
||||||
type: programming
|
type: data
|
||||||
lexer: Text only
|
lexer: Text only
|
||||||
extensions:
|
extensions:
|
||||||
- .dot
|
- .dot
|
||||||
@@ -533,7 +535,8 @@ Dogescript:
|
|||||||
type: programming
|
type: programming
|
||||||
lexer: Text only
|
lexer: Text only
|
||||||
color: "#cca760"
|
color: "#cca760"
|
||||||
primary_extension: .djs
|
extensions:
|
||||||
|
- .djs
|
||||||
|
|
||||||
Dylan:
|
Dylan:
|
||||||
type: programming
|
type: programming
|
||||||
@@ -547,7 +550,8 @@ E:
|
|||||||
type: programming
|
type: programming
|
||||||
color: "#ccce35"
|
color: "#ccce35"
|
||||||
lexer: Text only
|
lexer: Text only
|
||||||
primary_extension: .E
|
extensions:
|
||||||
|
- .E
|
||||||
|
|
||||||
Ecere Projects:
|
Ecere Projects:
|
||||||
type: data
|
type: data
|
||||||
@@ -568,8 +572,8 @@ Eagle:
|
|||||||
type: markup
|
type: markup
|
||||||
color: "#3994bc"
|
color: "#3994bc"
|
||||||
lexer: XML
|
lexer: XML
|
||||||
primary_extension: .sch
|
|
||||||
extensions:
|
extensions:
|
||||||
|
- .sch
|
||||||
- .brd
|
- .brd
|
||||||
|
|
||||||
Eiffel:
|
Eiffel:
|
||||||
@@ -690,17 +694,19 @@ Frege:
|
|||||||
type: programming
|
type: programming
|
||||||
color: "#00cafe"
|
color: "#00cafe"
|
||||||
lexer: Haskell
|
lexer: Haskell
|
||||||
primary_extension: .fr
|
extensions:
|
||||||
|
- .fr
|
||||||
|
|
||||||
Game Maker Language:
|
Game Maker Language:
|
||||||
type: programming
|
type: programming
|
||||||
|
color: "#8ad353"
|
||||||
lexer: JavaScript
|
lexer: JavaScript
|
||||||
primary_extension: .gml
|
extensions:
|
||||||
|
- .gml
|
||||||
|
|
||||||
GAP:
|
GAP:
|
||||||
type: programming
|
type: programming
|
||||||
lexer: Text only
|
lexer: Text only
|
||||||
primary_extension: .g
|
|
||||||
extensions:
|
extensions:
|
||||||
- .g
|
- .g
|
||||||
- .gap
|
- .gap
|
||||||
@@ -765,8 +771,8 @@ Gnuplot:
|
|||||||
type: programming
|
type: programming
|
||||||
color: "#f0a9f0"
|
color: "#f0a9f0"
|
||||||
lexer: Gnuplot
|
lexer: Gnuplot
|
||||||
primary_extension: .gp
|
|
||||||
extensions:
|
extensions:
|
||||||
|
- .gp
|
||||||
- .gnu
|
- .gnu
|
||||||
- .gnuplot
|
- .gnuplot
|
||||||
- .plot
|
- .plot
|
||||||
@@ -790,7 +796,8 @@ Grammatical Framework:
|
|||||||
aliases:
|
aliases:
|
||||||
- gf
|
- gf
|
||||||
wrap: false
|
wrap: false
|
||||||
primary_extension: .gf
|
extensions:
|
||||||
|
- .gf
|
||||||
searchable: true
|
searchable: true
|
||||||
color: "#ff0000"
|
color: "#ff0000"
|
||||||
|
|
||||||
@@ -927,7 +934,8 @@ INI:
|
|||||||
- .properties
|
- .properties
|
||||||
|
|
||||||
Inno Setup:
|
Inno Setup:
|
||||||
primary_extension: .iss
|
extensions:
|
||||||
|
- .iss
|
||||||
lexer: Text only
|
lexer: Text only
|
||||||
|
|
||||||
Idris:
|
Idris:
|
||||||
@@ -941,8 +949,8 @@ Inform 7:
|
|||||||
type: programming
|
type: programming
|
||||||
lexer: Text only
|
lexer: Text only
|
||||||
wrap: true
|
wrap: true
|
||||||
primary_extension: .ni
|
|
||||||
extensions:
|
extensions:
|
||||||
|
- .ni
|
||||||
- .i7x
|
- .i7x
|
||||||
|
|
||||||
Inno Setup:
|
Inno Setup:
|
||||||
@@ -1013,7 +1021,8 @@ JSONiq:
|
|||||||
type: programming
|
type: programming
|
||||||
ace_mode: jsoniq
|
ace_mode: jsoniq
|
||||||
lexer: XQuery
|
lexer: XQuery
|
||||||
primary_extension: .jq
|
extensions:
|
||||||
|
- .jq
|
||||||
|
|
||||||
Jade:
|
Jade:
|
||||||
group: HTML
|
group: HTML
|
||||||
@@ -1080,7 +1089,8 @@ Kit:
|
|||||||
type: markup
|
type: markup
|
||||||
lexer: HTML
|
lexer: HTML
|
||||||
ace_mode: html
|
ace_mode: html
|
||||||
primary_extension: .kit
|
extensions:
|
||||||
|
- .kit
|
||||||
|
|
||||||
Kotlin:
|
Kotlin:
|
||||||
type: programming
|
type: programming
|
||||||
@@ -1113,7 +1123,8 @@ Latte:
|
|||||||
color: "#A8FF97"
|
color: "#A8FF97"
|
||||||
group: HTML
|
group: HTML
|
||||||
lexer: Smarty
|
lexer: Smarty
|
||||||
primary_extension: .latte
|
extensions:
|
||||||
|
- .latte
|
||||||
|
|
||||||
Less:
|
Less:
|
||||||
type: markup
|
type: markup
|
||||||
@@ -1131,7 +1142,8 @@ LilyPond:
|
|||||||
Liquid:
|
Liquid:
|
||||||
type: markup
|
type: markup
|
||||||
lexer: Text only
|
lexer: Text only
|
||||||
primary_extension: .liquid
|
extensions:
|
||||||
|
- .liquid
|
||||||
|
|
||||||
Literate Agda:
|
Literate Agda:
|
||||||
type: programming
|
type: programming
|
||||||
@@ -1207,7 +1219,8 @@ MTML:
|
|||||||
type: markup
|
type: markup
|
||||||
lexer: HTML
|
lexer: HTML
|
||||||
color: "#0095d9"
|
color: "#0095d9"
|
||||||
primary_extension: .mtml
|
extensions:
|
||||||
|
- .mtml
|
||||||
|
|
||||||
Makefile:
|
Makefile:
|
||||||
aliases:
|
aliases:
|
||||||
@@ -1249,7 +1262,8 @@ Mask:
|
|||||||
|
|
||||||
Mathematica:
|
Mathematica:
|
||||||
type: programming
|
type: programming
|
||||||
primary_extension: .mathematica
|
extensions:
|
||||||
|
- .mathematica
|
||||||
lexer: Text only
|
lexer: Text only
|
||||||
|
|
||||||
Matlab:
|
Matlab:
|
||||||
@@ -1283,11 +1297,7 @@ MediaWiki:
|
|||||||
|
|
||||||
Mercury:
|
Mercury:
|
||||||
type: programming
|
type: programming
|
||||||
# This is the background colour on the web page.
|
|
||||||
color: "#abcdef"
|
color: "#abcdef"
|
||||||
# The primary extension is .m, but lingist won't accept duplicates
|
|
||||||
primary_extension: .mercury
|
|
||||||
# Mercury's syntax is not prolog syntax, but they do share the lexer
|
|
||||||
lexer: Prolog
|
lexer: Prolog
|
||||||
ace_mode: prolog
|
ace_mode: prolog
|
||||||
extensions:
|
extensions:
|
||||||
@@ -1477,7 +1487,7 @@ PAWN:
|
|||||||
PHP:
|
PHP:
|
||||||
type: programming
|
type: programming
|
||||||
ace_mode: php
|
ace_mode: php
|
||||||
color: "#6e03c1"
|
color: "#4F5D95"
|
||||||
extensions:
|
extensions:
|
||||||
- .php
|
- .php
|
||||||
- .aw
|
- .aw
|
||||||
@@ -1633,7 +1643,8 @@ PureScript:
|
|||||||
type: programming
|
type: programming
|
||||||
color: "#bcdc53"
|
color: "#bcdc53"
|
||||||
lexer: Haskell
|
lexer: Haskell
|
||||||
primary_extension: .purs
|
extensions:
|
||||||
|
- .purs
|
||||||
|
|
||||||
Python:
|
Python:
|
||||||
type: programming
|
type: programming
|
||||||
@@ -1674,6 +1685,7 @@ R:
|
|||||||
lexer: S
|
lexer: S
|
||||||
aliases:
|
aliases:
|
||||||
- R
|
- R
|
||||||
|
- Rscript
|
||||||
extensions:
|
extensions:
|
||||||
- .r
|
- .r
|
||||||
- .R
|
- .R
|
||||||
@@ -1751,6 +1763,14 @@ Rebol:
|
|||||||
- .r3
|
- .r3
|
||||||
- .rebol
|
- .rebol
|
||||||
|
|
||||||
|
Red:
|
||||||
|
type: programming
|
||||||
|
lexer: Text only
|
||||||
|
color: "#ee0000"
|
||||||
|
extensions:
|
||||||
|
- .red
|
||||||
|
- .reds
|
||||||
|
|
||||||
Redcode:
|
Redcode:
|
||||||
extensions:
|
extensions:
|
||||||
- .cw
|
- .cw
|
||||||
@@ -1907,7 +1927,8 @@ Shell:
|
|||||||
ShellSession:
|
ShellSession:
|
||||||
type: programming
|
type: programming
|
||||||
lexer: Bash Session
|
lexer: Bash Session
|
||||||
primary_extension: .sh-session
|
extensions:
|
||||||
|
- .sh-session
|
||||||
|
|
||||||
Shen:
|
Shen:
|
||||||
type: programming
|
type: programming
|
||||||
@@ -1937,7 +1958,8 @@ SourcePawn:
|
|||||||
color: "#f69e1d"
|
color: "#f69e1d"
|
||||||
aliases:
|
aliases:
|
||||||
- sourcemod
|
- sourcemod
|
||||||
primary_extension: .sp
|
extensions:
|
||||||
|
- .sp
|
||||||
|
|
||||||
Squirrel:
|
Squirrel:
|
||||||
type: programming
|
type: programming
|
||||||
@@ -1958,14 +1980,13 @@ Stata:
|
|||||||
type: programming
|
type: programming
|
||||||
lexer: Text only
|
lexer: Text only
|
||||||
extensions:
|
extensions:
|
||||||
- .ado
|
|
||||||
- .do
|
- .do
|
||||||
|
- .ado
|
||||||
- .doh
|
- .doh
|
||||||
- .ihlp
|
- .ihlp
|
||||||
- .mata
|
- .mata
|
||||||
- .matah
|
- .matah
|
||||||
- .sthlp
|
- .sthlp
|
||||||
primary_extension: .do
|
|
||||||
|
|
||||||
Stylus:
|
Stylus:
|
||||||
type: markup
|
type: markup
|
||||||
@@ -1985,8 +2006,8 @@ SystemVerilog:
|
|||||||
type: programming
|
type: programming
|
||||||
color: "#343761"
|
color: "#343761"
|
||||||
lexer: systemverilog
|
lexer: systemverilog
|
||||||
primary_extension: .sv
|
|
||||||
extensions:
|
extensions:
|
||||||
|
- .sv
|
||||||
- .svh
|
- .svh
|
||||||
- .vh
|
- .vh
|
||||||
|
|
||||||
@@ -2266,7 +2287,8 @@ Zephir:
|
|||||||
type: programming
|
type: programming
|
||||||
lexer: PHP
|
lexer: PHP
|
||||||
color: "#118f9e"
|
color: "#118f9e"
|
||||||
primary_extension: .zep
|
extensions:
|
||||||
|
- .zep
|
||||||
|
|
||||||
eC:
|
eC:
|
||||||
type: programming
|
type: programming
|
||||||
|
|||||||
@@ -195,6 +195,9 @@
|
|||||||
".handlebars",
|
".handlebars",
|
||||||
".hbs"
|
".hbs"
|
||||||
],
|
],
|
||||||
|
"Haskell": [
|
||||||
|
".hs"
|
||||||
|
],
|
||||||
"HTML": [
|
"HTML": [
|
||||||
".html",
|
".html",
|
||||||
".st"
|
".st"
|
||||||
@@ -458,6 +461,10 @@
|
|||||||
".reb",
|
".reb",
|
||||||
".rebol"
|
".rebol"
|
||||||
],
|
],
|
||||||
|
"Red": [
|
||||||
|
".red",
|
||||||
|
".reds"
|
||||||
|
],
|
||||||
"RMarkdown": [
|
"RMarkdown": [
|
||||||
".rmd"
|
".rmd"
|
||||||
],
|
],
|
||||||
@@ -642,6 +649,9 @@
|
|||||||
"Perl": [
|
"Perl": [
|
||||||
"ack"
|
"ack"
|
||||||
],
|
],
|
||||||
|
"R": [
|
||||||
|
"expr-dist"
|
||||||
|
],
|
||||||
"Ruby": [
|
"Ruby": [
|
||||||
"Appraisals",
|
"Appraisals",
|
||||||
"Capfile",
|
"Capfile",
|
||||||
@@ -681,8 +691,8 @@
|
|||||||
".gemrc"
|
".gemrc"
|
||||||
]
|
]
|
||||||
},
|
},
|
||||||
"tokens_total": 589756,
|
"tokens_total": 592149,
|
||||||
"languages_total": 713,
|
"languages_total": 720,
|
||||||
"tokens": {
|
"tokens": {
|
||||||
"ABAP": {
|
"ABAP": {
|
||||||
"*/**": 1,
|
"*/**": 1,
|
||||||
@@ -24917,6 +24927,85 @@
|
|||||||
"</h2>": 1,
|
"</h2>": 1,
|
||||||
"/each": 1
|
"/each": 1
|
||||||
},
|
},
|
||||||
|
"Haskell": {
|
||||||
|
"import": 6,
|
||||||
|
"Data.Char": 1,
|
||||||
|
"main": 4,
|
||||||
|
"IO": 2,
|
||||||
|
"(": 8,
|
||||||
|
")": 8,
|
||||||
|
"do": 3,
|
||||||
|
"let": 2,
|
||||||
|
"hello": 2,
|
||||||
|
"putStrLn": 3,
|
||||||
|
"map": 13,
|
||||||
|
"toUpper": 1,
|
||||||
|
"module": 2,
|
||||||
|
"Main": 1,
|
||||||
|
"where": 4,
|
||||||
|
"Sudoku": 9,
|
||||||
|
"Data.Maybe": 2,
|
||||||
|
"sudoku": 36,
|
||||||
|
"[": 4,
|
||||||
|
"]": 3,
|
||||||
|
"pPrint": 5,
|
||||||
|
"+": 2,
|
||||||
|
"fromMaybe": 1,
|
||||||
|
"solve": 5,
|
||||||
|
"isSolved": 4,
|
||||||
|
"Data.List": 1,
|
||||||
|
"Data.List.Split": 1,
|
||||||
|
"type": 1,
|
||||||
|
"Int": 1,
|
||||||
|
"-": 3,
|
||||||
|
"Maybe": 1,
|
||||||
|
"|": 8,
|
||||||
|
"Just": 1,
|
||||||
|
"otherwise": 2,
|
||||||
|
"index": 27,
|
||||||
|
"<": 1,
|
||||||
|
"elemIndex": 1,
|
||||||
|
"sudokus": 2,
|
||||||
|
"nextTest": 5,
|
||||||
|
"i": 7,
|
||||||
|
"<->": 1,
|
||||||
|
"1": 2,
|
||||||
|
"9": 7,
|
||||||
|
"checkRow": 2,
|
||||||
|
"checkColumn": 2,
|
||||||
|
"checkBox": 2,
|
||||||
|
"listToMaybe": 1,
|
||||||
|
"mapMaybe": 1,
|
||||||
|
"take": 1,
|
||||||
|
"drop": 1,
|
||||||
|
"length": 12,
|
||||||
|
"getRow": 3,
|
||||||
|
"nub": 6,
|
||||||
|
"getColumn": 3,
|
||||||
|
"getBox": 3,
|
||||||
|
"filter": 3,
|
||||||
|
"0": 3,
|
||||||
|
"chunksOf": 10,
|
||||||
|
"quot": 3,
|
||||||
|
"transpose": 4,
|
||||||
|
"mod": 2,
|
||||||
|
"concat": 2,
|
||||||
|
"concatMap": 2,
|
||||||
|
"3": 4,
|
||||||
|
"27": 1,
|
||||||
|
"Bool": 1,
|
||||||
|
"product": 1,
|
||||||
|
"False": 4,
|
||||||
|
".": 4,
|
||||||
|
"sudokuRows": 4,
|
||||||
|
"/": 3,
|
||||||
|
"sudokuColumns": 3,
|
||||||
|
"sudokuBoxes": 3,
|
||||||
|
"True": 1,
|
||||||
|
"String": 1,
|
||||||
|
"intercalate": 2,
|
||||||
|
"show": 1
|
||||||
|
},
|
||||||
"HTML": {
|
"HTML": {
|
||||||
"<!DOCTYPE>": 2,
|
"<!DOCTYPE>": 2,
|
||||||
"HTML": 2,
|
"HTML": 2,
|
||||||
@@ -52212,43 +52301,43 @@
|
|||||||
},
|
},
|
||||||
"R": {
|
"R": {
|
||||||
"df.residual.mira": 1,
|
"df.residual.mira": 1,
|
||||||
"<": 24,
|
"<": 46,
|
||||||
"-": 27,
|
"-": 51,
|
||||||
"function": 7,
|
"function": 18,
|
||||||
"(": 60,
|
"(": 219,
|
||||||
"object": 9,
|
"object": 12,
|
||||||
"...": 4,
|
"...": 4,
|
||||||
")": 60,
|
")": 220,
|
||||||
"{": 7,
|
"{": 46,
|
||||||
"fit": 2,
|
"fit": 2,
|
||||||
"analyses": 1,
|
"analyses": 1,
|
||||||
"[": 10,
|
"[": 23,
|
||||||
"]": 10,
|
"]": 24,
|
||||||
"return": 7,
|
"return": 8,
|
||||||
"df.residual": 2,
|
"df.residual": 2,
|
||||||
"}": 7,
|
"}": 46,
|
||||||
"df.residual.lme": 1,
|
"df.residual.lme": 1,
|
||||||
"fixDF": 1,
|
"fixDF": 1,
|
||||||
"df.residual.mer": 1,
|
"df.residual.mer": 1,
|
||||||
"sum": 1,
|
"sum": 1,
|
||||||
"object@dims": 1,
|
"object@dims": 1,
|
||||||
"*": 2,
|
"*": 2,
|
||||||
"c": 5,
|
"c": 11,
|
||||||
"+": 3,
|
"+": 4,
|
||||||
"df.residual.default": 1,
|
"df.residual.default": 1,
|
||||||
"q": 2,
|
"q": 3,
|
||||||
"df": 3,
|
"df": 3,
|
||||||
"if": 3,
|
"if": 19,
|
||||||
"is.null": 1,
|
"is.null": 8,
|
||||||
"mk": 2,
|
"mk": 2,
|
||||||
"try": 2,
|
"try": 3,
|
||||||
"coef": 1,
|
"coef": 1,
|
||||||
"silent": 2,
|
"silent": 3,
|
||||||
"TRUE": 5,
|
"TRUE": 14,
|
||||||
"mn": 2,
|
"mn": 2,
|
||||||
"f": 5,
|
"f": 9,
|
||||||
"fitted": 1,
|
"fitted": 1,
|
||||||
"inherits": 2,
|
"inherits": 6,
|
||||||
"|": 3,
|
"|": 3,
|
||||||
"NULL": 2,
|
"NULL": 2,
|
||||||
"n": 3,
|
"n": 3,
|
||||||
@@ -52256,18 +52345,78 @@
|
|||||||
"is.data.frame": 1,
|
"is.data.frame": 1,
|
||||||
"is.matrix": 1,
|
"is.matrix": 1,
|
||||||
"nrow": 1,
|
"nrow": 1,
|
||||||
"length": 2,
|
"length": 3,
|
||||||
"k": 3,
|
"k": 3,
|
||||||
"max": 1,
|
"max": 1,
|
||||||
"SHEBANG#!Rscript": 1,
|
"SHEBANG#!Rscript": 2,
|
||||||
|
"#": 45,
|
||||||
|
"MedianNorm": 2,
|
||||||
|
"data": 11,
|
||||||
|
"geomeans": 3,
|
||||||
|
"<->": 1,
|
||||||
|
"exp": 1,
|
||||||
|
"rowMeans": 1,
|
||||||
|
"log": 5,
|
||||||
|
"apply": 2,
|
||||||
|
"2": 1,
|
||||||
|
"cnts": 2,
|
||||||
|
"median": 1,
|
||||||
|
"library": 1,
|
||||||
|
"print_usage": 2,
|
||||||
|
"file": 4,
|
||||||
|
"stderr": 1,
|
||||||
|
"cat": 1,
|
||||||
|
"spec": 2,
|
||||||
|
"matrix": 3,
|
||||||
|
"byrow": 3,
|
||||||
|
"ncol": 3,
|
||||||
|
"opt": 23,
|
||||||
|
"getopt": 1,
|
||||||
|
"help": 1,
|
||||||
|
"stdout": 1,
|
||||||
|
"status": 1,
|
||||||
|
"height": 7,
|
||||||
|
"out": 4,
|
||||||
|
"res": 6,
|
||||||
|
"width": 7,
|
||||||
|
"ylim": 7,
|
||||||
|
"read.table": 1,
|
||||||
|
"header": 1,
|
||||||
|
"sep": 4,
|
||||||
|
"quote": 1,
|
||||||
|
"nsamp": 8,
|
||||||
|
"dim": 1,
|
||||||
|
"outfile": 4,
|
||||||
|
"sprintf": 2,
|
||||||
|
"png": 2,
|
||||||
|
"h": 12,
|
||||||
|
"hist": 4,
|
||||||
|
"plot": 7,
|
||||||
|
"FALSE": 9,
|
||||||
|
"mids": 4,
|
||||||
|
"density": 4,
|
||||||
|
"type": 3,
|
||||||
|
"col": 4,
|
||||||
|
"rainbow": 4,
|
||||||
|
"main": 2,
|
||||||
|
"xlab": 2,
|
||||||
|
"ylab": 2,
|
||||||
|
"for": 3,
|
||||||
|
"i": 6,
|
||||||
|
"in": 8,
|
||||||
|
"lines": 6,
|
||||||
|
"devnum": 2,
|
||||||
|
"dev.off": 2,
|
||||||
|
"size.factors": 2,
|
||||||
|
"data.matrix": 1,
|
||||||
|
"data.norm": 3,
|
||||||
|
"t": 1,
|
||||||
|
"x": 3,
|
||||||
|
"/": 1,
|
||||||
"ParseDates": 2,
|
"ParseDates": 2,
|
||||||
"lines": 4,
|
|
||||||
"dates": 3,
|
"dates": 3,
|
||||||
"matrix": 2,
|
|
||||||
"unlist": 2,
|
"unlist": 2,
|
||||||
"strsplit": 2,
|
"strsplit": 3,
|
||||||
"ncol": 2,
|
|
||||||
"byrow": 2,
|
|
||||||
"days": 2,
|
"days": 2,
|
||||||
"times": 2,
|
"times": 2,
|
||||||
"hours": 2,
|
"hours": 2,
|
||||||
@@ -52288,7 +52437,6 @@
|
|||||||
"ggplot": 1,
|
"ggplot": 1,
|
||||||
"aes": 2,
|
"aes": 2,
|
||||||
"y": 1,
|
"y": 1,
|
||||||
"x": 1,
|
|
||||||
"geom_point": 1,
|
"geom_point": 1,
|
||||||
"size": 1,
|
"size": 1,
|
||||||
"Freq": 1,
|
"Freq": 1,
|
||||||
@@ -52296,11 +52444,214 @@
|
|||||||
"range": 1,
|
"range": 1,
|
||||||
"ggsave": 1,
|
"ggsave": 1,
|
||||||
"filename": 1,
|
"filename": 1,
|
||||||
"plot": 1,
|
|
||||||
"width": 1,
|
|
||||||
"height": 1,
|
|
||||||
"hello": 2,
|
"hello": 2,
|
||||||
"print": 1,
|
"print": 1,
|
||||||
|
"module": 25,
|
||||||
|
"code": 19,
|
||||||
|
"available": 1,
|
||||||
|
"via": 1,
|
||||||
|
"the": 16,
|
||||||
|
"environment": 4,
|
||||||
|
"like": 1,
|
||||||
|
"it": 3,
|
||||||
|
"returns.": 1,
|
||||||
|
"@param": 2,
|
||||||
|
"an": 1,
|
||||||
|
"identifier": 1,
|
||||||
|
"specifying": 1,
|
||||||
|
"full": 1,
|
||||||
|
"path": 9,
|
||||||
|
"search": 5,
|
||||||
|
"see": 1,
|
||||||
|
"Details": 1,
|
||||||
|
"even": 1,
|
||||||
|
"attach": 11,
|
||||||
|
"is": 7,
|
||||||
|
"optionally": 1,
|
||||||
|
"attached": 2,
|
||||||
|
"to": 8,
|
||||||
|
"of": 1,
|
||||||
|
"current": 2,
|
||||||
|
"scope": 1,
|
||||||
|
"defaults": 1,
|
||||||
|
".": 5,
|
||||||
|
"However": 1,
|
||||||
|
"interactive": 2,
|
||||||
|
"invoked": 1,
|
||||||
|
"directly": 1,
|
||||||
|
"from": 3,
|
||||||
|
"terminal": 1,
|
||||||
|
"only": 1,
|
||||||
|
"i.e.": 1,
|
||||||
|
"not": 4,
|
||||||
|
"within": 1,
|
||||||
|
"modules": 4,
|
||||||
|
"import.attach": 1,
|
||||||
|
"can": 2,
|
||||||
|
"be": 7,
|
||||||
|
"set": 1,
|
||||||
|
"or": 1,
|
||||||
|
"depending": 1,
|
||||||
|
"on": 1,
|
||||||
|
"user": 1,
|
||||||
|
"s": 2,
|
||||||
|
"preference.": 1,
|
||||||
|
"attach_operators": 3,
|
||||||
|
"causes": 1,
|
||||||
|
"emph": 3,
|
||||||
|
"operators": 3,
|
||||||
|
"by": 1,
|
||||||
|
"default": 1,
|
||||||
|
"path.": 1,
|
||||||
|
"Not": 1,
|
||||||
|
"attaching": 1,
|
||||||
|
"them": 1,
|
||||||
|
"therefore": 1,
|
||||||
|
"drastically": 1,
|
||||||
|
"limits": 1,
|
||||||
|
"a": 5,
|
||||||
|
"usefulness.": 1,
|
||||||
|
"Modules": 1,
|
||||||
|
"are": 1,
|
||||||
|
"searched": 1,
|
||||||
|
"options": 1,
|
||||||
|
"priority.": 1,
|
||||||
|
"The": 2,
|
||||||
|
"directory": 1,
|
||||||
|
"always": 1,
|
||||||
|
"considered": 1,
|
||||||
|
"first.": 1,
|
||||||
|
"That": 1,
|
||||||
|
"local": 3,
|
||||||
|
"./a.r": 1,
|
||||||
|
"will": 2,
|
||||||
|
"loaded.": 1,
|
||||||
|
"Module": 1,
|
||||||
|
"names": 2,
|
||||||
|
"fully": 1,
|
||||||
|
"qualified": 1,
|
||||||
|
"refer": 1,
|
||||||
|
"nested": 1,
|
||||||
|
"paths.": 1,
|
||||||
|
"See": 1,
|
||||||
|
"import": 5,
|
||||||
|
"executed": 1,
|
||||||
|
"global": 1,
|
||||||
|
"effect": 1,
|
||||||
|
"same.": 1,
|
||||||
|
"When": 1,
|
||||||
|
"used": 2,
|
||||||
|
"globally": 1,
|
||||||
|
"inside": 1,
|
||||||
|
"newly": 2,
|
||||||
|
"outside": 1,
|
||||||
|
"nor": 1,
|
||||||
|
"other": 2,
|
||||||
|
"which": 3,
|
||||||
|
"might": 1,
|
||||||
|
"loaded": 4,
|
||||||
|
"@examples": 1,
|
||||||
|
"@seealso": 3,
|
||||||
|
"reload": 3,
|
||||||
|
"@export": 2,
|
||||||
|
"substitute": 2,
|
||||||
|
"stopifnot": 3,
|
||||||
|
"missing": 1,
|
||||||
|
"&&": 2,
|
||||||
|
"module_name": 7,
|
||||||
|
"getOption": 1,
|
||||||
|
"else": 4,
|
||||||
|
"class": 4,
|
||||||
|
"module_path": 15,
|
||||||
|
"find_module": 1,
|
||||||
|
"stop": 1,
|
||||||
|
"attr": 2,
|
||||||
|
"message": 1,
|
||||||
|
"containing_modules": 3,
|
||||||
|
"module_init_files": 1,
|
||||||
|
"mapply": 1,
|
||||||
|
"do_import": 4,
|
||||||
|
"mod_ns": 5,
|
||||||
|
"as.character": 3,
|
||||||
|
"module_parent": 8,
|
||||||
|
"parent.frame": 2,
|
||||||
|
"mod_env": 7,
|
||||||
|
"exhibit_namespace": 3,
|
||||||
|
"identical": 2,
|
||||||
|
".GlobalEnv": 2,
|
||||||
|
"name": 9,
|
||||||
|
"environmentName": 2,
|
||||||
|
"parent.env": 4,
|
||||||
|
"export_operators": 2,
|
||||||
|
"invisible": 1,
|
||||||
|
"is_module_loaded": 1,
|
||||||
|
"get_loaded_module": 1,
|
||||||
|
"namespace": 13,
|
||||||
|
"structure": 3,
|
||||||
|
"new.env": 1,
|
||||||
|
"parent": 9,
|
||||||
|
".BaseNamespaceEnv": 1,
|
||||||
|
"paste": 3,
|
||||||
|
"source": 2,
|
||||||
|
"chdir": 1,
|
||||||
|
"envir": 5,
|
||||||
|
"cache_module": 1,
|
||||||
|
"exported_functions": 2,
|
||||||
|
"lsf.str": 2,
|
||||||
|
"list2env": 2,
|
||||||
|
"sapply": 2,
|
||||||
|
"get": 2,
|
||||||
|
"ops": 2,
|
||||||
|
"is_predefined": 2,
|
||||||
|
"%": 2,
|
||||||
|
"is_op": 2,
|
||||||
|
"prefix": 3,
|
||||||
|
"||": 1,
|
||||||
|
"grepl": 1,
|
||||||
|
"Filter": 1,
|
||||||
|
"op_env": 4,
|
||||||
|
"cache.": 1,
|
||||||
|
"@note": 1,
|
||||||
|
"Any": 1,
|
||||||
|
"references": 1,
|
||||||
|
"remain": 1,
|
||||||
|
"unchanged": 1,
|
||||||
|
"and": 2,
|
||||||
|
"files": 1,
|
||||||
|
"would": 1,
|
||||||
|
"have": 1,
|
||||||
|
"happened": 1,
|
||||||
|
"without": 1,
|
||||||
|
"unload": 2,
|
||||||
|
"should": 2,
|
||||||
|
"production": 1,
|
||||||
|
"code.": 1,
|
||||||
|
"does": 1,
|
||||||
|
"currently": 1,
|
||||||
|
"detach": 1,
|
||||||
|
"environments.": 1,
|
||||||
|
"Reload": 1,
|
||||||
|
"given": 1,
|
||||||
|
"Remove": 1,
|
||||||
|
"cache": 1,
|
||||||
|
"forcing": 1,
|
||||||
|
"reload.": 1,
|
||||||
|
"reloaded": 1,
|
||||||
|
"reference": 1,
|
||||||
|
"unloaded": 1,
|
||||||
|
"still": 1,
|
||||||
|
"work.": 1,
|
||||||
|
"Reloading": 1,
|
||||||
|
"primarily": 1,
|
||||||
|
"useful": 1,
|
||||||
|
"testing": 1,
|
||||||
|
"during": 1,
|
||||||
|
"module_ref": 3,
|
||||||
|
"rm": 1,
|
||||||
|
"list": 1,
|
||||||
|
".loaded_modules": 1,
|
||||||
|
"whatnot.": 1,
|
||||||
|
"assign": 1,
|
||||||
"##polyg": 1,
|
"##polyg": 1,
|
||||||
"vector": 2,
|
"vector": 2,
|
||||||
"##numpoints": 1,
|
"##numpoints": 1,
|
||||||
@@ -52314,8 +52665,7 @@
|
|||||||
"pts": 1,
|
"pts": 1,
|
||||||
"spsample": 1,
|
"spsample": 1,
|
||||||
"polyg": 1,
|
"polyg": 1,
|
||||||
"numpoints": 1,
|
"numpoints": 1
|
||||||
"type": 1
|
|
||||||
},
|
},
|
||||||
"Racket": {
|
"Racket": {
|
||||||
";": 3,
|
";": 3,
|
||||||
@@ -52884,6 +53234,249 @@
|
|||||||
"print": 4,
|
"print": 4,
|
||||||
"author": 1
|
"author": 1
|
||||||
},
|
},
|
||||||
|
"Red": {
|
||||||
|
"Red": 3,
|
||||||
|
"[": 111,
|
||||||
|
"Title": 2,
|
||||||
|
"Author": 1,
|
||||||
|
"]": 114,
|
||||||
|
"File": 1,
|
||||||
|
"%": 2,
|
||||||
|
"console.red": 1,
|
||||||
|
"Tabs": 1,
|
||||||
|
"Rights": 1,
|
||||||
|
"License": 2,
|
||||||
|
"{": 11,
|
||||||
|
"Distributed": 1,
|
||||||
|
"under": 1,
|
||||||
|
"the": 3,
|
||||||
|
"Boost": 1,
|
||||||
|
"Software": 1,
|
||||||
|
"Version": 1,
|
||||||
|
"See": 1,
|
||||||
|
"https": 1,
|
||||||
|
"//github.com/dockimbel/Red/blob/master/BSL": 1,
|
||||||
|
"-": 74,
|
||||||
|
"License.txt": 1,
|
||||||
|
"}": 11,
|
||||||
|
"Purpose": 2,
|
||||||
|
"Language": 2,
|
||||||
|
"http": 2,
|
||||||
|
"//www.red": 2,
|
||||||
|
"lang.org/": 2,
|
||||||
|
"#system": 1,
|
||||||
|
"global": 1,
|
||||||
|
"#either": 3,
|
||||||
|
"OS": 3,
|
||||||
|
"MacOSX": 2,
|
||||||
|
"History": 1,
|
||||||
|
"library": 1,
|
||||||
|
"cdecl": 3,
|
||||||
|
"add": 2,
|
||||||
|
"history": 2,
|
||||||
|
";": 31,
|
||||||
|
"Add": 1,
|
||||||
|
"line": 9,
|
||||||
|
"to": 2,
|
||||||
|
"history.": 1,
|
||||||
|
"c": 7,
|
||||||
|
"string": 10,
|
||||||
|
"rl": 4,
|
||||||
|
"insert": 3,
|
||||||
|
"wrapper": 2,
|
||||||
|
"func": 1,
|
||||||
|
"count": 3,
|
||||||
|
"integer": 16,
|
||||||
|
"key": 3,
|
||||||
|
"return": 10,
|
||||||
|
"Windows": 2,
|
||||||
|
"system/platform": 1,
|
||||||
|
"ret": 5,
|
||||||
|
"AttachConsole": 1,
|
||||||
|
"if": 2,
|
||||||
|
"zero": 3,
|
||||||
|
"print": 5,
|
||||||
|
"halt": 2,
|
||||||
|
"SetConsoleTitle": 1,
|
||||||
|
"as": 4,
|
||||||
|
"string/rs": 1,
|
||||||
|
"head": 1,
|
||||||
|
"str": 4,
|
||||||
|
"bind": 1,
|
||||||
|
"tab": 3,
|
||||||
|
"input": 2,
|
||||||
|
"routine": 1,
|
||||||
|
"prompt": 3,
|
||||||
|
"/local": 1,
|
||||||
|
"len": 1,
|
||||||
|
"buffer": 4,
|
||||||
|
"string/load": 1,
|
||||||
|
"+": 1,
|
||||||
|
"length": 1,
|
||||||
|
"free": 1,
|
||||||
|
"byte": 3,
|
||||||
|
"ptr": 14,
|
||||||
|
"SET_RETURN": 1,
|
||||||
|
"(": 6,
|
||||||
|
")": 4,
|
||||||
|
"delimiters": 1,
|
||||||
|
"function": 6,
|
||||||
|
"block": 3,
|
||||||
|
"list": 1,
|
||||||
|
"copy": 2,
|
||||||
|
"none": 1,
|
||||||
|
"foreach": 1,
|
||||||
|
"case": 2,
|
||||||
|
"escaped": 2,
|
||||||
|
"no": 2,
|
||||||
|
"in": 2,
|
||||||
|
"comment": 2,
|
||||||
|
"switch": 3,
|
||||||
|
"#": 8,
|
||||||
|
"mono": 3,
|
||||||
|
"mode": 3,
|
||||||
|
"cnt/1": 1,
|
||||||
|
"red": 1,
|
||||||
|
"eval": 1,
|
||||||
|
"code": 3,
|
||||||
|
"load/all": 1,
|
||||||
|
"unless": 1,
|
||||||
|
"tail": 1,
|
||||||
|
"set/any": 1,
|
||||||
|
"not": 1,
|
||||||
|
"script/2": 1,
|
||||||
|
"do": 2,
|
||||||
|
"skip": 1,
|
||||||
|
"script": 1,
|
||||||
|
"quit": 2,
|
||||||
|
"init": 1,
|
||||||
|
"console": 2,
|
||||||
|
"Console": 1,
|
||||||
|
"alpha": 1,
|
||||||
|
"version": 3,
|
||||||
|
"only": 1,
|
||||||
|
"ASCII": 1,
|
||||||
|
"supported": 1,
|
||||||
|
"Red/System": 1,
|
||||||
|
"#include": 1,
|
||||||
|
"../common/FPU": 1,
|
||||||
|
"configuration.reds": 1,
|
||||||
|
"C": 1,
|
||||||
|
"types": 1,
|
||||||
|
"#define": 2,
|
||||||
|
"time": 2,
|
||||||
|
"long": 2,
|
||||||
|
"clock": 1,
|
||||||
|
"date": 1,
|
||||||
|
"alias": 2,
|
||||||
|
"struct": 5,
|
||||||
|
"second": 1,
|
||||||
|
"minute": 1,
|
||||||
|
"hour": 1,
|
||||||
|
"day": 1,
|
||||||
|
"month": 1,
|
||||||
|
"year": 1,
|
||||||
|
"Since": 1,
|
||||||
|
"weekday": 1,
|
||||||
|
"since": 1,
|
||||||
|
"Sunday": 1,
|
||||||
|
"yearday": 1,
|
||||||
|
"daylight": 1,
|
||||||
|
"saving": 1,
|
||||||
|
"Negative": 1,
|
||||||
|
"unknown": 1,
|
||||||
|
"#import": 1,
|
||||||
|
"LIBC": 1,
|
||||||
|
"file": 1,
|
||||||
|
"Error": 1,
|
||||||
|
"handling": 1,
|
||||||
|
"form": 1,
|
||||||
|
"error": 5,
|
||||||
|
"Return": 1,
|
||||||
|
"description.": 1,
|
||||||
|
"Print": 1,
|
||||||
|
"standard": 1,
|
||||||
|
"output.": 1,
|
||||||
|
"Memory": 1,
|
||||||
|
"management": 1,
|
||||||
|
"make": 1,
|
||||||
|
"Allocate": 1,
|
||||||
|
"filled": 1,
|
||||||
|
"memory.": 1,
|
||||||
|
"chunks": 1,
|
||||||
|
"size": 5,
|
||||||
|
"binary": 4,
|
||||||
|
"resize": 1,
|
||||||
|
"Resize": 1,
|
||||||
|
"memory": 2,
|
||||||
|
"allocation.": 1,
|
||||||
|
"JVM": 6,
|
||||||
|
"reserved0": 1,
|
||||||
|
"int": 6,
|
||||||
|
"reserved1": 1,
|
||||||
|
"reserved2": 1,
|
||||||
|
"DestroyJavaVM": 1,
|
||||||
|
"JNICALL": 5,
|
||||||
|
"vm": 5,
|
||||||
|
"jint": 5,
|
||||||
|
"AttachCurrentThread": 1,
|
||||||
|
"penv": 3,
|
||||||
|
"p": 3,
|
||||||
|
"args": 2,
|
||||||
|
"DetachCurrentThread": 1,
|
||||||
|
"GetEnv": 1,
|
||||||
|
"AttachCurrentThreadAsDaemon": 1,
|
||||||
|
"just": 2,
|
||||||
|
"some": 2,
|
||||||
|
"datatypes": 1,
|
||||||
|
"for": 1,
|
||||||
|
"testing": 1,
|
||||||
|
"#some": 1,
|
||||||
|
"hash": 1,
|
||||||
|
"FF0000": 3,
|
||||||
|
"FF000000": 2,
|
||||||
|
"with": 4,
|
||||||
|
"instead": 1,
|
||||||
|
"of": 1,
|
||||||
|
"space": 2,
|
||||||
|
"/wAAAA": 1,
|
||||||
|
"/wAAA": 2,
|
||||||
|
"A": 2,
|
||||||
|
"inside": 2,
|
||||||
|
"char": 1,
|
||||||
|
"bla": 2,
|
||||||
|
"ff": 1,
|
||||||
|
"foo": 3,
|
||||||
|
"numbers": 1,
|
||||||
|
"which": 1,
|
||||||
|
"interpreter": 1,
|
||||||
|
"path": 1,
|
||||||
|
"h": 1,
|
||||||
|
"#if": 1,
|
||||||
|
"type": 1,
|
||||||
|
"exe": 1,
|
||||||
|
"push": 3,
|
||||||
|
"system/stack/frame": 2,
|
||||||
|
"save": 1,
|
||||||
|
"previous": 1,
|
||||||
|
"frame": 2,
|
||||||
|
"pointer": 2,
|
||||||
|
"system/stack/top": 1,
|
||||||
|
"@@": 1,
|
||||||
|
"reposition": 1,
|
||||||
|
"after": 1,
|
||||||
|
"catch": 1,
|
||||||
|
"flag": 1,
|
||||||
|
"CATCH_ALL": 1,
|
||||||
|
"exceptions": 1,
|
||||||
|
"root": 1,
|
||||||
|
"barrier": 1,
|
||||||
|
"keep": 1,
|
||||||
|
"stack": 1,
|
||||||
|
"aligned": 1,
|
||||||
|
"on": 1,
|
||||||
|
"bit": 1
|
||||||
|
},
|
||||||
"RMarkdown": {
|
"RMarkdown": {
|
||||||
"Some": 1,
|
"Some": 1,
|
||||||
"text.": 1,
|
"text.": 1,
|
||||||
@@ -62441,6 +63034,7 @@
|
|||||||
"Groovy Server Pages": 91,
|
"Groovy Server Pages": 91,
|
||||||
"Haml": 4,
|
"Haml": 4,
|
||||||
"Handlebars": 69,
|
"Handlebars": 69,
|
||||||
|
"Haskell": 302,
|
||||||
"HTML": 413,
|
"HTML": 413,
|
||||||
"Hy": 155,
|
"Hy": 155,
|
||||||
"IDL": 418,
|
"IDL": 418,
|
||||||
@@ -62514,11 +63108,12 @@
|
|||||||
"Protocol Buffer": 63,
|
"Protocol Buffer": 63,
|
||||||
"PureScript": 1652,
|
"PureScript": 1652,
|
||||||
"Python": 5715,
|
"Python": 5715,
|
||||||
"R": 392,
|
"R": 1667,
|
||||||
"Racket": 331,
|
"Racket": 331,
|
||||||
"Ragel in Ruby Host": 593,
|
"Ragel in Ruby Host": 593,
|
||||||
"RDoc": 279,
|
"RDoc": 279,
|
||||||
"Rebol": 533,
|
"Rebol": 533,
|
||||||
|
"Red": 816,
|
||||||
"RMarkdown": 19,
|
"RMarkdown": 19,
|
||||||
"RobotFramework": 483,
|
"RobotFramework": 483,
|
||||||
"Ruby": 3862,
|
"Ruby": 3862,
|
||||||
@@ -62619,6 +63214,7 @@
|
|||||||
"Groovy Server Pages": 4,
|
"Groovy Server Pages": 4,
|
||||||
"Haml": 1,
|
"Haml": 1,
|
||||||
"Handlebars": 2,
|
"Handlebars": 2,
|
||||||
|
"Haskell": 3,
|
||||||
"HTML": 2,
|
"HTML": 2,
|
||||||
"Hy": 2,
|
"Hy": 2,
|
||||||
"IDL": 4,
|
"IDL": 4,
|
||||||
@@ -62692,11 +63288,12 @@
|
|||||||
"Protocol Buffer": 1,
|
"Protocol Buffer": 1,
|
||||||
"PureScript": 4,
|
"PureScript": 4,
|
||||||
"Python": 7,
|
"Python": 7,
|
||||||
"R": 4,
|
"R": 6,
|
||||||
"Racket": 2,
|
"Racket": 2,
|
||||||
"Ragel in Ruby Host": 3,
|
"Ragel in Ruby Host": 3,
|
||||||
"RDoc": 1,
|
"RDoc": 1,
|
||||||
"Rebol": 6,
|
"Rebol": 6,
|
||||||
|
"Red": 2,
|
||||||
"RMarkdown": 1,
|
"RMarkdown": 1,
|
||||||
"RobotFramework": 3,
|
"RobotFramework": 3,
|
||||||
"Ruby": 17,
|
"Ruby": 17,
|
||||||
@@ -62742,5 +63339,5 @@
|
|||||||
"YAML": 2,
|
"YAML": 2,
|
||||||
"Zephir": 2
|
"Zephir": 2
|
||||||
},
|
},
|
||||||
"md5": "0ab9fe87b3d811ca32ad705d2653b98f"
|
"md5": "fa38e2b617caaf230146a7adab264419"
|
||||||
}
|
}
|
||||||
@@ -98,6 +98,9 @@
|
|||||||
# AngularJS
|
# AngularJS
|
||||||
- (^|/)angular([^.]*)(\.min)?\.js$
|
- (^|/)angular([^.]*)(\.min)?\.js$
|
||||||
|
|
||||||
|
# D3.js
|
||||||
|
- (^|\/)d3(\.v\d+)?([^.]*)(\.min)?\.js$
|
||||||
|
|
||||||
# React
|
# React
|
||||||
- (^|/)react(-[^.]*)?(\.min)?\.js$
|
- (^|/)react(-[^.]*)?(\.min)?\.js$
|
||||||
|
|
||||||
|
|||||||
6
samples/Haskell/Hello.hs
Normal file
6
samples/Haskell/Hello.hs
Normal file
@@ -0,0 +1,6 @@
|
|||||||
|
import Data.Char
|
||||||
|
|
||||||
|
main :: IO ()
|
||||||
|
main = do
|
||||||
|
let hello = "hello world"
|
||||||
|
putStrLn $ map toUpper hello
|
||||||
33
samples/Haskell/Main.hs
Normal file
33
samples/Haskell/Main.hs
Normal file
@@ -0,0 +1,33 @@
|
|||||||
|
module Main where
|
||||||
|
|
||||||
|
import Sudoku
|
||||||
|
import Data.Maybe
|
||||||
|
|
||||||
|
|
||||||
|
sudoku :: Sudoku
|
||||||
|
sudoku = [8, 0, 1, 3, 4, 0, 0, 0, 0,
|
||||||
|
4, 3, 0, 8, 0, 0, 1, 0, 7,
|
||||||
|
0, 0, 0, 0, 6, 0, 0, 0, 3,
|
||||||
|
2, 0, 8, 0, 5, 0, 0, 0, 9,
|
||||||
|
0, 0, 9, 0, 0, 0, 7, 0, 0,
|
||||||
|
6, 0, 0, 0, 7, 0, 8, 0, 4,
|
||||||
|
3, 0, 0, 0, 1, 0, 0, 0, 0,
|
||||||
|
1, 0, 5, 0, 0, 6, 0, 4, 2,
|
||||||
|
0, 0, 0, 0, 2, 4, 3, 0, 8]
|
||||||
|
|
||||||
|
{-
|
||||||
|
sudoku :: Sudoku
|
||||||
|
sudoku = [8, 6, 1, 3, 4, 7, 2, 9, 5,
|
||||||
|
4, 3, 2, 8, 9, 5, 1, 6, 7,
|
||||||
|
9, 5, 7, 1, 6, 2, 4, 8, 3,
|
||||||
|
2, 7, 8, 4, 5, 1, 6, 3, 9,
|
||||||
|
5, 4, 9, 6, 8, 3, 7, 2, 1,
|
||||||
|
6, 1, 3, 2, 7, 9, 8, 5, 4,
|
||||||
|
3, 2, 4, 9, 1, 8, 5, 7, 6,
|
||||||
|
1, 8, 5, 7, 3, 6, 9, 4, 2,
|
||||||
|
7, 9, 6, 5, 2, 4, 3, 1, 8]
|
||||||
|
-}
|
||||||
|
main :: IO ()
|
||||||
|
main = do
|
||||||
|
putStrLn $ pPrint sudoku ++ "\n\n"
|
||||||
|
putStrLn $ pPrint $ fromMaybe [] $ solve sudoku
|
||||||
46
samples/Haskell/Sudoku.hs
Normal file
46
samples/Haskell/Sudoku.hs
Normal file
@@ -0,0 +1,46 @@
|
|||||||
|
module Sudoku
|
||||||
|
(
|
||||||
|
Sudoku,
|
||||||
|
solve,
|
||||||
|
isSolved,
|
||||||
|
pPrint
|
||||||
|
) where
|
||||||
|
|
||||||
|
import Data.Maybe
|
||||||
|
import Data.List
|
||||||
|
import Data.List.Split
|
||||||
|
|
||||||
|
type Sudoku = [Int]
|
||||||
|
|
||||||
|
solve :: Sudoku -> Maybe Sudoku
|
||||||
|
solve sudoku
|
||||||
|
| isSolved sudoku = Just sudoku
|
||||||
|
| otherwise = do
|
||||||
|
index <- elemIndex 0 sudoku
|
||||||
|
let sudokus = [nextTest sudoku index i | i <- [1..9],
|
||||||
|
checkRow (nextTest sudoku index i) index,
|
||||||
|
checkColumn (nextTest sudoku index i) index,
|
||||||
|
checkBox (nextTest sudoku index i) index]
|
||||||
|
listToMaybe $ mapMaybe solve sudokus
|
||||||
|
where nextTest sudoku index i = take index sudoku ++ [i] ++ drop (index+1) sudoku
|
||||||
|
checkRow sudoku index = (length $ getRow sudoku index) == (length $ nub $ getRow sudoku index)
|
||||||
|
checkColumn sudoku index = (length $ getColumn sudoku index) == (length $ nub $ getColumn sudoku index)
|
||||||
|
checkBox sudoku index = (length $ getBox sudoku index) == (length $ nub $ getBox sudoku index)
|
||||||
|
getRow sudoku index = filter (/=0) $ (chunksOf 9 sudoku) !! (quot index 9)
|
||||||
|
getColumn sudoku index = filter (/=0) $ (transpose $ chunksOf 9 sudoku) !! (mod index 9)
|
||||||
|
getBox sudoku index = filter (/=0) $ (map concat $ concatMap transpose $ chunksOf 3 $ map (chunksOf 3) $ chunksOf 9 sudoku)
|
||||||
|
!! (3 * (quot index 27) + (quot (mod index 9) 3))
|
||||||
|
|
||||||
|
isSolved :: Sudoku -> Bool
|
||||||
|
isSolved sudoku
|
||||||
|
| product sudoku == 0 = False
|
||||||
|
| map (length . nub) sudokuRows /= map length sudokuRows = False
|
||||||
|
| map (length . nub) sudokuColumns /= map length sudokuColumns = False
|
||||||
|
| map (length . nub) sudokuBoxes /= map length sudokuBoxes = False
|
||||||
|
| otherwise = True
|
||||||
|
where sudokuRows = chunksOf 9 sudoku
|
||||||
|
sudokuColumns = transpose sudokuRows
|
||||||
|
sudokuBoxes = map concat $ concatMap transpose $ chunksOf 3 $ map (chunksOf 3) $ chunksOf 9 sudoku
|
||||||
|
|
||||||
|
pPrint :: Sudoku -> String
|
||||||
|
pPrint sudoku = intercalate "\n" $ map (intercalate " " . map show) $ chunksOf 9 sudoku
|
||||||
101
samples/R/filenames/expr-dist
Executable file
101
samples/R/filenames/expr-dist
Executable file
@@ -0,0 +1,101 @@
|
|||||||
|
#!/usr/bin/env Rscript
|
||||||
|
|
||||||
|
# Copyright (c) 2013 Daniel S. Standage, released under MIT license
|
||||||
|
#
|
||||||
|
# expr-dist: plot distributions of expression values before and after
|
||||||
|
# normalization; visually confirm that normalization worked
|
||||||
|
# as expected
|
||||||
|
#
|
||||||
|
# Program input is a matrix of expression values, each row corresponding to a
|
||||||
|
# molecule (gene, transcript, etc) and each row corresponding to that molecule's
|
||||||
|
# expression level or abundance. The program expects the rows and columns to be
|
||||||
|
# named, and was tested primarily on output produced by the
|
||||||
|
# 'rsem-generate-data-matrix' script distributed with the RSEM package.
|
||||||
|
#
|
||||||
|
# The program plots the distributions of the logged expression values by sample
|
||||||
|
# as provided, then normalizes the values, and finally plots the distribution of
|
||||||
|
# the logged normalized expression values by sample. The expectation is that all
|
||||||
|
# samples' distributions will have a similar shape but different medians prior
|
||||||
|
# to normalization, and that post normalization they will all have an identical
|
||||||
|
# median to facilitate cross-sample comparison.
|
||||||
|
|
||||||
|
|
||||||
|
# MedianNorm function borrowed from the EBSeq library version 1.1.6
|
||||||
|
# See http://www.bioconductor.org/packages/devel/bioc/html/EBSeq.html
|
||||||
|
MedianNorm <- function(data)
|
||||||
|
{
|
||||||
|
geomeans <- exp( rowMeans(log(data)) )
|
||||||
|
apply(data, 2, function(cnts) median((cnts/geomeans)[geomeans > 0]))
|
||||||
|
}
|
||||||
|
|
||||||
|
library("getopt")
|
||||||
|
print_usage <- function(file=stderr())
|
||||||
|
{
|
||||||
|
cat("
|
||||||
|
expr-dist: see source code for full description
|
||||||
|
Usage: expr-dist [options] < expr-matrix.txt
|
||||||
|
Options:
|
||||||
|
-h|--help: print this help message and exit
|
||||||
|
-o|--out: STRING prefix for output files; default is 'expr-dist'
|
||||||
|
-r|--res: INT resolution (dpi) of generated graphics; default is 150
|
||||||
|
-t|--height: INT height (pixels) of generated graphics; default is 1200
|
||||||
|
-w|--width: INT width (pixels) of generated graphics; default is 1200
|
||||||
|
-y|--ylim: REAL the visible range of the Y axis depends on the first
|
||||||
|
distribution plotted; if other distributions are getting
|
||||||
|
cut off, use this setting to override the default\n\n")
|
||||||
|
}
|
||||||
|
|
||||||
|
spec <- matrix( c("help", 'h', 0, "logical",
|
||||||
|
"out", 'o', 1, "character",
|
||||||
|
"res", 'r', 1, "integer",
|
||||||
|
"height", 't', 1, "integer",
|
||||||
|
"width", 'w', 1, "integer",
|
||||||
|
"ylim", 'y', 1, "double"),
|
||||||
|
byrow=TRUE, ncol=4)
|
||||||
|
opt <- getopt(spec)
|
||||||
|
if(!is.null(opt$help))
|
||||||
|
{
|
||||||
|
print_usage(file=stdout())
|
||||||
|
q(status=1)
|
||||||
|
}
|
||||||
|
if(is.null(opt$height)) { opt$height <- 1200 }
|
||||||
|
if(is.null(opt$out)) { opt$out <- "expr-dist" }
|
||||||
|
if(is.null(opt$res)) { opt$res <- 150 }
|
||||||
|
if(is.null(opt$width)) { opt$width <- 1200 }
|
||||||
|
if(!is.null(opt$ylim)) { opt$ylim <- c(0, opt$ylim) }
|
||||||
|
|
||||||
|
# Load data, determine number of samples
|
||||||
|
data <- read.table(file("stdin"), header=TRUE, sep="\t", quote="")
|
||||||
|
nsamp <- dim(data)[2] - 1
|
||||||
|
data <- data[,1:nsamp+1]
|
||||||
|
|
||||||
|
# Plot distribution of expression values before normalization
|
||||||
|
outfile <- sprintf("%s-median.png", opt$out)
|
||||||
|
png(outfile, height=opt$height, width=opt$width, res=opt$res)
|
||||||
|
h <- hist(log(data[,1]), plot=FALSE)
|
||||||
|
plot(h$mids, h$density, type="l", col=rainbow(nsamp)[1], main="",
|
||||||
|
xlab="Log expression value", ylab="Proportion of molecules", ylim=opt$ylim)
|
||||||
|
for(i in 2:nsamp)
|
||||||
|
{
|
||||||
|
h <- hist(log(data[,i]), plot=FALSE)
|
||||||
|
lines(h$mids, h$density, col=rainbow(nsamp)[i])
|
||||||
|
}
|
||||||
|
devnum <- dev.off()
|
||||||
|
|
||||||
|
# Normalize by median
|
||||||
|
size.factors <- MedianNorm(data.matrix(data))
|
||||||
|
data.norm <- t(apply(data, 1, function(x){ x / size.factors }))
|
||||||
|
|
||||||
|
# Plot distribution of normalized expression values
|
||||||
|
outfile <- sprintf("%s-median-norm.png", opt$out)
|
||||||
|
png(outfile, height=opt$height, width=opt$width, res=opt$res)
|
||||||
|
h <- hist(log(data.norm[,1]), plot=FALSE)
|
||||||
|
plot(h$mids, h$density, type="l", col=rainbow(nsamp)[1], main="",
|
||||||
|
xlab="Log normalized expression value", ylab="Proportion of molecules",
|
||||||
|
ylim=opt$ylim)
|
||||||
|
for(i in 2:nsamp)
|
||||||
|
{
|
||||||
|
h <- hist(log(data.norm[,i]), plot=FALSE)
|
||||||
|
lines(h$mids, h$density, col=rainbow(nsamp)[i])
|
||||||
|
}
|
||||||
|
devnum <- dev.off()
|
||||||
201
samples/R/import.r
Normal file
201
samples/R/import.r
Normal file
@@ -0,0 +1,201 @@
|
|||||||
|
#' Import a module into the current scope
|
||||||
|
#'
|
||||||
|
#' \code{module = import('module')} imports a specified module and makes its
|
||||||
|
#' code available via the environment-like object it returns.
|
||||||
|
#'
|
||||||
|
#' @param module an identifier specifying the full module path
|
||||||
|
#' @param attach if \code{TRUE}, attach the newly loaded module to the object
|
||||||
|
#' search path (see \code{Details})
|
||||||
|
#' @param attach_operators if \code{TRUE}, attach operators of module to the
|
||||||
|
#' object search path, even if \code{attach} is \code{FALSE}
|
||||||
|
#' @return the loaded module environment (invisible)
|
||||||
|
#'
|
||||||
|
#' @details Modules are loaded in an isolated environment which is returned, and
|
||||||
|
#' optionally attached to the object search path of the current scope (if
|
||||||
|
#' argument \code{attach} is \code{TRUE}).
|
||||||
|
#' \code{attach} defaults to \code{FALSE}. However, in interactive code it is
|
||||||
|
#' often helpful to attach packages by default. Therefore, in interactive code
|
||||||
|
#' invoked directly from the terminal only (i.e. not within modules),
|
||||||
|
#' \code{attach} defaults to the value of \code{options('import.attach')}, which
|
||||||
|
#' can be set to \code{TRUE} or \code{FALSE} depending on the user’s preference.
|
||||||
|
#'
|
||||||
|
#' \code{attach_operators} causes \emph{operators} to be attached by default,
|
||||||
|
#' because operators can only be invoked in R if they re found in the search
|
||||||
|
#' path. Not attaching them therefore drastically limits a module’s usefulness.
|
||||||
|
#'
|
||||||
|
#' Modules are searched in the module search path \code{options('import.path')}.
|
||||||
|
#' This is a vector of paths to consider, from the highest to the lowest
|
||||||
|
#' priority. The current directory is \emph{always} considered first. That is,
|
||||||
|
#' if a file \code{a.r} exists both in the current directory and in a module
|
||||||
|
#' search path, the local file \code{./a.r} will be loaded.
|
||||||
|
#'
|
||||||
|
#' Module names can be fully qualified to refer to nested paths. See
|
||||||
|
#' \code{Examples}.
|
||||||
|
#'
|
||||||
|
#' @note Unlike for packages, attaching happens \emph{locally}: if
|
||||||
|
#' \code{import} is executed in the global environment, the effect is the same.
|
||||||
|
#' Otherwise, the imported module is inserted as the parent of the current
|
||||||
|
#' \code{environment()}. When used (globally) \emph{inside} a module, the newly
|
||||||
|
#' imported module is only available inside the module’s search path, not
|
||||||
|
#' outside it (nor in other modules which might be loaded).
|
||||||
|
#'
|
||||||
|
#' @examples
|
||||||
|
#' # `a.r` is a file in the local directory containing a function `f`.
|
||||||
|
#' a = import('a')
|
||||||
|
#' a$f()
|
||||||
|
#'
|
||||||
|
#' # b/c.r is a file in path `b`, containing a function `g`.
|
||||||
|
#' import('b/c', attach = TRUE)
|
||||||
|
#' g() # No module name qualification necessary
|
||||||
|
#'
|
||||||
|
#' @seealso \code{unload}
|
||||||
|
#' @seealso \code{reload}
|
||||||
|
#' @seealso \code{module_name}
|
||||||
|
#' @export
|
||||||
|
import = function (module, attach, attach_operators = TRUE) {
|
||||||
|
module = substitute(module)
|
||||||
|
stopifnot(inherits(module, 'name'))
|
||||||
|
|
||||||
|
if (missing(attach)) {
|
||||||
|
attach = if (interactive() && is.null(module_name()))
|
||||||
|
getOption('import.attach', FALSE)
|
||||||
|
else
|
||||||
|
FALSE
|
||||||
|
}
|
||||||
|
|
||||||
|
stopifnot(class(attach) == 'logical' && length(attach) == 1)
|
||||||
|
|
||||||
|
module_path = try(find_module(module), silent = TRUE)
|
||||||
|
|
||||||
|
if (inherits(module_path, 'try-error'))
|
||||||
|
stop(attr(module_path, 'condition')$message)
|
||||||
|
|
||||||
|
containing_modules = module_init_files(module, module_path)
|
||||||
|
mapply(do_import, names(containing_modules), containing_modules)
|
||||||
|
|
||||||
|
mod_ns = do_import(as.character(module), module_path)
|
||||||
|
module_parent = parent.frame()
|
||||||
|
mod_env = exhibit_namespace(mod_ns, as.character(module), module_parent)
|
||||||
|
|
||||||
|
if (attach) {
|
||||||
|
if (identical(module_parent, .GlobalEnv))
|
||||||
|
attach(mod_env, name = environmentName(mod_env))
|
||||||
|
else
|
||||||
|
parent.env(module_parent) = mod_env
|
||||||
|
}
|
||||||
|
else if (attach_operators)
|
||||||
|
export_operators(mod_ns, module_parent)
|
||||||
|
|
||||||
|
invisible(mod_env)
|
||||||
|
}
|
||||||
|
|
||||||
|
do_import = function (module_name, module_path) {
|
||||||
|
if (is_module_loaded(module_path))
|
||||||
|
return(get_loaded_module(module_path))
|
||||||
|
|
||||||
|
# The namespace contains a module’s content. This schema is very much like
|
||||||
|
# R package organisation.
|
||||||
|
# A good resource for this is:
|
||||||
|
# <http://obeautifulcode.com/R/How-R-Searches-And-Finds-Stuff/>
|
||||||
|
namespace = structure(new.env(parent = .BaseNamespaceEnv),
|
||||||
|
name = paste('namespace', module_name, sep = ':'),
|
||||||
|
path = module_path,
|
||||||
|
class = c('namespace', 'environment'))
|
||||||
|
local(source(attr(environment(), 'path'), chdir = TRUE, local = TRUE),
|
||||||
|
envir = namespace)
|
||||||
|
cache_module(namespace)
|
||||||
|
namespace
|
||||||
|
}
|
||||||
|
|
||||||
|
exhibit_namespace = function (namespace, name, parent) {
|
||||||
|
exported_functions = lsf.str(namespace)
|
||||||
|
# Skip one parent environment because this module is hooked into the chain
|
||||||
|
# between the calling environment and its ancestor, thus sitting in its
|
||||||
|
# local object search path.
|
||||||
|
structure(list2env(sapply(exported_functions, get, envir = namespace),
|
||||||
|
parent = parent.env(parent)),
|
||||||
|
name = paste('module', name, sep = ':'),
|
||||||
|
path = module_path(namespace),
|
||||||
|
class = c('module', 'environment'))
|
||||||
|
}
|
||||||
|
|
||||||
|
export_operators = function (namespace, parent) {
|
||||||
|
# `$` cannot be overwritten, but it is generic so S3 variants of it can be
|
||||||
|
# defined. We therefore test it as well.
|
||||||
|
ops = c('+', '-', '*', '/', '^', '**', '&', '|', ':', '::', ':::', '$', '=',
|
||||||
|
'<-', '<<-', '==', '<', '<=', '>', '>=', '!=', '~', '&&', '||')
|
||||||
|
|
||||||
|
is_predefined = function (f) f %in% ops
|
||||||
|
|
||||||
|
is_op = function (f) {
|
||||||
|
prefix = strsplit(f, '\\.')[[1]][1]
|
||||||
|
is_predefined(prefix) || grepl('^%.*%$', prefix)
|
||||||
|
}
|
||||||
|
|
||||||
|
operators = Filter(is_op, lsf.str(namespace))
|
||||||
|
name = module_name(namespace)
|
||||||
|
# Skip one parent environment because this module is hooked into the chain
|
||||||
|
# between the calling environment and its ancestor, thus sitting in its
|
||||||
|
# local object search path.
|
||||||
|
op_env = structure(list2env(sapply(operators, get, envir = namespace),
|
||||||
|
parent = parent.env(parent)),
|
||||||
|
name = paste('operators', name, sep = ':'),
|
||||||
|
path = module_path(namespace),
|
||||||
|
class = c('module', 'environment'))
|
||||||
|
|
||||||
|
if (identical(parent, .GlobalEnv))
|
||||||
|
attach(op_env, name = environmentName(op_env))
|
||||||
|
else
|
||||||
|
parent.env(parent) = op_env
|
||||||
|
}
|
||||||
|
|
||||||
|
#' Unload a given module
|
||||||
|
#'
|
||||||
|
#' Unset the module variable that is being passed as a parameter, and remove the
|
||||||
|
#' loaded module from cache.
|
||||||
|
#' @param module reference to the module which should be unloaded
|
||||||
|
#' @note Any other references to the loaded modules remain unchanged, and will
|
||||||
|
#' still work. However, subsequently importing the module again will reload its
|
||||||
|
#' source files, which would not have happened without \code{unload}.
|
||||||
|
#' Unloading modules is primarily useful for testing during development, and
|
||||||
|
#' should not be used in production code.
|
||||||
|
#'
|
||||||
|
#' \code{unload} does not currently detach environments.
|
||||||
|
#' @seealso \code{import}
|
||||||
|
#' @seealso \code{reload}
|
||||||
|
#' @export
|
||||||
|
unload = function (module) {
|
||||||
|
stopifnot(inherits(module, 'module'))
|
||||||
|
module_ref = as.character(substitute(module))
|
||||||
|
rm(list = module_path(module), envir = .loaded_modules)
|
||||||
|
# unset the module reference in its scope, i.e. the caller’s environment or
|
||||||
|
# some parent thereof.
|
||||||
|
rm(list = module_ref, envir = parent.frame(), inherits = TRUE)
|
||||||
|
}
|
||||||
|
|
||||||
|
#' Reload a given module
|
||||||
|
#'
|
||||||
|
#' Remove the loaded module from the cache, forcing a reload. The newly reloaded
|
||||||
|
#' module is assigned to the module reference in the calling scope.
|
||||||
|
#' @param module reference to the module which should be unloaded
|
||||||
|
#' @note Any other references to the loaded modules remain unchanged, and will
|
||||||
|
#' still work. Reloading modules is primarily useful for testing during
|
||||||
|
#' development, and should not be used in production code.
|
||||||
|
#'
|
||||||
|
#' \code{reload} does not work correctly with attached environments.
|
||||||
|
#' @seealso \code{import}
|
||||||
|
#' @seealso \code{unload}
|
||||||
|
#' @export
|
||||||
|
reload = function (module) {
|
||||||
|
stopifnot(inherits(module, 'module'))
|
||||||
|
module_ref = as.character(substitute(module))
|
||||||
|
module_path = module_path(module)
|
||||||
|
module_name = module_name(module)
|
||||||
|
rm(list = module_path, envir = .loaded_modules)
|
||||||
|
#' @TODO Once we have `attach`, need also to take care of the search path
|
||||||
|
#' and whatnot.
|
||||||
|
mod_ns = do_import(module_name, module_path)
|
||||||
|
module_parent = parent.frame()
|
||||||
|
mod_env = exhibit_namespace(mod_ns, module_ref, module_parent)
|
||||||
|
assign(module_ref, mod_env, envir = module_parent, inherits = TRUE)
|
||||||
|
}
|
||||||
257
samples/Red/example.red
Normal file
257
samples/Red/example.red
Normal file
@@ -0,0 +1,257 @@
|
|||||||
|
Red [
|
||||||
|
Title: "Red console"
|
||||||
|
Author: ["Nenad Rakocevic" "Kaj de Vos"]
|
||||||
|
File: %console.red
|
||||||
|
Tabs: 4
|
||||||
|
Rights: "Copyright (C) 2012-2013 Nenad Rakocevic. All rights reserved."
|
||||||
|
License: {
|
||||||
|
Distributed under the Boost Software License, Version 1.0.
|
||||||
|
See https://github.com/dockimbel/Red/blob/master/BSL-License.txt
|
||||||
|
}
|
||||||
|
Purpose: "Just some code for testing Pygments colorizer"
|
||||||
|
Language: http://www.red-lang.org/
|
||||||
|
]
|
||||||
|
|
||||||
|
#system-global [
|
||||||
|
#either OS = 'Windows [
|
||||||
|
#import [
|
||||||
|
"kernel32.dll" stdcall [
|
||||||
|
AttachConsole: "AttachConsole" [
|
||||||
|
processID [integer!]
|
||||||
|
return: [integer!]
|
||||||
|
]
|
||||||
|
SetConsoleTitle: "SetConsoleTitleA" [
|
||||||
|
title [c-string!]
|
||||||
|
return: [integer!]
|
||||||
|
]
|
||||||
|
ReadConsole: "ReadConsoleA" [
|
||||||
|
consoleInput [integer!]
|
||||||
|
buffer [byte-ptr!]
|
||||||
|
charsToRead [integer!]
|
||||||
|
numberOfChars [int-ptr!]
|
||||||
|
inputControl [int-ptr!]
|
||||||
|
return: [integer!]
|
||||||
|
]
|
||||||
|
]
|
||||||
|
]
|
||||||
|
line-buffer-size: 16 * 1024
|
||||||
|
line-buffer: allocate line-buffer-size
|
||||||
|
][
|
||||||
|
#switch OS [
|
||||||
|
MacOSX [
|
||||||
|
#define ReadLine-library "libreadline.dylib"
|
||||||
|
]
|
||||||
|
#default [
|
||||||
|
#define ReadLine-library "libreadline.so.6"
|
||||||
|
#define History-library "libhistory.so.6"
|
||||||
|
]
|
||||||
|
]
|
||||||
|
#import [
|
||||||
|
ReadLine-library cdecl [
|
||||||
|
read-line: "readline" [ ; Read a line from the console.
|
||||||
|
prompt [c-string!]
|
||||||
|
return: [c-string!]
|
||||||
|
]
|
||||||
|
rl-bind-key: "rl_bind_key" [
|
||||||
|
key [integer!]
|
||||||
|
command [integer!]
|
||||||
|
return: [integer!]
|
||||||
|
]
|
||||||
|
rl-insert: "rl_insert" [
|
||||||
|
count [integer!]
|
||||||
|
key [integer!]
|
||||||
|
return: [integer!]
|
||||||
|
]
|
||||||
|
]
|
||||||
|
#if OS <> 'MacOSX [
|
||||||
|
History-library cdecl [
|
||||||
|
add-history: "add_history" [ ; Add line to the history.
|
||||||
|
line [c-string!]
|
||||||
|
]
|
||||||
|
]
|
||||||
|
]
|
||||||
|
]
|
||||||
|
|
||||||
|
rl-insert-wrapper: func [
|
||||||
|
[cdecl]
|
||||||
|
count [integer!]
|
||||||
|
key [integer!]
|
||||||
|
return: [integer!]
|
||||||
|
][
|
||||||
|
rl-insert count key
|
||||||
|
]
|
||||||
|
|
||||||
|
]
|
||||||
|
]
|
||||||
|
|
||||||
|
Windows?: system/platform = 'Windows
|
||||||
|
|
||||||
|
read-argument: routine [
|
||||||
|
/local
|
||||||
|
args [str-array!]
|
||||||
|
str [red-string!]
|
||||||
|
][
|
||||||
|
if system/args-count <> 2 [
|
||||||
|
SET_RETURN(none-value)
|
||||||
|
exit
|
||||||
|
]
|
||||||
|
args: system/args-list + 1 ;-- skip binary filename
|
||||||
|
str: simple-io/read-txt args/item
|
||||||
|
SET_RETURN(str)
|
||||||
|
]
|
||||||
|
|
||||||
|
init-console: routine [
|
||||||
|
str [string!]
|
||||||
|
/local
|
||||||
|
ret
|
||||||
|
][
|
||||||
|
#either OS = 'Windows [
|
||||||
|
;ret: AttachConsole -1
|
||||||
|
;if zero? ret [print-line "ReadConsole failed!" halt]
|
||||||
|
|
||||||
|
ret: SetConsoleTitle as c-string! string/rs-head str
|
||||||
|
if zero? ret [print-line "SetConsoleTitle failed!" halt]
|
||||||
|
][
|
||||||
|
rl-bind-key as-integer tab as-integer :rl-insert-wrapper
|
||||||
|
]
|
||||||
|
]
|
||||||
|
|
||||||
|
input: routine [
|
||||||
|
prompt [string!]
|
||||||
|
/local
|
||||||
|
len ret str buffer line
|
||||||
|
][
|
||||||
|
#either OS = 'Windows [
|
||||||
|
len: 0
|
||||||
|
print as c-string! string/rs-head prompt
|
||||||
|
ret: ReadConsole stdin line-buffer line-buffer-size :len null
|
||||||
|
if zero? ret [print-line "ReadConsole failed!" halt]
|
||||||
|
len: len + 1
|
||||||
|
line-buffer/len: null-byte
|
||||||
|
str: string/load as c-string! line-buffer len
|
||||||
|
][
|
||||||
|
line: read-line as c-string! string/rs-head prompt
|
||||||
|
if line = null [halt] ; EOF
|
||||||
|
|
||||||
|
#if OS <> 'MacOSX [add-history line]
|
||||||
|
|
||||||
|
str: string/load line 1 + length? line
|
||||||
|
; free as byte-ptr! line
|
||||||
|
]
|
||||||
|
SET_RETURN(str)
|
||||||
|
]
|
||||||
|
|
||||||
|
count-delimiters: function [
|
||||||
|
buffer [string!]
|
||||||
|
return: [block!]
|
||||||
|
][
|
||||||
|
list: copy [0 0]
|
||||||
|
c: none
|
||||||
|
|
||||||
|
foreach c buffer [
|
||||||
|
case [
|
||||||
|
escaped? [
|
||||||
|
escaped?: no
|
||||||
|
]
|
||||||
|
in-comment? [
|
||||||
|
switch c [
|
||||||
|
#"^/" [in-comment?: no]
|
||||||
|
]
|
||||||
|
]
|
||||||
|
'else [
|
||||||
|
switch c [
|
||||||
|
#"^^" [escaped?: yes]
|
||||||
|
#";" [if zero? list/2 [in-comment?: yes]]
|
||||||
|
#"[" [list/1: list/1 + 1]
|
||||||
|
#"]" [list/1: list/1 - 1]
|
||||||
|
#"{" [list/2: list/2 + 1]
|
||||||
|
#"}" [list/2: list/2 - 1]
|
||||||
|
]
|
||||||
|
]
|
||||||
|
]
|
||||||
|
]
|
||||||
|
list
|
||||||
|
]
|
||||||
|
|
||||||
|
do-console: function [][
|
||||||
|
buffer: make string! 10000
|
||||||
|
prompt: red-prompt: "red>> "
|
||||||
|
mode: 'mono
|
||||||
|
|
||||||
|
switch-mode: [
|
||||||
|
mode: case [
|
||||||
|
cnt/1 > 0 ['block]
|
||||||
|
cnt/2 > 0 ['string]
|
||||||
|
'else [
|
||||||
|
prompt: red-prompt
|
||||||
|
do eval
|
||||||
|
'mono
|
||||||
|
]
|
||||||
|
]
|
||||||
|
prompt: switch mode [
|
||||||
|
block ["[^-"]
|
||||||
|
string ["{^-"]
|
||||||
|
mono [red-prompt]
|
||||||
|
]
|
||||||
|
]
|
||||||
|
|
||||||
|
eval: [
|
||||||
|
code: load/all buffer
|
||||||
|
|
||||||
|
unless tail? code [
|
||||||
|
set/any 'result do code
|
||||||
|
|
||||||
|
unless unset? :result [
|
||||||
|
if 67 = length? result: mold/part :result 67 [ ;-- optimized for width = 72
|
||||||
|
clear back tail result
|
||||||
|
append result "..."
|
||||||
|
]
|
||||||
|
print ["==" result]
|
||||||
|
]
|
||||||
|
]
|
||||||
|
clear buffer
|
||||||
|
]
|
||||||
|
|
||||||
|
while [true][
|
||||||
|
unless tail? line: input prompt [
|
||||||
|
append buffer line
|
||||||
|
cnt: count-delimiters buffer
|
||||||
|
|
||||||
|
either Windows? [
|
||||||
|
remove skip tail buffer -2 ;-- clear extra CR (Windows)
|
||||||
|
][
|
||||||
|
append buffer lf ;-- Unix
|
||||||
|
]
|
||||||
|
|
||||||
|
switch mode [
|
||||||
|
block [if cnt/1 <= 0 [do switch-mode]]
|
||||||
|
string [if cnt/2 <= 0 [do switch-mode]]
|
||||||
|
mono [do either any [cnt/1 > 0 cnt/2 > 0][switch-mode][eval]]
|
||||||
|
]
|
||||||
|
]
|
||||||
|
]
|
||||||
|
]
|
||||||
|
|
||||||
|
q: :quit
|
||||||
|
|
||||||
|
if script: read-argument [
|
||||||
|
script: load script
|
||||||
|
either any [
|
||||||
|
script/1 <> 'Red
|
||||||
|
not block? script/2
|
||||||
|
][
|
||||||
|
print "*** Error: not a Red program!"
|
||||||
|
][
|
||||||
|
do skip script 2
|
||||||
|
]
|
||||||
|
quit
|
||||||
|
]
|
||||||
|
|
||||||
|
init-console "Red Console"
|
||||||
|
|
||||||
|
print {
|
||||||
|
-=== Red Console alpha version ===-
|
||||||
|
(only ASCII input supported)
|
||||||
|
}
|
||||||
|
|
||||||
|
do-console
|
||||||
124
samples/Red/example.reds
Normal file
124
samples/Red/example.reds
Normal file
@@ -0,0 +1,124 @@
|
|||||||
|
Red/System [
|
||||||
|
Title: "Red/System example file"
|
||||||
|
Purpose: "Just some code for testing Pygments colorizer"
|
||||||
|
Language: http://www.red-lang.org/
|
||||||
|
]
|
||||||
|
|
||||||
|
#include %../common/FPU-configuration.reds
|
||||||
|
|
||||||
|
; C types
|
||||||
|
|
||||||
|
#define time! long!
|
||||||
|
#define clock! long!
|
||||||
|
|
||||||
|
date!: alias struct! [
|
||||||
|
second [integer!] ; 0-61 (60?)
|
||||||
|
minute [integer!] ; 0-59
|
||||||
|
hour [integer!] ; 0-23
|
||||||
|
|
||||||
|
day [integer!] ; 1-31
|
||||||
|
month [integer!] ; 0-11
|
||||||
|
year [integer!] ; Since 1900
|
||||||
|
|
||||||
|
weekday [integer!] ; 0-6 since Sunday
|
||||||
|
yearday [integer!] ; 0-365
|
||||||
|
daylight-saving-time? [integer!] ; Negative: unknown
|
||||||
|
]
|
||||||
|
|
||||||
|
#either OS = 'Windows [
|
||||||
|
#define clocks-per-second 1000
|
||||||
|
][
|
||||||
|
; CLOCKS_PER_SEC value for Syllable, Linux (XSI-conformant systems)
|
||||||
|
; TODO: check for other systems
|
||||||
|
#define clocks-per-second 1000'000
|
||||||
|
]
|
||||||
|
|
||||||
|
#import [LIBC-file cdecl [
|
||||||
|
|
||||||
|
; Error handling
|
||||||
|
|
||||||
|
form-error: "strerror" [ ; Return error description.
|
||||||
|
code [integer!]
|
||||||
|
return: [c-string!]
|
||||||
|
]
|
||||||
|
print-error: "perror" [ ; Print error to standard error output.
|
||||||
|
string [c-string!]
|
||||||
|
]
|
||||||
|
|
||||||
|
|
||||||
|
; Memory management
|
||||||
|
|
||||||
|
make: "calloc" [ ; Allocate zero-filled memory.
|
||||||
|
chunks [size!]
|
||||||
|
size [size!]
|
||||||
|
return: [binary!]
|
||||||
|
]
|
||||||
|
resize: "realloc" [ ; Resize memory allocation.
|
||||||
|
memory [binary!]
|
||||||
|
size [size!]
|
||||||
|
return: [binary!]
|
||||||
|
]
|
||||||
|
]
|
||||||
|
|
||||||
|
JVM!: alias struct! [
|
||||||
|
reserved0 [int-ptr!]
|
||||||
|
reserved1 [int-ptr!]
|
||||||
|
reserved2 [int-ptr!]
|
||||||
|
|
||||||
|
DestroyJavaVM [function! [[JNICALL] vm [JVM-ptr!] return: [jint!]]]
|
||||||
|
AttachCurrentThread [function! [[JNICALL] vm [JVM-ptr!] penv [struct! [p [int-ptr!]]] args [byte-ptr!] return: [jint!]]]
|
||||||
|
DetachCurrentThread [function! [[JNICALL] vm [JVM-ptr!] return: [jint!]]]
|
||||||
|
GetEnv [function! [[JNICALL] vm [JVM-ptr!] penv [struct! [p [int-ptr!]]] version [integer!] return: [jint!]]]
|
||||||
|
AttachCurrentThreadAsDaemon [function! [[JNICALL] vm [JVM-ptr!] penv [struct! [p [int-ptr!]]] args [byte-ptr!] return: [jint!]]]
|
||||||
|
]
|
||||||
|
|
||||||
|
;just some datatypes for testing:
|
||||||
|
|
||||||
|
#some-hash
|
||||||
|
10-1-2013
|
||||||
|
quit
|
||||||
|
|
||||||
|
;binary:
|
||||||
|
#{00FF0000}
|
||||||
|
#{00FF0000 FF000000}
|
||||||
|
#{00FF0000 FF000000} ;with tab instead of space
|
||||||
|
2#{00001111}
|
||||||
|
64#{/wAAAA==}
|
||||||
|
64#{/wAAA A==} ;with space inside
|
||||||
|
64#{/wAAA A==} ;with tab inside
|
||||||
|
|
||||||
|
|
||||||
|
;string with char
|
||||||
|
{bla ^(ff) foo}
|
||||||
|
{bla ^(( foo}
|
||||||
|
;some numbers:
|
||||||
|
12
|
||||||
|
1'000
|
||||||
|
1.2
|
||||||
|
FF00FF00h
|
||||||
|
|
||||||
|
;some tests of hexa number notation with not common ending
|
||||||
|
[ff00h ff00h] ff00h{} FFh"foo" 00h(1 + 2) (AEh)
|
||||||
|
|
||||||
|
;normal words:
|
||||||
|
foo char
|
||||||
|
|
||||||
|
;get-word
|
||||||
|
:foo
|
||||||
|
|
||||||
|
;lit-word:
|
||||||
|
'foo 'foo
|
||||||
|
|
||||||
|
to-integer foo
|
||||||
|
foo/(a + 1)/b
|
||||||
|
|
||||||
|
call/output reform ['which interpreter] path: copy ""
|
||||||
|
|
||||||
|
version-1.1: 00010001h
|
||||||
|
|
||||||
|
#if type = 'exe [
|
||||||
|
push system/stack/frame ;-- save previous frame pointer
|
||||||
|
system/stack/frame: system/stack/top ;-- @@ reposition frame pointer just after the catch flag
|
||||||
|
]
|
||||||
|
push CATCH_ALL ;-- exceptions root barrier
|
||||||
|
push 0 ;-- keep stack aligned on 64-bit
|
||||||
@@ -306,6 +306,10 @@ class TestBlob < Test::Unit::TestCase
|
|||||||
assert blob("public/javascripts/angular.js").vendored?
|
assert blob("public/javascripts/angular.js").vendored?
|
||||||
assert blob("public/javascripts/angular.min.js").vendored?
|
assert blob("public/javascripts/angular.min.js").vendored?
|
||||||
|
|
||||||
|
# D3.js
|
||||||
|
assert blob("public/javascripts/d3.v3.js").vendored?
|
||||||
|
assert blob("public/javascripts/d3.v3.min.js").vendored?
|
||||||
|
|
||||||
# Fabric
|
# Fabric
|
||||||
assert blob("fabfile.py").vendored?
|
assert blob("fabfile.py").vendored?
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user