function foo(items) {\n var i;\n for (i = 0; i < items.length; i++) {\n alert(\"Ace Rocks \" + items[i]);\n }\n}\n\n\n\n\n\n\n"
},
{
"path": "build_support/mini_require.js",
"content": "/* ***** BEGIN LICENSE BLOCK *****\n * Distributed under the BSD license:\n *\n * Copyright (c) 2010, Ajax.org B.V.\n * All rights reserved.\n *\n * Redistribution and use in source and binary forms, with or without\n * modification, are permitted provided that the following conditions are met:\n * * Redistributions of source code must retain the above copyright\n * notice, this list of conditions and the following disclaimer.\n * * Redistributions in binary form must reproduce the above copyright\n * notice, this list of conditions and the following disclaimer in the\n * documentation and/or other materials provided with the distribution.\n * * Neither the name of Ajax.org B.V. nor the\n * names of its contributors may be used to endorse or promote products\n * derived from this software without specific prior written permission.\n *\n * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS \"AS IS\" AND\n * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED\n * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE\n * DISCLAIMED. IN NO EVENT SHALL AJAX.ORG B.V. BE LIABLE FOR ANY\n * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES\n * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;\n * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND\n * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT\n * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS\n * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.\n *\n * ***** END LICENSE BLOCK ***** */\n\n/**\n * Define a module along with a payload\n * @param module a name for the payload\n * @param payload a function to call with (require, exports, module) params\n */\n\n(function() {\n\nvar ACE_NAMESPACE = \"\";\n\nvar global = (function() { return this; })();\nif (!global && typeof window != \"undefined\") global = window; // strict mode\n\n\nif (!ACE_NAMESPACE && typeof requirejs !== \"undefined\")\n return;\n\n\nvar define = function(module, deps, payload) {\n if (typeof module !== \"string\") {\n if (define.original)\n define.original.apply(this, arguments);\n else {\n console.error(\"dropping module because define wasn\\'t a string.\");\n console.trace();\n }\n return;\n }\n if (arguments.length == 2)\n payload = deps;\n if (!define.modules[module]) {\n define.payloads[module] = payload;\n define.modules[module] = null;\n }\n};\n\ndefine.modules = {};\ndefine.payloads = {};\n\n/**\n * Get at functionality define()ed using the function above\n */\nvar _require = function(parentId, module, callback) {\n if (typeof module === \"string\") {\n var payload = lookup(parentId, module);\n if (payload != undefined) {\n callback && callback();\n return payload;\n }\n } else if (Object.prototype.toString.call(module) === \"[object Array]\") {\n var params = [];\n for (var i = 0, l = module.length; i < l; ++i) {\n var dep = lookup(parentId, module[i]);\n if (dep == undefined && require.original)\n return;\n params.push(dep);\n }\n return callback && callback.apply(null, params) || true;\n }\n};\n\nvar require = function(module, callback) {\n var packagedModule = _require(\"\", module, callback);\n if (packagedModule == undefined && require.original)\n return require.original.apply(this, arguments);\n return packagedModule;\n};\n\nvar normalizeModule = function(parentId, moduleName) {\n // normalize plugin requires\n if (moduleName.indexOf(\"!\") !== -1) {\n var chunks = moduleName.split(\"!\");\n return normalizeModule(parentId, chunks[0]) + \"!\" + normalizeModule(parentId, chunks[1]);\n }\n // normalize relative requires\n if (moduleName.charAt(0) == \".\") {\n var base = parentId.split(\"/\").slice(0, -1).join(\"/\");\n moduleName = base + \"/\" + moduleName;\n\n while(moduleName.indexOf(\".\") !== -1 && previous != moduleName) {\n var previous = moduleName;\n moduleName = moduleName.replace(/\\/\\.\\//, \"/\").replace(/[^\\/]+\\/\\.\\.\\//, \"\");\n }\n }\n return moduleName;\n};\n\n/**\n * Internal function to lookup moduleNames and resolve them by calling the\n * definition function if needed.\n */\nvar lookup = function(parentId, moduleName) {\n moduleName = normalizeModule(parentId, moduleName);\n\n var module = define.modules[moduleName];\n if (!module) {\n module = define.payloads[moduleName];\n if (typeof module === 'function') {\n var exports = {};\n var mod = {\n id: moduleName,\n uri: '',\n exports: exports,\n packaged: true\n };\n\n var req = function(module, callback) {\n return _require(moduleName, module, callback);\n };\n\n var returnValue = module(req, exports, mod);\n exports = returnValue || mod.exports;\n define.modules[moduleName] = exports;\n delete define.payloads[moduleName];\n }\n module = define.modules[moduleName] = exports || module;\n }\n return module;\n};\n\nfunction exportAce(ns) {\n var root = global;\n if (ns) {\n if (!global[ns])\n global[ns] = {};\n root = global[ns];\n }\n\n if (!root.define || !root.define.packaged) {\n define.original = root.define;\n root.define = define;\n root.define.packaged = true;\n }\n\n if (!root.require || !root.require.packaged) {\n require.original = root.require;\n root.require = require;\n root.require.packaged = true;\n }\n}\n\nexportAce(ACE_NAMESPACE);\n\n})();\n"
},
{
"path": "demo/autocompletion.html",
"content": "\n\n\n \n autoresizing editor\n\n
minHeight = 2 lines\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n" }, { "path": "demo/code_lens.html", "content": "\n\n\n \n
Show me!
}\n\n{visible ?Show me!
:Else show me!
}\n\n{name}
" }, { "path": "demo/kitchen-sink/docs/autohotkey.ahk", "content": "#NoEnv\nSetBatchLines -1\n\nCoordMode Mouse, Screen\nOnExit GuiClose\n\nzoom := 9\n\ncomputeSize(){\n\tglobal as_x\n\tas_x := Round(ws_x/zoom/2 - 0.5)\n\tif (zoom>1) {\n\t\tpix := Round(zoom)\n\t} ele {\n\t\tpix := 1\n\t}\n ToolTip Message %as_x% %zoom% %ws_x% %hws_x% \n}\n\nhdc_frame := DllCall(\"GetDC\", UInt, MagnifierID)\n\n; comment\nDrawCross(byRef x=\"\", rX,rY,z, dc){\n ;specify the style, thickness and color of the cross lines\n h_pen := DllCall( \"gdi32.dll\\CreatePen\", Int, 0, Int, 1, UInt, 0x0000FF)\n}\n\n;Ctrl ^; Shift +; Win #; Alt !\n^NumPadAdd::\n^WheelUp:: \n^;:: ;comment\n If(zoom < ws_x and ( A_ThisHotKey = \"^WheelUp\" or A_ThisHotKey =\"^NumPadAdd\") )\n\t\tzoom *= 1.189207115 ; sqrt(sqrt(2))\n\tGosub,setZoom\nreturn\n" }, { "path": "demo/kitchen-sink/docs/basic.bas", "content": "120 OPEN\"R\" #1 \"INVEN.DAT\",39\n125 FIELD#1,1 AS F$,30 AS D$, 2 AS Q$,2 AS R$,4 AS PH\n130 PRINT:PRINT \"FUNCTIONS:\":PRINT\n135 PRINT 1,\"INITIALIZE FILE\"\n140 PRINT 2 \"CREATE A NEW ENTRY\"\n150 PRINT 3,\"DISPLAY INVENTORY FOR ONE PART\"\n160 PRINT 4 \"ADD TO STOCK\"\n170 PRINT 5,\"SUBTRACT FROM STOCK\"\n180 PRINT 6,\"DISPLAY ALL ITEMS BELOW REORDER LEVEL\"\n220 PRINT:PRINT:INPUT\"FUNCTION\";FUNCTION\n225 IF (FUNCTION<1)OR(FUNCTION>6) THEN PRINT \"BAD FUNCTION NUMBER\":GOTO 130\n230 ON FUNCTION GOSUB 900,250,390,480,560,680\n240 GOTO 220\n560 REM REMOVE FROM STOCK\n570 GOSUB 840\n580 IF ASC(F$)=255 THEN PRINT \"NULL ENTRY\":RETURN\n590 PRINT DH\n600 INPUT \"QUANTITY TO SUBTRACT\";S%\n610 Q%=CVI(Q$)\n620 IF (Q%-S%)<0 THEN PRINT \"ONIY\";Q%; \"IN STOCK\":GOTO 600\n630 Q%=Q%-S%\n640 IF Q%={{author_name}}
\n \n\n" }, { "path": "demo/kitchen-sink/docs/cuttlefish.conf", "content": "include extras.conf # overflow config file\n\nring_size = 32\n\n# experimental\nanti_entropy = debug\n\n# logging\nlog.error.file = /var/log/error.log\nlog.console.file = /var/log/console.log\nlog.syslog = on\n" }, { "path": "demo/kitchen-sink/docs/d.d", "content": "#!/usr/bin/env rdmd\n// Computes average line length for standard input.\nimport std.stdio;\n\nvoid main() {\n ulong lines = 0;\n double sumLength = 0;\n foreach (line; stdin.byLine()) {\n ++lines;\n sumLength += line.length;\n }\n writeln(\"Average line length: \",\n lines ? sumLength / lines : 0);\n}" }, { "path": "demo/kitchen-sink/docs/dart.dart", "content": "// Go ahead and modify this example.\n\nimport \"dart:html\";\n\n// Computes the nth Fibonacci number.\nint fibonacci(int n) {\n if (n < 2) return n;\n return fibonacci(n - 1) + fibonacci(n - 2);\n}\n\n// Displays a Fibonacci number.\nvoid main() {\n int i = 20;\n String message = \"fibonacci($i) = ${fibonacci(i)}\";\n\n // This example uses HTML to display the result and it will appear\n // in a nested HTML frame (an iframe).\n document.body.append(new HeadingElement.h1()..appendText(message));\n}\n" }, { "path": "demo/kitchen-sink/docs/diff.diff", "content": "diff --git a/lib/ace/edit_session.js b/lib/ace/edit_session.js\nindex 23fc3fc..ed3b273 100644\n--- a/lib/ace/edit_session.js\n+++ b/lib/ace/edit_session.js\n@@ -51,6 +51,7 @@ var TextMode = require(\"./mode/text\").Mode;\n var Range = require(\"./range\").Range;\n var Document = require(\"./document\").Document;\n var BackgroundTokenizer = require(\"./background_tokenizer\").BackgroundTokenizer;\n+var SearchHighlight = require(\"./search_highlight\").SearchHighlight;\n \n /**\n * class EditSession\n@@ -307,6 +308,13 @@ var EditSession = function(text, mode) {\n return token;\n };\n \n+ this.highlight = function(re) {\n+ if (!this.$searchHighlight) {\n+ var highlight = new SearchHighlight(null, \"ace_selected-word\", \"text\");\n+ this.$searchHighlight = this.addDynamicMarker(highlight);\n+ }\n+ this.$searchHighlight.setRegexp(re);\n+ }\n /**\n * EditSession.setUndoManager(undoManager)\n * - undoManager (UndoManager): The new undo manager\n@@ -556,7 +564,8 @@ var EditSession = function(text, mode) {\n type : type || \"line\",\n renderer: typeof type == \"function\" ? type : null,\n clazz : clazz,\n- inFront: !!inFront\n+ inFront: !!inFront,\n+ id: id\n }\n \n if (inFront) {\ndiff --git a/lib/ace/editor.js b/lib/ace/editor.js\nindex 834e603..b27ec73 100644\n--- a/lib/ace/editor.js\n+++ b/lib/ace/editor.js\n@@ -494,7 +494,7 @@ var Editor = function(renderer, session) {\n * Emitted when a selection has changed.\n **/\n this.onSelectionChange = function(e) {\n- var session = this.getSession();\n+ var session = this.session;\n \n if (session.$selectionMarker) {\n session.removeMarker(session.$selectionMarker);\n@@ -509,12 +509,40 @@ var Editor = function(renderer, session) {\n this.$updateHighlightActiveLine();\n }\n \n- var self = this;\n- if (this.$highlightSelectedWord && !this.$wordHighlightTimer)\n- this.$wordHighlightTimer = setTimeout(function() {\n- self.session.$mode.highlightSelection(self);\n- self.$wordHighlightTimer = null;\n- }, 30, this);\n+ var re = this.$highlightSelectedWord && this.$getSelectionHighLightRegexp()\n };\ndiff --git a/lib/ace/search_highlight.js b/lib/ace/search_highlight.js\nnew file mode 100644\nindex 0000000..b2df779\n--- /dev/null\n+++ b/lib/ace/search_highlight.js\n@@ -0,0 +1,3 @@\n+new\n+empty file" }, { "path": "demo/kitchen-sink/docs/django.djt", "content": "{% extends \"base.html\" %}\n\n{% block title %}Ace Django Template{% endblock %}\n\n{% block content %}\nHello, {{ name|default:\"World\" }}!
\n{% endblock %}\n\n\n\n{% comment %}\n This content should be green.\n{% endcomment %}\n\n{#line comment#}
" }, { "path": "demo/kitchen-sink/docs/dot.dot", "content": "// Original source: http://www.graphviz.org/content/lion_share\n##\"A few people in the field of genetics are using dot to draw \"marriage node diagram\" pedigree drawings. Here is one I have done of a test pedigree from the FTREE pedigree drawing package (Lion Share was a racehorse).\" Contributed by David Duffy.\n\n##Command to get the layout: \"dot -Tpng thisfile > thisfile.png\"\n\ndigraph Ped_Lion_Share {\n# page = \"8.2677165,11.692913\" ;\nratio = \"auto\" ;\nmincross = 2.0 ;\nlabel = \"Pedigree Lion_Share\" ;\n\n\"001\" [shape=box , regular=1,style=filled,fillcolor=white ] ;\n\"002\" [shape=box , regular=1,style=filled,fillcolor=white ] ;\n\"003\" [shape=circle , regular=1,style=filled,fillcolor=white ] ;\n\"004\" [shape=box , regular=1,style=filled,fillcolor=white ] ;\n\"005\" [shape=box , regular=1,style=filled,fillcolor=white ] ;\n\"006\" [shape=circle , regular=1,style=filled,fillcolor=white ] ;\n\"007\" [shape=circle , regular=1,style=filled,fillcolor=white ] ;\n\"009\" [shape=circle , regular=1,style=filled,fillcolor=white ] ;\n\"014\" [shape=circle , regular=1,style=filled,fillcolor=white ] ;\n\"015\" [shape=circle , regular=1,style=filled,fillcolor=white ] ;\n\"016\" [shape=circle , regular=1,style=filled,fillcolor=white ] ;\n\"ZZ01\" [shape=circle , regular=1,style=filled,fillcolor=white ] ;\n\"ZZ02\" [shape=circle , regular=1,style=filled,fillcolor=white ] ;\n\"017\" [shape=circle , regular=1,style=filled,fillcolor=white ] ;\n\"012\" [shape=circle , regular=1,style=filled,fillcolor=white ] ;\n\"008\" [shape=box , regular=1,style=filled,fillcolor=white ] ;\n\"011\" [shape=box , regular=1,style=filled,fillcolor=white ] ;\n\"013\" [shape=box , regular=1,style=filled,fillcolor=white ] ;\n\"010\" [shape=box , regular=1,style=filled,fillcolor=white ] ;\n\"023\" [shape=circle , regular=1,style=filled,fillcolor=white ] ;\n\"020\" [shape=circle , regular=1,style=filled,fillcolor=white ] ;\n\"021\" [shape=circle , regular=1,style=filled,fillcolor=white ] ;\n\"018\" [shape=circle , regular=1,style=filled,fillcolor=white ] ;\n\"025\" [shape=circle , regular=1,style=filled,fillcolor=white ] ;\n\"019\" [shape=box , regular=1,style=filled,fillcolor=white ] ;\n\"022\" [shape=box , regular=1,style=filled,fillcolor=white ] ;\n\"024\" [shape=box , regular=1,style=filled,fillcolor=white ] ;\n\"027\" [shape=circle , regular=1,style=filled,fillcolor=white ] ;\n\"026\" [shape=box , regular=1,style=filled,fillcolor=white ] ;\n\"028\" [shape=box , regular=1,style=filled,fillcolor=grey ] ;\n\"marr0001\" [shape=diamond,style=filled,label=\"\",height=.1,width=.1] ;\n\"001\" -> \"marr0001\" [dir=none,weight=1] ;\n\"007\" -> \"marr0001\" [dir=none,weight=1] ;\n\"marr0001\" -> \"017\" [dir=none, weight=2] ;\n\"marr0002\" [shape=diamond,style=filled,label=\"\",height=.1,width=.1] ;\n\"001\" -> \"marr0002\" [dir=none,weight=1] ;\n\"ZZ02\" -> \"marr0002\" [dir=none,weight=1] ;\n\"marr0002\" -> \"012\" [dir=none, weight=2] ;\n\"marr0003\" [shape=diamond,style=filled,label=\"\",height=.1,width=.1] ;\n\"002\" -> \"marr0003\" [dir=none,weight=1] ;\n\"003\" -> \"marr0003\" [dir=none,weight=1] ;\n\"marr0003\" -> \"008\" [dir=none, weight=2] ;\n\"marr0004\" [shape=diamond,style=filled,label=\"\",height=.1,width=.1] ;\n\"002\" -> \"marr0004\" [dir=none,weight=1] ;\n\"006\" -> \"marr0004\" [dir=none,weight=1] ;\n\"marr0004\" -> \"011\" [dir=none, weight=2] ;\n\"marr0005\" [shape=diamond,style=filled,label=\"\",height=.1,width=.1] ;\n\"002\" -> \"marr0005\" [dir=none,weight=1] ;\n\"ZZ01\" -> \"marr0005\" [dir=none,weight=1] ;\n\"marr0005\" -> \"013\" [dir=none, weight=2] ;\n\"marr0006\" [shape=diamond,style=filled,label=\"\",height=.1,width=.1] ;\n\"004\" -> \"marr0006\" [dir=none,weight=1] ;\n\"009\" -> \"marr0006\" [dir=none,weight=1] ;\n\"marr0006\" -> \"010\" [dir=none, weight=2] ;\n\"marr0007\" [shape=diamond,style=filled,label=\"\",height=.1,width=.1] ;\n\"005\" -> \"marr0007\" [dir=none,weight=1] ;\n\"015\" -> \"marr0007\" [dir=none,weight=1] ;\n\"marr0007\" -> \"023\" [dir=none, weight=2] ;\n\"marr0008\" [shape=diamond,style=filled,label=\"\",height=.1,width=.1] ;\n\"005\" -> \"marr0008\" [dir=none,weight=1] ;\n\"016\" -> \"marr0008\" [dir=none,weight=1] ;\n\"marr0008\" -> \"020\" [dir=none, weight=2] ;\n\"marr0009\" [shape=diamond,style=filled,label=\"\",height=.1,width=.1] ;\n\"005\" -> \"marr0009\" [dir=none,weight=1] ;\n\"012\" -> \"marr0009\" [dir=none,weight=1] ;\n\"marr0009\" -> \"021\" [dir=none, weight=2] ;\n\"marr0010\" [shape=diamond,style=filled,label=\"\",height=.1,width=.1] ;\n\"008\" -> \"marr0010\" [dir=none,weight=1] ;\n\"017\" -> \"marr0010\" [dir=none,weight=1] ;\n\"marr0010\" -> \"018\" [dir=none, weight=2] ;\n\"marr0011\" [shape=diamond,style=filled,label=\"\",height=.1,width=.1] ;\n\"011\" -> \"marr0011\" [dir=none,weight=1] ;\n\"023\" -> \"marr0011\" [dir=none,weight=1] ;\n\"marr0011\" -> \"025\" [dir=none, weight=2] ;\n\"marr0012\" [shape=diamond,style=filled,label=\"\",height=.1,width=.1] ;\n\"013\" -> \"marr0012\" [dir=none,weight=1] ;\n\"014\" -> \"marr0012\" [dir=none,weight=1] ;\n\"marr0012\" -> \"019\" [dir=none, weight=2] ;\n\"marr0013\" [shape=diamond,style=filled,label=\"\",height=.1,width=.1] ;\n\"010\" -> \"marr0013\" [dir=none,weight=1] ;\n\"021\" -> \"marr0013\" [dir=none,weight=1] ;\n\"marr0013\" -> \"022\" [dir=none, weight=2] ;\n\"marr0014\" [shape=diamond,style=filled,label=\"\",height=.1,width=.1] ;\n\"019\" -> \"marr0014\" [dir=none,weight=1] ;\n\"020\" -> \"marr0014\" [dir=none,weight=1] ;\n\"marr0014\" -> \"024\" [dir=none, weight=2] ;\n\"marr0015\" [shape=diamond,style=filled,label=\"\",height=.1,width=.1] ;\n\"022\" -> \"marr0015\" [dir=none,weight=1] ;\n\"025\" -> \"marr0015\" [dir=none,weight=1] ;\n\"marr0015\" -> \"027\" [dir=none, weight=2] ;\n\"marr0016\" [shape=diamond,style=filled,label=\"\",height=.1,width=.1] ;\n\"024\" -> \"marr0016\" [dir=none,weight=1] ;\n\"018\" -> \"marr0016\" [dir=none,weight=1] ;\n\"marr0016\" -> \"026\" [dir=none, weight=2] ;\n\"marr0017\" [shape=diamond,style=filled,label=\"\",height=.1,width=.1] ;\n\"026\" -> \"marr0017\" [dir=none,weight=1] ;\n\"027\" -> \"marr0017\" [dir=none,weight=1] ;\n\"marr0017\" -> \"028\" [dir=none, weight=2] ;\n}\n" }, { "path": "demo/kitchen-sink/docs/drools.drl", "content": "/*\n * Copyright 2010 JBoss Inc\n *\n * Licensed under the Apache License, Version 2.0 (the \"License\");\n * you may not use this file except in compliance with the License.\n * You may obtain a copy of the License at\n *\n * http://www.apache.org/licenses/LICENSE-2.0\n *\n * Unless required by applicable law or agreed to in writing, software\n * distributed under the License is distributed on an \"AS IS\" BASIS,\n * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.\n * See the License for the specific language governing permissions and\n * limitations under the License.\n */\n\n/*\n Original source\n https://github.com/droolsjbpm/drools/blob/master/drools-examples/\n http://docs.jboss.org/drools/\n*/\npackage com.example.ace\n\nimport java.math.BigDecimal\nimport function my.package.Foo.hello\n\ndeclare FactType\n @author( Bob )\n id : String\n name : String @maxLength(100) @notnull\n\n value : BigDecimal\nend\n\ndeclare FactType2 extends AnotherType\nend\n\ndeclare trait TraitType extends com.package.AnotherType\nend\n\n\ndeclare trait GoldenCustomer\n balance : long @Alias( \"org.acme.foo.accountBalance\" )\nend\n\nglobal org.slf4j.Logger logger\n\n/**\n * @param name who we'll salute?\n */\nfunction String hello(String name) {\n return \"Hello \"+name+\"!\";\n}\n\nrule \"Trim all strings\"\n dialect \"java\"\n no-loop\nwhen // fdsfds\n $s : String(a == null || == \"empty\", $g : size)\n Cheese( name matches \"(Buffalo)?\\\\S*Mozarella\" )\n CheeseCounter( cheeses contains $var ) // contains with a variable\n CheeseCounter( cheese memberof $matureCheeses )\n Cheese( name soundslike 'foobar' )\n Message( routingValue str[startsWith] \"R1\" )\n Cheese( name in ( \"stilton\", \"cheddar\", $cheese ) )\n Person( eval( age == girlAge + 2 ), sex = 'M' )\nthen\n /**\n * TODO There mus be better way\n */\n retract($s);\n String a = \"fd\";\n a.toString();\n\n insert($s.trim());\nend\n\nquery isContainedIn( String x, String y )\n Location( x, y; )\n or\n ( Location( z, y; ) and isContainedIn( x, z; ) )\nend\n\nrule \"go\" salience 10\nwhen\n $s : String( )\nthen\n System.out.println( $s );\nend\n\nrule \"When all English buses are not red\"\nwhen\n not(forall( $bus : Bus( nationality == 'english')\n Bus( this == $bus, color = 'red' ) ))\nthen\n // What if all english buses are not red?\nend\n\nrule \"go1\"\nwhen\n String( this == \"go1\" )\n isContainedIn(\"Office\", \"House\"; )\nthen\n System.out.println( \"office is in the house\" );\nend\n\nrule \"go2\"\nwhen\n String( this == \"go2\" )\n isContainedIn(\"Draw\", \"House\"; )\nthen\n System.out.println( \"Draw in the House\" );\nend\n\n/**\n * Go Right\n */\nrule GoRight dialect \"mvel\" salience (Math.abs( $df.colDiff )) when\n $df : DirectionDiff(colDiff > 0 )\n $target : Cell( row == $df.row, col == ($df.col + 1) )\n CellContents( cell == $target, cellType != CellType.WALL )\n not Direction(character == $df.fromChar, horizontal == Direction.RIGHT )\nthen\n System.out.println( \"monster right\" );\n retract( $df );\n insert( new Direction($df.fromChar, Direction.RIGHT, Direction.NONE ) );\nend\n" }, { "path": "demo/kitchen-sink/docs/edifact.edi", "content": "UNB+UNOA:1+005435656:1+006415160:1+060515:1434+00000000000778'\nUNH+00000000000117+INVnrOIC:D:97B:UN'\nBGM+380+342459+9'\nDTM+3:20060515:102'\nRFF+ON:521052'\nNAD+BY+792820524::16++CUMMINS MID-RANGE ENGINE PLANT'\nNAD+SE+005435656::16++GENERAL WIDGET COMPANY'\nCUX+1:USD'\nLIN+1++157870:IN'\nIMD+F++:::WIDGET'\nQTY+47:1020:EA'\nALI+US'\nMOA+203:1202.58'\nPRI+INV:1.179'\nLIN+2++157871:IN'\nIMD+F++:::DIFFERENT WIDGET'\nQTY+47:20:EA'\nALI+JP'\nMOA+203:410'\nPRI+INV:20.5'\nUNS+S'\nMOA+39:2137.58'\nALC+C+ABG'\nMOA+8:525'\nUNT+23+00000000000117'\nUNZ+1+00000000000778'" }, { "path": "demo/kitchen-sink/docs/eiffel.e", "content": "note\n\tdescription: \"Represents a person.\"\n\nclass\n\tPERSON\n\ncreate\n\tmake, make_unknown\n\nfeature {NONE} -- Creation\n\n\tmake (a_name: like name)\n\t\t\t-- Create a person with `a_name' as `name'.\n\t\tdo\n\t\t\tname := a_name\n\t\tensure\n\t\t\tname = a_name\n\t\tend\n\n\tmake_unknown\n\t\tdo ensure\n\t\t\tname = Void\n\t\tend\n\nfeature -- Access\n\n\tname: detachable STRING\n\t\t\t-- Full name or Void if unknown.\n\nend" }, { "path": "demo/kitchen-sink/docs/ejs.ejs", "content": "\n\n \n| Name | \nSize | \n
|---|---|
| .. | \n\n |
| \n \">\n \"><%= entry.name %>\n | \n<%= entry.size %> | \n
\n Today's date: <%= (new java.util.Date()).toLocaleString()%>\n
\n <%! int day = 3; %> \n \n\n Today's date: <%= (new java.util.Date()).toLocaleString()%>\n
\n \n<%! int i = 0; %>\nSelect Languages:
\n\n \n\n <%\n String select[] = request.getParameterValues(\"id\"); \n if (select != null && select.length != 0) {\n out.println(\"You have selected: \");\n for (int i = 0; i < select.length; i++) {\n out.println(select[i]); \n }\n }\n %>\n\n\n <% \n switch(day) {\n case 0:\n out.println(\"It\\'s Sunday.\");\n break;\n case 1:\n out.println(\"It\\'s Monday.\");\n break;\n case 2:\n out.println(\"It\\'s Tuesday.\");\n break;\n case 3:\n out.println(\"It\\'s Wednesday.\");\n break;\n case 4:\n out.println(\"It\\'s Thursday.\");\n break;\n case 5:\n out.println(\"It\\'s Friday.\");\n break;\n //hello\n default:\n out.println(\"It's Saturday.\");\n }\n %>\n\n
\n Keywords here are not highlighted, for example class or instance.\n
\n );\n}"
},
{
"path": "demo/kitchen-sink/docs/julia.jl",
"content": "for op = (:+, :*, :&, :|, :$)\n @eval ($op)(a,b,c) = ($op)(($op)(a,b),c)\nend\n\nv = α';\nfunction g(x,y)\n return x * y\n x + y\nend\n\ncd(\"data\") do\n open(\"outfile\", \"w\") do f\n write(f, data)\n end\nend\n"
},
{
"path": "demo/kitchen-sink/docs/kotlin.kt",
"content": "#!/usr/bin/env kotlinc -script\n\n/*Taken from http://try.kotlinlang.org/#/Examples/Longer%20examples/Life/Life.kt*/\n/**\n * This is a straightforward implementation of The Game of Life\n * See http://en.wikipedia.org/wiki/Conway's_Game_of_Life\n */\npackage life\n\n/*\n * A field where cells live. Effectively immutable\n */\nclass Field(\n val width: Int,\n val height: Int,\n // This function tells the constructor which cells are alive\n // if init(i, j) is true, the cell (i, j) is alive\n init: (Int, Int) -> Boolean\n) {\n private val live: ArrayMy Webpage
\n\n- 0\" id=\"navigation\">\n {foreach [a, b, 'x', 10] as $item}\n
- {test($item->caption)} \n {/foreach}\n
- \n {% for product in products %}\n
- \n
{{ product.title }}
\n Only {{ product.price | format_as_money }}\n\n{{ product.description | prettyprint | truncate: 200 }}
\n\n \n {% endfor %}\n
Filters
\nThe word \"tobi\" in uppercase: {{ 'tobi' | upcase }}
\nThe word \"tobi\" has {{ 'tobi' | size }} letters!
\nChange \"Hello world\" to \"Hi world\": {{ 'Hello world' | replace: 'Hello', 'Hi' }}
\nThe date today is {{ 'now' | date: \"%Y %b %d\" }}
\n\n\nIf
\n\n {% if user.name == 'tobi' or user.name == 'marc' %}\n hi marc or tobi\n {% endif %}\n
\n\nComments
\n\n{% # Line Comment %}\n\n{% comment %}\n Block Comment\n{% endcomment %}\n\nCase
\n\n {% case template %}\n {% when 'index' %}\n Welcome\n {% when 'product' %}\n {{ product.vendor | link_to_vendor }} / {{ product.title }}\n {% else %}\n {{ page_title }}\n {% endcase %}\n
\n\n\nFor Loops
\n\n {% for item in array %}\n {{ item }}\n {% endfor %}\n
\n\n\nTables
\n\n {% tablerow item in items cols: 3 %}\n {% if tablerowloop.col_first %}\n First column: {{ item.variable }}\n {% else %}\n Different column: {{ item.variable }}\n {% endif %}\n {% endtablerow %}\n
\n\nEmbedded Code Blocks
\n\nThis support Shopify Liquid variation JSON schema code blocks\n\n{% schema %}\n {\n \"string\": \"bar\",\n \"boolean\": true,\n \"number\": 100,\n \"object\": {\n \"array\": [100, false, \"string\", {}, [] ]\n }\n }\n{% endschema %}\n\nThis support Shopify Liquid variation Stylesheet and Style code blocks\n\n{% style %}\n .class {\n font-size: 10px; /* comment */\n }\n{% endstyle %}\n\n{% stylesheet %}\n .class {\n font-size: 10px; /* comment */\n }\n{% endstylesheet %}\n\nThis support Shopify Liquid variation JavaScript code blocks\n\n{% javascript %}\n\n function foo (param) {\n\n return 'something' // comment\n }\n\n{% endjavascript %}\n" }, { "path": "demo/kitchen-sink/docs/lisp.lisp", "content": "(defun prompt-for-cd ()\n \"Prompts\n for CD\"\n (prompt-read \"Title\" 1.53 1 2/4 1.7 1.7e0 2.9E-4 +42 -7 #b001 #b001/100 #o777 #O777 #xabc55 #c(0 -5.6))\n (prompt-read \"Artist\" &rest)\n (or (parse-integer (prompt-read \"Rating\") :junk-allowed t) 0)\n (if x (format t \"yes\") (format t \"no\" nil) ;and here comment\n ) 0xFFLL -23ull\n ;; second line comment\n '(+ 1 2)\n (defvar *lines*) ; list of all lines\n (position-if-not #'sys::whitespacep line :start beg))\n (quote (privet 1 2 3))\n '(hello world)\n (* 5 7)\n (1 2 34 5)\n (:use \"aaaa\")\n (let ((x 10) (y 20))\n (print (+ x y))\n ) LAmbDa\n\n \"asdad\\0eqweqe\"" }, { "path": "demo/kitchen-sink/docs/livescript.ls", "content": "# Defines an editing mode for [Ace](https://ace.c9.io).\n#\n# Open [test/ace.html](../test/ace.html) to test.\n\nrequire, exports, module <-! define \\ace/mode/ls\n\nidentifier = /(?![\\d\\s])[$\\w\\xAA-\\uFFDC](?:(?!\\s)[$\\w\\xAA-\\uFFDC]|-[A-Za-z])*/$\n\nexports.Mode = class LiveScriptMode extends require(\\ace/mode/text)Mode\n ->\n @$tokenizer =\n new (require \\ace/tokenizer)Tokenizer LiveScriptMode.Rules\n if require \\ace/mode/matching_brace_outdent\n @$outdent = new that.MatchingBraceOutdent\n\n indenter = // (?\n : [({[=:]\n | [-~]>\n | \\b (?: e(?:lse|xport) | d(?:o|efault) | t(?:ry|hen) | finally |\n import (?:\\s* all)? | const | var |\n let | new | catch (?:\\s* #identifier)? )\n ) \\s* $ //\n\n getNextLineIndent: (state, line, tab) ->\n indent = @$getIndent line\n {tokens} = @$tokenizer.getLineTokens line, state\n unless tokens.length and tokens[*-1]type is \\comment\n indent += tab if state is \\start and indenter.test line\n indent\n\n toggleCommentLines: (state, doc, startRow, endRow) ->\n comment = /^(\\s*)#/; range = new (require \\ace/range)Range 0 0 0 0\n for i from startRow to endRow\n if out = comment.test line = doc.getLine i\n then line.=replace comment, \\$1\n else line.=replace /^\\s*/ \\$&#\n range.end.row = range.start.row = i\n range.end.column = line.length + 1\n doc.replace range, line\n 1 - out * 2\n\n checkOutdent: (state, line, input) -> @$outdent?checkOutdent line, input\n\n autoOutdent: (state, doc, row) -> @$outdent?autoOutdent doc, row\n\n### Highlight Rules\n\nkeywordend = /(?![$\\w]|-[A-Za-z]|\\s*:(?![:=]))/$\nstringfill = token: \\string, regex: '.+'\n\nLiveScriptMode.Rules =\n start:\n * token: \\keyword\n regex: //(?\n :t(?:h(?:is|row|en)|ry|ypeof!?)\n |c(?:on(?:tinue|st)|a(?:se|tch)|lass)\n |i(?:n(?:stanceof)?|mp(?:ort(?:\\s+all)?|lements)|[fs])\n |d(?:e(?:fault|lete|bugger)|o)\n |f(?:or(?:\\s+own)?|inally|unction)\n |s(?:uper|witch)\n |e(?:lse|x(?:tends|port)|val)\n |a(?:nd|rguments)\n |n(?:ew|ot)\n |un(?:less|til)\n |w(?:hile|ith)\n |o[fr]|return|break|let|var|loop\n )//$ + keywordend\n\n * token: \\constant.language\n regex: '(?:true|false|yes|no|on|off|null|void|undefined)' + keywordend\n\n * token: \\invalid.illegal\n regex: '(?\n :p(?:ackage|r(?:ivate|otected)|ublic)\n |i(?:mplements|nterface)\n |enum|static|yield\n )' + keywordend\n\n * token: \\language.support.class\n regex: '(?\n :R(?:e(?:gExp|ferenceError)|angeError)\n |S(?:tring|yntaxError)\n |E(?:rror|valError)\n |Array|Boolean|Date|Function|Number|Object|TypeError|URIError\n )' + keywordend\n\n * token: \\language.support.function\n regex: '(?\n :is(?:NaN|Finite)\n |parse(?:Int|Float)\n |Math|JSON\n |(?:en|de)codeURI(?:Component)?\n )' + keywordend\n\n * token: \\variable.language\n regex: '(?:t(?:hat|il|o)|f(?:rom|allthrough)|it|by|e)' + keywordend\n\n * token: \\identifier\n regex: identifier + /\\s*:(?![:=])/$\n\n * token: \\variable\n regex: identifier\n\n * token: \\keyword.operator\n regex: /(?:\\.{3}|\\s+\\?)/$\n\n * token: \\keyword.variable\n regex: /(?:@+|::|\\.\\.)/$\n next : \\key\n\n * token: \\keyword.operator\n regex: /\\.\\s*/$\n next : \\key\n\n * token: \\string\n regex: /\\\\\\S[^\\s,;)}\\]]*/$\n\n * token: \\string.doc\n regex: \\'''\n next : \\qdoc\n\n * token: \\string.doc\n regex: \\\"\"\"\n next : \\qqdoc\n\n * token: \\string\n regex: \\'\n next : \\qstring\n\n * token: \\string\n regex: \\\"\n next : \\qqstring\n\n * token: \\string\n regex: \\`\n next : \\js\n\n * token: \\string\n regex: '<\\\\['\n next : \\words\n\n * token: \\string.regex\n regex: \\//\n next : \\heregex\n\n * token: \\comment.doc\n regex: '/\\\\*'\n next : \\comment\n\n * token: \\comment\n regex: '#.*'\n\n * token: \\string.regex\n regex: //\n /(?: [^ [ / \\n \\\\ ]*\n (?: (?: \\\\.\n | \\[ [^\\]\\n\\\\]* (?:\\\\.[^\\]\\n\\\\]*)* \\]\n ) [^ [ / \\n \\\\ ]*\n )*\n )/ [gimy$]{0,4}\n //$\n next : \\key\n\n * token: \\constant.numeric\n regex: '(?:0x[\\\\da-fA-F][\\\\da-fA-F_]*\n |(?:[2-9]|[12]\\\\d|3[0-6])r[\\\\da-zA-Z][\\\\da-zA-Z_]*\n |(?:\\\\d[\\\\d_]*(?:\\\\.\\\\d[\\\\d_]*)?|\\\\.\\\\d[\\\\d_]*)\n (?:e[+-]?\\\\d[\\\\d_]*)?[\\\\w$]*)'\n\n * token: \\lparen\n regex: '[({[]'\n\n * token: \\rparen\n regex: '[)}\\\\]]'\n next : \\key\n\n * token: \\keyword.operator\n regex: \\\\\\S+\n\n * token: \\text\n regex: \\\\\\s+\n\n heregex:\n * token: \\string.regex\n regex: '.*?//[gimy$?]{0,4}'\n next : \\start\n * token: \\string.regex\n regex: '\\\\s*#{'\n * token: \\comment.regex\n regex: '\\\\s+(?:#.*)?'\n * token: \\string.regex\n regex: '\\\\S+'\n\n key:\n * token: \\keyword.operator\n regex: '[.?@!]+'\n * token: \\identifier\n regex: identifier\n next : \\start\n * token: \\text\n regex: '.'\n next : \\start\n\n comment:\n * token: \\comment.doc\n regex: '.*?\\\\*/'\n next : \\start\n * token: \\comment.doc\n regex: '.+'\n\n qdoc:\n token: \\string\n regex: \".*?'''\"\n next : \\key\n stringfill\n\n qqdoc:\n token: \\string\n regex: '.*?\"\"\"'\n next : \\key\n stringfill\n\n qstring:\n token: \\string\n regex: /[^\\\\']*(?:\\\\.[^\\\\']*)*'/$\n next : \\key\n stringfill\n\n qqstring:\n token: \\string\n regex: /[^\\\\\"]*(?:\\\\.[^\\\\\"]*)*\"/$\n next : \\key\n stringfill\n\n js:\n token: \\string\n regex: /[^\\\\`]*(?:\\\\.[^\\\\`]*)*`/$\n next : \\key\n stringfill\n\n words:\n token: \\string\n regex: '.*?\\\\]>'\n next : \\key\n stringfill\n" }, { "path": "demo/kitchen-sink/docs/logiql.logic", "content": "// ancestors\nparentof(\"douglas\", \"john\").\nparentof(\"john\", \"bob\").\nparentof(\"bob\", \"ebbon\").\n\nparentof(\"douglas\", \"jane\").\nparentof(\"jane\", \"jan\").\n\nancestorof(A, B) <- parentof(A, B).\nancestorof(A, C) <- ancestorof(A, B), parentof(B,C).\n\ngrandparentof(A, B) <- parentof(A, C), parentof(C, B).\n\ncousins(A,B) <- grandparentof(C,A), grandparentof(C,B).\n\nparentof[`arg](A, B) -> int[32](A), !string(B)." }, { "path": "demo/kitchen-sink/docs/logtalk.lgt", "content": ":- object(bottles).\n\n\t:- initialization(sing(99)).\n\n\tsing(0) :-\n\t\twrite('No more bottles of beer on the wall, no more bottles of beer.'), nl,\n\t\twrite('Go to the store and buy some more, 99 bottles of beer on the wall.'), nl, nl.\n\tsing(N) :-\n\t\tN > 0,\n\t\tN2 is N - 1,\n\t\tbeers(N), write(' of beer on the wall, '), beers(N), write(' of beer.'), nl,\n\t\twrite('Take one down and pass it around, '), beers(N2), write(' of beer on the wall.'), nl, nl,\n\t\tsing(N2).\n\n\tbeers(0) :-\n\t\twrite('no more bottles').\n\tbeers(1) :-\n\t\twrite('1 bottle').\n\tbeers(N) :-\n\t\tN > 1,\n\t\twrite(N), write(' bottles').\n\n:- end_object.\n" }, { "path": "demo/kitchen-sink/docs/lsl.lsl", "content": "/*\n Testing syntax highlighting\n of Ace Editor\n for the Linden Scripting Language\n*/\n\ninteger someIntNormal = 3672;\ninteger someIntHex = 0x00000000;\ninteger someIntMath = PI_BY_TWO;\n\ninteger event = 5673; // invalid.illegal\n\nkey someKeyTexture = TEXTURE_DEFAULT;\nstring someStringSpecial = EOF;\n\nsome_user_defined_function_without_return_type(string inputAsString)\n{\n llSay(PUBLIC_CHANNEL, inputAsString);\n}\n\nstring user_defined_function_returning_a_string(key inputAsKey)\n{\n return (string)inputAsKey;\n}\n\ndefault\n{\n state_entry()\n {\n key someKey = NULL_KEY;\n someKey = llGetOwner();\n\n string someString = user_defined_function_returning_a_string(someKey);\n\n some_user_defined_function_without_return_type(someString);\n }\n\n touch_start(integer num_detected)\n {\n list agentsInRegion = llGetAgentList(AGENT_LIST_REGION, []);\n integer numOfAgents = llGetListLength(agentsInRegion);\n\n integer index; // defaults to 0\n for (; index <= numOfAgents - 1; index++) // for each agent in region\n {\n llRegionSayTo(llList2Key(agentsInRegion, index), PUBLIC_CHANNEL, \"Hello, Avatar!\");\n }\n }\n\n touch_end(integer num_detected)\n {\n someIntNormal = 3672;\n someIntHex = 0x00000000;\n someIntMath = PI_BY_TWO;\n\n event = 5673; // invalid.illegal\n\n someKeyTexture = TEXTURE_DEFAULT;\n someStringSpecial = EOF;\n\n llSetInventoryPermMask(\"some item\", MASK_NEXT, PERM_ALL); // reserved.godmode\n\n llWhisper(PUBLIC_CHANNEL, \"Leaving \\\"default\\\" now...\");\n state other;\n }\n}\n\nstate other\n{\n state_entry()\n {\n llWhisper(PUBLIC_CHANNEL, \"Entered \\\"state other\\\", returning to \\\"default\\\" again...\");\n state default;\n }\n}\n" }, { "path": "demo/kitchen-sink/docs/lua.lua", "content": "--[[--\nnum_args takes in 5.1 byte code and extracts the number of arguments\nfrom its function header.\n--]]--\n\nfunction int(t)\n\treturn t:byte(1)+t:byte(2)*0x100+t:byte(3)*0x10000+t:byte(4)*0x1000000\nend\n\nfunction num_args(func)\n\tlocal dump = string.dump(func)\n\tlocal offset, cursor = int(dump:sub(13)), offset + 26\n\t--Get the params and var flag (whether there's a ... in the param)\n\treturn dump:sub(cursor):byte(), dump:sub(cursor+1):byte()\nend\n\n-- Usage:\nnum_args(function(a,b,c,d, ...) end) -- return 4, 7\n\n-- Python styled string format operator\nlocal gm = debug.getmetatable(\"\")\n\ngm.__mod=function(self, other)\n if type(other) ~= \"table\" then other = {other} end\n for i,v in ipairs(other) do other[i] = tostring(v) end\n return self:format(unpack(other))\nend\n\nprint([===[\n blah blah %s, (%d %d)\n]===]%{\"blah\", num_args(int)})\n\n--[=[--\ntable.maxn is deprecated, use # instead.\n--]=]--\nprint(table.maxn{1,2,[4]=4,[8]=8}) -- outputs 8 instead of 2\n\nprint(5 --[[ blah ]])\n" }, { "path": "demo/kitchen-sink/docs/luapage.lp", "content": "\n\n<% --[[--\n index.lp from the Kepler Project's LuaDoc HTML doclet.\n http://keplerproject.github.com/luadoc/\n--]] %>\n\n\n\n
\t\n\n\n"
},
{
"path": "demo/kitchen-sink/docs/lucene.lucene",
"content": "(title:\"foo bar\" AND body:\"quick fox\") OR title:fox"
},
{
"path": "demo/kitchen-sink/docs/markdown.md",
"content": "Ace (Ajax.org Cloud9 Editor)\n============================\n\nAce is a standalone code editor written in JavaScript. Our goal is to create a browser based editor that matches and extends the features, usability and performance of existing native editors such as TextMate, Vim or Eclipse. It can be easily embedded in any web page or JavaScript application. Ace is developed as the primary editor for [Cloud9 IDE](http://www.cloud9ide.com/) and the successor of the Mozilla Skywriter (Bespin) Project.\n\nFeatures\n--------\n\n* Syntax highlighting\n* Automatic indent and outdent\n* An optional command line\n* Handles huge documents (100,000 lines and more are no problem)\n* Fully customizable key bindings including VI and Emacs modes\n* Themes (TextMate themes can be imported)\n* Search and replace with regular expressions\n* Highlight matching parentheses\n* Toggle between soft tabs and real tabs\n* Displays hidden characters\n* Drag and drop text using the mouse\n* Line wrapping\n* Unstructured / user code folding\n* Live syntax checker (currently JavaScript/CoffeeScript)\n\nTake Ace for a spin!\n--------------------\n\nCheck out the Ace live [demo](http://ajaxorg.github.com/ace/) or get a [Cloud9 IDE account](http://run.cloud9ide.com) to experience Ace while editing one of your own GitHub projects.\n\nIf you want, you can use Ace as a textarea replacement thanks to the [Ace Bookmarklet](http://ajaxorg.github.com/ace/build/textarea/editor.html).\n\nHistory\n-------\n\nPreviously known as “Bespin” and “Skywriter” it’s now known as Ace (Ajax.org Cloud9 Editor)! Bespin and Ace started as two independent projects, both aiming to build a no-compromise code editor component for the web. Bespin started as part of Mozilla Labs and was based on the canvas tag, while Ace is the Editor component of the Cloud9 IDE and is using the DOM for rendering. After the release of Ace at JSConf.eu 2010 in Berlin the Skywriter team decided to merge Ace with a simplified version of Skywriter's plugin system and some of Skywriter's extensibility points. All these changes have been merged back to Ace. Both Ajax.org and Mozilla are actively developing and maintaining Ace.\n\nGetting the code\n----------------\n\nAce is a community project. We actively encourage and support contributions. The Ace source code is hosted on GitHub. It is released under the BSD License. This license is very simple, and is friendly to all kinds of projects, whether open source or not. Take charge of your editor and add your favorite language highlighting and keybindings!\n\n```bash\n git clone git://github.com/ajaxorg/ace.git\n cd ace\n git submodule update --init --recursive\n```\n\nEmbedding Ace\n-------------\n\nAce can be easily embedded into any existing web page. The Ace git repository ships with a pre-packaged version of Ace inside of the `build` directory. The same packaged files are also available as a separate [download](https://github.com/ajaxorg/ace/downloads). Simply copy the contents of the `src` subdirectory somewhere into your project and take a look at the included demos of how to use Ace.\n\nThe easiest version is simply:\n\n```html\n \n\t\n\t
\n\n\n\t\n
\n\n \n\n
\n\n\n\n\n<%if not options.nomodules and #doc.modules > 0 then%>\n\n\n<%for _, modulename in ipairs(doc.modules) do%>\n\t
\n<%end%>\n\n\n\n<%if not options.nofiles and #doc.files > 0 then%>\n\n\n<%for _, filepath in ipairs(doc.files) do%>\n\t
\n<%end%>\n\n
\n\nModules
\n| \"><%=modulename%> | \n\t\t<%=doc.modules[modulename].summary%> | \n\t
Files
\n| \"><%=filepath%> | \n\t\t\n\t |
\n\t
\n\nsome text
\n \n \n```\n\nWith \"editor\" being the id of the DOM element, which should be converted to an editor. Note that this element must be explicitly sized and positioned `absolute` or `relative` for Ace to work. e.g.\n\n```css\n #editor {\n position: absolute;\n width: 500px;\n height: 400px;\n }\n```\n\nTo change the theme simply include the Theme's JavaScript file\n\n```html\n \n```\n\nand configure the editor to use the theme:\n\n```javascript\n editor.setTheme(\"ace/theme/twilight\");\n```\n\nBy default the editor only supports plain text mode; many other languages are available as separate modules. After including the mode's JavaScript file:\n\n```html\n \n```\n\nThen the mode can be used like this:\n\n```javascript\n var JavaScriptMode = require(\"ace/mode/javascript\").Mode;\n editor.getSession().setMode(new JavaScriptMode());\n```\n\nDocumentation\n-------------\n\nYou find a lot more sample code in the [demo app](https://github.com/ajaxorg/ace/blob/master/demo/demo.js).\n\nThere is also some documentation on the [wiki page](https://github.com/ajaxorg/ace/wiki).\n\nIf you still need help, feel free to drop a mail on the [ace mailing list](http://groups.google.com/group/ace-discuss).\n\nRunning Ace\n-----------\n\nAfter the checkout Ace works out of the box. No build step is required. Open 'editor.html' in any browser except Google Chrome. Google Chrome doesn't allow XMLHTTPRequests from files loaded from disc (i.e. with a file:/// URL). To open Ace in Chrome simply start the bundled mini HTTP server:\n\n```bash\n ./static.py\n```\n\nOr using Node.JS\n\n```bash\n ./static.js\n```\n\nThe editor can then be opened at http://localhost:8888/index.html.\n\nPackage Ace\n-----------\n\nTo package Ace we use the dryice build tool developed by the Mozilla Skywriter team. Before you can build you need to make sure that the submodules are up to date.\n\n```bash\n git submodule update --init --recursive\n```\n\nAfterwards Ace can be built by calling\n\n```bash\n ./Makefile.dryice.js normal\n```\n\nThe packaged Ace will be put in the 'build' folder.\n\nTo build the bookmarklet version execute\n\n```bash\n ./Makefile.dryice.js bm\n```\n\nRunning the Unit Tests\n----------------------\n\nThe Ace unit tests run on node.js. Before the first run a couple of node modules have to be installed. The easiest way to do this is by using the node package manager (npm). In the Ace base directory simply call\n\n```bash\n npm link .\n```\n\nTo run the tests call:\n\n```bash\n node lib/ace/test/all.js\n```\n\nYou can also run the tests in your browser by serving:\n\n http://localhost:8888/lib/ace/test/tests.html\n\nThis makes debugging failing tests way more easier.\n\nContributing\n------------\n\nAce wouldn't be what it is without contributions! Feel free to fork and improve/enhance Ace any way you want. If you feel that the editor or the Ace community will benefit from your changes, please open a pull request. To protect the interests of the Ace contributors and users we require contributors to sign a Contributors License Agreement (CLA) before we pull the changes into the main repository. Our CLA is the simplest of agreements, requiring that the contributions you make to an ajax.org project are only those you're allowed to make. This helps us significantly reduce future legal risk for everyone involved. It is easy, helps everyone, takes ten minutes, and only needs to be completed once. There are two versions of the agreement:\n\n1. [The Individual CLA](https://github.com/ajaxorg/ace/raw/master/doc/Contributor_License_Agreement-v2.pdf): use this version if you're working on an ajax.org in your spare time, or can clearly claim ownership of copyright in what you'll be submitting.\n2. [The Corporate CLA](https://github.com/ajaxorg/ace/raw/master/doc/Corporate_Contributor_License_Agreement-v2.pdf): have your corporate lawyer review and submit this if your company is going to be contributing to ajax.org projects\n\nIf you want to contribute to an ajax.org project please print the CLA and fill it out and sign it. Then either send it by snail mail or fax to us or send it back scanned (or as a photo) by email.\n\nEmail: fabian.jakobs@web.de\n\nFax: +31 (0) 206388953\n\nAddress: Ajax.org B.V.\n Keizersgracht 241\n 1016 EA, Amsterdam\n the Netherlands"
},
{
"path": "demo/kitchen-sink/docs/mask.mask",
"content": "/* Mask Syntax Demo */\n\ndiv > ' Test ~[name]';\n\ndefine :userProfile {\n\theader {\n\t\th4 > @title;\n\t\tbutton.close;\n\t}\n}\n\n:userProfile {\n\t@title > ' Hello ~[: username.toUpperCase()]'\n}\n\nstyle {\n html, body {\n background: url('name.png') 0 0 no-repeat;\n }\n}\n\nbutton {\n\tevent click (e) {\n\t this.textContent = `name ${e.clientX} !`;\n\t}\n}\n\nmd > \"\"\"\n\n- div\n- span\n \nHello\n\n[one](http://google.com)\n\n\"\"\";\n\n\nheader .foo > 'Heading'\n\nbutton .baz x-signal='click: test' disabled > \"\n\tHello,\n\tworld \n\t\\\"Buddy\\\"\n\"\n\nvar a = {\n name: `name ${window.innerWidth}`\n};\n\nspan .foo > \"~[bind: a.name]\""
},
{
"path": "demo/kitchen-sink/docs/matlab.matlab",
"content": "%{\n %{\n Ace Matlab demo\n %}\n%}\n\nclassdef hello\n methods\n function greet(this)\n disp('Hello!') % say hi\n end\n end\nend\n\n% transpose \na = [ 'x''y', \"x\\n\\\n y\", 1' ]' + 2'"
},
{
"path": "demo/kitchen-sink/docs/maze.mz",
"content": "## ## () ## ^^ ## ## ## ##\n## H1 C2 S1 <> S2 H2 DN ##\n## %U <> %D *2 %L IZ .. ##\n## ## ## .. ## DN *3 ## ##\n## ## ## %R C1 IZ () ## ##\n## ## ## ## >/ *1\n## () *3 *1 %L ()\n\n\n// Set divisor and dividend\nS1-> = 9\nS2-> = 24\n\n// Holding cells\nH1-> IF *1 THEN %R ELSE %N\nH2-> IF *2 THEN %R ELSE %N\n\n// Arithmetic\nDN-> -= 1\nIZ-> IF <= 0 THEN %D ELSE %U\n\nC1-> IF *3 THEN %D ELSE %R\nC2-> IF *3 THEN %U ELSE %D\n"
},
{
"path": "demo/kitchen-sink/docs/mediawiki.wiki",
"content": "{{Languages}}\n\n'''Ace''' is a standalone code editor written in [[wikipedia:JavaScript|JavaScript]]. Our goal is to create a browser based editor that matches and extends the features, usability and performance of existing native editors such as TextMate, Vim or Eclipse. It can be ''easily'' embedded in any web page or JavaScript application. Ace is developed as the primary editor for [http://www.cloud9ide.com/ Cloud9 IDE] and the successor of the Mozilla Skywriter (Bespin) Project.\n\n== Features ==\n* Syntax highlighting\n* Automatic indent and outdent\n* An optional command line\n* Handles huge documents (100,000 lines and more are no problem)\n* Fully customizable key bindings including VI and Emacs modes\n* Themes (TextMate themes can be imported)\n* Search and replace with regular expressions\n* Highlight matching parentheses\n* Toggle between soft tabs and real tabs\n* Displays hidden characters\n* Drag and drop text using the mouse\n* Line wrapping\n* Unstructured / user code folding\n* Live syntax checker (currently JavaScript/CoffeeScript)\n\n== Take Ace for a spin! ==\nCheck out the Ace live [http://ajaxorg.github.com/ace/ demo] or get a [http://run.cloud9ide.com Cloud9 IDE account] to experience Ace while editing one of your own GitHub projects.\n\nIf you want, you can use Ace as a textarea replacement thanks to the [http://ajaxorg.github.com/ace/build/textarea/editor.html Ace Bookmarklet].\n\n== Documentation ==\nYou find a lot more sample code in the [https://github.com/ajaxorg/ace/blob/master/demo/demo.js demo app].\n\nThere is also some documentation on the [https://github.com/ajaxorg/ace/wiki wiki page].\n\nIf you still need help, feel free to drop a mail on the [http://groups.google.com/group/ace-discuss ace mailing list].\n"
},
{
"path": "demo/kitchen-sink/docs/mel.mel",
"content": "// animated duplicates, instances script\nproc animatedDuplication (int $rangeStart, int $rangeEnd, int $numOfDuplicates, int $duplicateOrInstance)\n{\n int $range_start = $rangeStart;\n int $range_end = $rangeEnd;\n int $num_of_duplicates = $numOfDuplicates;\n int $step_size = ($range_end - $range_start) / $num_of_duplicates;\n int $i = 0;\n int $temp;\n\n currentTime $range_start; // set to range start\n\n string $selectedObjects[]; // to store selected objects\n $selectedObjects = `ls -sl`; // store selected objects\n select $selectedObjects;\n\n while ($i <= $num_of_duplicates)\n {\n $temp = $range_start + ($step_size * $i);\n currentTime ($temp);\n // seleced the objects to duplicate or instance\n select $selectedObjects;\n if($duplicateOrInstance == 0)\n {\n duplicate;\n }\n else\n {\n instance;\n }\n $i++;\n }\n}"
},
{
"path": "demo/kitchen-sink/docs/mips.s",
"content": "# Original source from https://eng.libretexts.org\n# Kann, Charles W., \"Introduction To MIPS Assembly Language Programming\" (2015). Open Textbooks. 2.\n# https://cupola.gettysburg.edu/oer/2\n\n# Program File: Program2-1.asm\n# Author: Charles Kann\n# Purpose: First program, Hello World\n.text # Define the program instructions.\nmain: # Label to define the main program.\n li $v0,4 # Load 4 into $v0 to indicate a print string.\n la $a0, greeting # Load the address of the greeting into $a0.\n syscall # Print greeting. The print is indicated by\n # $v0 having a value of 4, and the string to\n # print is stored at the address in $a0.\n li $v0, 10 # Load a 10 (halt) into $v0.\n syscall # The program ends.\n.data # Define the program data.\ngreeting: .asciiz \"Hello World\" #The string to print.\n"
},
{
"path": "demo/kitchen-sink/docs/mixal.mixal",
"content": "* PROGRAM START\nΔSTART LDA 2000 LOAD A FROM CELL 2000\n CMP7 =15=\n12345 HLT\n END START\nABC ALF abc\n"
},
{
"path": "demo/kitchen-sink/docs/mushcode.mc",
"content": "@create phone\n&pickup phone=$pick up:@ifelse [u(is,u(mode),ICC)]={@pemit %#=You pick up the [fullname(me)].[set(me,PHONER:%#)][set(me,MODE:CIP)][set([u(INCOMING)],CONNECTED:[num(me)])][set(me,CONNECTED:[u(INCOMING)])]%r[showpicture(PICPICKUP)]%rUse '[color(green,black,psay Posts
\n- \n{% for item in items %}\n
- {{ item.title }} \n{% else %}\n
- This would display if the 'item' collection were empty \n{% endfor %}\n
Posts
\n- \n{% asyncEach item in items %}\n {% include \"item-template.html\" %}\n{% endeach %}\n
Posts
\n- \n{% asyncAll item in items %}\n
- {{ item.id | lookup }} \n{% endall %}\n
\n \n
\n{% endmacro %}\n\n{{ username }}\n{% set username = \"joe\" %}\n{{ username }}\n\n{% set standardModal %}\n {% include 'standardModalData.html' %}\n{% endset %}\n\n\n\n{% set standardModal %}\n {% include 'standardModalData.html' %}\n{% endset %}\n\n
\n\n{% include \"missing.html\" ignore missing %}\n\n{% import \"forms.html\" as forms %}\n\n{{ forms.label('Username') }}\n{{ forms.field('user') }}\n{{ forms.label('Password') }}\n{{ forms.field('pass', type='password') }}\n\n{% from \"forms.html\" import field, label as description %}\n\n{{ description('Username') }}\n{{ field('user') }}\n{{ description('Password') }}\n{{ field('pass', type='password') }}\n\n{{ foo(1, 2, bar=3, baz=4) }}\n\n{# Loop through all the users #}\n{% for user in users %}...{% endfor %}\n\n\n{% set cls = cycler(\"odd\", \"even\") %}\n{% for row in rows %}\n {\n int numerator;\n int denominator;\n}\n@end\n\n@\"blah\\8\" @\"a\\222sd\\d\" @\"\\faw\\\"\\? \\' \\4 n\\\\\" @\"\\56\"\n@\"\\xSF42\"\n\n-(NSDecimalNumber*)addCount:(id)addObject{\n\nreturn [count decimalNumberByAdding:addObject.count];\n\n}\n\n NS_DURING NS_HANDLER NS_ENDHANDLER\n\n@try {\n if (argc > 1) {\n @throw [NSException exceptionWithName:@\"Throwing a test exception\" reason:@\"Testing the @throw directive.\" userInfo:nil];\n }\n} \n@catch (id theException) {\n NSLog(@\"%@\", theException);\n result = 1 ;\n} \n@finally {\n NSLog(@\"This always happens.\");\n result += 2 ;\n}\n\n @synchronized(lock) {\n NSLog(@\"Hello World\");\n }\n\nstruct { @defs( NSObject) }\n\nchar *enc1 = @encode(int);\n\n IBOutlet|IBAction|BOOL|SEL|id|unichar|IMP|Class \n\n\n @class @protocol\n\n@public\n // instance variables\n@package\n // instance variables\n@protected\n // instance variables\n@private\n // instance variables\n\n YES NO Nil nil\nNSApp()\nNSRectToCGRect (Protocol ProtocolFromString:\"NSTableViewDelegate\"))\n\n[SPPoint pointFromCGPoint:self.position]\n\nNSRoundDownToMultipleOfPageSize\n\n#import \n\nint main( int argc, const char *argv[] ) {\n printf( \"hello world\\n\" );\n return 0;\n}\n\nNSChangeSpelling\n\n@\"0 != SUBQUERY(image, $x, 0 != SUBQUERY($x.bookmarkItems, $y, $y.@count == 0).@count).@count\"\n\n@selector(lowercaseString) @selector(uppercaseString:)\n\nNSFetchRequest *localRequest = [[NSFetchRequest alloc] init]; \nlocalRequest.entity = [NSEntityDescription entityForName:@\"VNSource\" inManagedObjectContext:context]; \nlocalRequest.sortDescriptors = [NSArray arrayWithObject:[NSSortDescriptor sortDescriptorWithKey:@\"resolution\" ascending:YES]]; \nNSPredicate *predicate = [NSPredicate predicateWithFormat:@\"0 != SUBQUERY(image, $x, 0 != SUBQUERY($x.bookmarkItems, $y, $y.@count == 0).@count).@count\"];\n[NSPredicate predicateWithFormat:]\nNSString *predicateString = [NSString stringWithFormat:@\"SELF beginsWith[cd] %@\", searchString];\nNSPredicate *pred = [NSPredicate predicateWithFormat:predicateString];\nNSArray *filteredKeys = [[myMutableDictionary allKeys] filteredArrayUsingPredicate:pred]; \n\nlocalRequest.predicate = [NSPredicate predicateWithFormat:@\"whichChart = %@\" argumentArray: listChartToDownload];\nlocalRequest.fetchBatchSize = 100;\narrayRequest = [context executeFetchRequest:localRequest error:&error1];\n\n[localRequest release];\n\n#ifndef Nil\n#define Nil __DARWIN_NULL /* id of Nil class */\n#endif\n\n@implementation MyObject\n- (unsigned int)areaOfWidth:(unsigned int)width\n height:(unsigned int)height\n{\n return width*height;\n}\n@end\n"
},
{
"path": "demo/kitchen-sink/docs/ocaml.ml",
"content": "(*\n * Example of early return implementation taken from\n * http://ocaml.janestreet.com/?q=node/91\n *)\n\nlet with_return (type t) (f : _ -> t) =\n let module M =\n struct exception Return of t end\n in\n let return = { return = (fun x -> raise (M.Return x)); } in\n try f return with M.Return x -> x\n\n\n(* Function that uses the 'early return' functionality provided by `with_return` *)\nlet sum_until_first_negative list =\n with_return (fun r ->\n List.fold list ~init:0 ~f:(fun acc x ->\n if x >= 0 then acc + x else r.return acc))"
},
{
"path": "demo/kitchen-sink/docs/odin.odin",
"content": "package main\n\nimport \"core:fmt\"\n\nmain :: proc() {\n\tprogram := \"+ + * 😃 - /\"\n\taccumulator := 0\n\n\tfor token in program {\n\t\tswitch token {\n\t\tcase '+': accumulator += 1\n\t\tcase '-': accumulator -= 1\n\t\tcase '*': accumulator *= 2\n\t\tcase '/': accumulator /= 2\n\t\tcase '😃': accumulator *= accumulator\n\t\tcase: // Ignore everything else\n\t\t}\n\t}\n\n\tfmt.printf(\"The program \\\"%s\\\" calculates the value %d\\n\", program, accumulator)\n}\n"
},
{
"path": "demo/kitchen-sink/docs/partiql.partiql",
"content": "-- comment\n/* multi\n line\n comment */\n\nSELECT \"a\", b, c FROM stuff s INNER CROSS JOIN @s WHERE f(s) -- comment\n-- comment\n\nSELECT VALUE {'sensor': s.sensor,\n 'readings': (SELECT VALUE l.co\n FROM logs as l\n WHERE l.sensor = s.sensor\n )\n }\nFROM sensors AS s\n\nSELECT VALUE (PIVOT v AT g\n FROM UNPIVOT r as v At g\n WHERE g LIKE 'co%')\nFROM sensors AS r\n\n\nSELECT x.*\nFROM [{'a':1, 'b':1}, {'a':2}, 'foo'] AS x\n\n-- NOTE: the embedded ion values parse as ion (inside the backticks \"`\")\nSELECT x.*\nFROM `[{'a':1, 'b':1}, {'a':2}, \"foo\"]` AS x\n\nSELECT VALUE {v.a: v.b, v.c: v.d}\nFROM <<{'a':'same', 'b':1, 'c':'same', 'd':2}>> AS v\nWHERE v.b\n\nSELECT u.id, feedbackId, commentId, upvoteId\nFROM users as u, u.feedbacks as feedback at feedbackId\nLEFT CROSS JOIN feedback.comments as comment AT commentId\nLEFT CROSS JOIN UNPIVOT comment.upvotes as upvote at upvoteId\n\n\nSELECT (\n SELECT numRec, tabulated\n FROM committed.changes changes,\n (SELECT u.id, feedbackId, commentId, upvoteId\n FROM changes.tabulated as u,\n u.feedbacks as feedback at feedbackId LEFT CROSS JOIN feedback.comments as comment AT commentId\n LEFT CROSS JOIN UNPIVOT comment.upvotes as upvote at upvoteId\n ) as tabulated,\n changes.numRec as numRec\n )\n AS changes\n FROM incoming_committed committed\n\nSELECT SUM(AVG(n)) FROM <> AS n\n\n\nSELECT attributeId, COUNT(*) as the_count\nFROM repeating_things\nGROUP BY attributeId GROUP AS g\nHAVING 1 = 0"
},
{
"path": "demo/kitchen-sink/docs/pascal.pas",
"content": "(*****************************************************************************\n * A simple bubble sort program. Reads integers, one per line, and prints *\n * them out in sorted order. Blows up if there are more than 49. *\n *****************************************************************************)\nPROGRAM Sort(input, output);\n CONST\n (* Max array size. *)\n MaxElts = 50;\n TYPE \n (* Type of the element array. *)\n IntArrType = ARRAY [1..MaxElts] OF Integer;\n\n VAR\n (* Indexes, exchange temp, array size. *)\n i, j, tmp, size: integer;\n\n (* Array of ints *)\n arr: IntArrType;\n\n (* Read in the integers. *)\n PROCEDURE ReadArr(VAR size: Integer; VAR a: IntArrType); \n BEGIN\n size := 1;\n WHILE NOT eof DO BEGIN\n readln(a[size]);\n IF NOT eof THEN \n size := size + 1\n END\n END;\n\n BEGIN\n (* Read *)\n ReadArr(size, arr);\n\n (* Sort using bubble sort. *)\n FOR i := size - 1 DOWNTO 1 DO\n FOR j := 1 TO i DO \n IF arr[j] > arr[j + 1] THEN BEGIN\n tmp := arr[j];\n arr[j] := arr[j + 1];\n arr[j + 1] := tmp;\n END;\n\n (* Print. *)\n FOR i := 1 TO size DO\n writeln(arr[i])\n END.\n "
},
{
"path": "demo/kitchen-sink/docs/perl.pl",
"content": "#!/usr/bin/perl\n=begin\n perl example code for Ace\n=cut\n\nuse v5.10;\nuse strict;\nuse warnings;\n\nuse List::Util qw(first);\nmy @primes;\n\n# Put 2 as the first prime so we won't have an empty array\npush @primes, 2;\n\nfor my $number_to_check (3 .. 200) {\n # Check if the current number is divisible by any previous prime\n # if it is, skip to the next number. Use first to bail out as soon\n # as we find a prime that divides it.\n next if (first {$number_to_check % $_ == 0} @primes);\n\n # If we reached this point it means $number_to_check is not\n # divisable by any prime number that came before it.\n push @primes, $number_to_check;\n}\n\n# List out all of the primes\nsay join(', ', @primes);\n"
},
{
"path": "demo/kitchen-sink/docs/pgsql.pgsql",
"content": "\nBEGIN;\n\n/**\n* Samples from PostgreSQL src/tutorial/basics.source\n*/\nCREATE TABLE weather (\n\tcity\t\tvarchar(80),\n\ttemp_lo\t\tint,\t\t-- low temperature\n\ttemp_hi\t\tint,\t\t-- high temperature\n\tprcp\t\treal,\t\t-- precipitation\n\t\"date\"\t\tdate\n);\n\nCREATE TABLE cities (\n\tname\t\tvarchar(80),\n\tlocation\tpoint\n);\n\n\nINSERT INTO weather\n VALUES ('San Francisco', 46, 50, 0.25, '1994-11-27');\n\nINSERT INTO cities\n VALUES ('San Francisco', '(-194.0, 53.0)');\n\nINSERT INTO weather (city, temp_lo, temp_hi, prcp, \"date\")\n VALUES ('San Francisco', 43, 57, 0.0, '1994-11-29');\n\nINSERT INTO weather (date, city, temp_hi, temp_lo)\n VALUES ('1994-11-29', 'Hayward', 54, 37);\n\n\nSELECT city, (temp_hi+temp_lo)/2 AS temp_avg, \"date\" FROM weather;\n\nSELECT city, temp_lo, temp_hi, prcp, \"date\", location\n FROM weather, cities\n WHERE city = name;\n\n\n\n/**\n* Dollar quotes starting at the end of the line are colored as SQL unless\n* a special language tag is used. Dollar quote syntax coloring is implemented\n* for Perl, Python, JavaScript, and Json.\n*/\ncreate or replace function blob_content_chunked(\n in p_data bytea, \n in p_chunk integer)\nreturns setof bytea as $$\n-- Still SQL comments\ndeclare\n\tv_size integer = octet_length(p_data);\nbegin\n\tfor i in 1..v_size by p_chunk loop\n\t\treturn next substring(p_data from i for p_chunk);\n\tend loop;\nend;\n$$ language plpgsql stable;\n\n\n-- pl/perl\nCREATE FUNCTION perl_max (integer, integer) RETURNS integer AS $perl$\n # perl comment...\n my ($x,$y) = @_;\n if (! defined $x) {\n if (! defined $y) { return undef; }\n return $y;\n }\n if (! defined $y) { return $x; }\n if ($x > $y) { return $x; }\n return $y;\n$perl$ LANGUAGE plperl;\n\n-- pl/python\nCREATE FUNCTION usesavedplan() RETURNS trigger AS $python$\n # python comment...\n if SD.has_key(\"plan\"):\n plan = SD[\"plan\"]\n else:\n plan = plpy.prepare(\"SELECT 1\")\n SD[\"plan\"] = plan\n$python$ LANGUAGE plpythonu;\n\n-- pl/v8 (javascript)\nCREATE FUNCTION plv8_test(keys text[], vals text[]) RETURNS text AS $javascript$\nvar o = {};\nfor(var i=0; i"
},
{
"path": "demo/kitchen-sink/docs/php_laravel_blade.blade.php",
"content": "\n\n\n \n App Name - @yield('title') \n \n \n \n @extends('layouts.app')\n @section('sidebar')\n @parent\n\n {{ $user->name }} \n\n @if ($user->number == 5)\n @break\n @endif\n @endforeach\n\n @foreach ($users as $user)\n @continue($user->type == 1)\n\n {{ $user->name }} \n\n @break($user->number == 5)\n @endforeach\n\n ,\n cookbooks => 'The Joy of Cooking',\n salary => 40000);\n\n$cook.cook( 'pizza' ); # OUTPUT: «Cooking pizza»\nsay $cook.utensils.perl; # OUTPUT: «[\"spoon\", \"ladle\", \"knife\", \"pan\"]»\nsay $cook.cookbooks.perl; # OUTPUT: «[\"The Joy of Cooking\"]»\nsay $cook.salary; # OUTPUT: «40000»\n\nmy $baker = Baker.new(\n utensils => 'self cleaning oven',\n cookbooks => \"The Baker's Apprentice\",\n salary => 50000);\n\n$baker.cook('brioche'); # OUTPUT: «Baking a tasty brioche»\nsay $baker.utensils.perl; # OUTPUT: «[\"self cleaning oven\"]»\nsay $baker.cookbooks.perl; # OUTPUT: «[\"The Baker's Apprentice\"]»\nsay $baker.salary; # OUTPUT: «50000»\n"
},
{
"path": "demo/kitchen-sink/docs/razor.cshtml",
"content": "@* razor mode *@\n@{\n\tLayout = \"~/layout\"\n\t@: \n\t@Layout\n\t@: \n}"
},
{
"path": "demo/kitchen-sink/docs/rdoc.Rd",
"content": "\\name{picker}\n\\alias{picker}\n\\title{Create a picker control}\n\\description{\n Create a picker control to enable manipulation of plot variables based on a set of fixed choices.\n}\n\n\\usage{\npicker(..., initial = NULL, label = NULL)\n}\n\n\n\\arguments{\n \\item{\\dots}{\n Arguments containing objects to be presented as choices for the picker (or a list containing the choices). If an element is named then the name is used to display it within the picker. If an element is not named then it is displayed within the picker using \\code{\\link{as.character}}. \n}\n \\item{initial}{\n Initial value for picker. Value must be present in the list of choices specified. If not specified defaults to the first choice.\n}\n \\item{label}{\n Display label for picker. Defaults to the variable name if not specified.\n}\n}\n\n\\value{\n An object of class \"manipulator.picker\" which can be passed to the \\code{\\link{manipulate}} function.\n}\n\n\\seealso{\n\\code{\\link{manipulate}}, \\code{\\link{slider}}, \\code{\\link{checkbox}}, \\code{\\link{button}}\n}\n\n\n\\examples{\n\\dontrun{\n\n## Filtering data with a picker\nmanipulate(\n barplot(as.matrix(longley[,factor]), \n beside = TRUE, main = factor),\n factor = picker(\"GNP\", \"Unemployed\", \"Employed\"))\n\n## Create a picker with labels\nmanipulate(\n plot(pressure, type = type), \n type = picker(\"points\" = \"p\", \"line\" = \"l\", \"step\" = \"s\"))\n \n## Picker with groups\nmanipulate(\n barplot(as.matrix(mtcars[group,\"mpg\"]), beside=TRUE),\n group = picker(\"Group 1\" = 1:11, \n \"Group 2\" = 12:22, \n \"Group 3\" = 23:32))\n\n## Histogram w/ picker to select type\nrequire(lattice)\nrequire(stats)\nmanipulate(\n histogram(~ height | voice.part, \n data = singer, type = type),\n type = picker(\"percent\", \"count\", \"density\"))\n\n}\n}"
},
{
"path": "demo/kitchen-sink/docs/red.red",
"content": "Red []\ninfo: func ['fn /name /intro /args /refinements /locals /return /spec \n\t/arg-num /arg-names /arg-types /ref-names /ref-types /ref-num /type\n\t/local intr ars refs locs ret arg ref typ\n][\n\tintr: copy \"\" ars: make map! copy [] refs: make map! copy [] locs: copy [] ret: copy [] typ: ref-arg: ref-arg-type: none\n\tif lit-word? fn [fn: to-word fn]\n\tunless find [op! native! function! action!] type?/word get fn [\n\t\tcause-error 'user 'message [\"Only function types accepted!\"]\n\t]\n\tout: make map! copy []\n\tspecs: spec-of get fn \n\tparse specs [\n\t\topt [set intr string!]\n\t\tany [set arg [word! | lit-word!] opt [set typ block!] opt string! (put ars arg either typ [typ][[any-type!]])]\n\t\tany [set ref refinement! [\n\t\t\tif (ref <> /local) (put refs to-lit-word ref make map! copy []) \n\t\t\t\topt string! \n\t\t\t\tany [set ref-arg word! opt [set ref-arg-type block!] \n\t\t\t\t\t(put refs/(to-word ref) to-lit-word ref-arg either ref-arg-type [ref-arg-type][[any-type!]])\n\t\t\t\t]\n\t\t\t|\tany [set loc word! (append locs loc) opt string!] \n\t\t\t\topt [set-word! set ret block!]\n\t\t]]\n\t\t\n\t\t(\n\t\tout: case [\n\t\t\tname\t\t[to-word fn]\n\t\t\tintro \t\t[intr] \n\t\t\targs\t\t[ars]\n\t\t\targ-num\t\t[length? ars]\n\t\t\targ-names \t[copy keys-of ars] \n\t\t\targ-types\t[copy values-of ars]\n\t\t\trefinements [refs] \n\t\t\tref-names\t[copy keys-of refs]\n\t\t\tref-types\t[copy values-of refs]\n\t\t\tref-num\t\t[length? refs]\n\t\t\tlocals \t\t[locs] \n\t\t\treturn \t\t[ret]\n\t\t\tspec\t\t[specs]\n\t\t\ttrue \t\t[\n\t\t\t\tmake object! [\n\t\t\t\t\tname: \t\tto-word fn \n\t\t\t\t\tintro: \t\tintr \n\t\t\t\t\targs: \t\tars \n\t\t\t\t\trefinements: refs \n\t\t\t\t\tlocals: \tlocs \n\t\t\t\t\treturn: \tret \n\t\t\t\t\tspec: \t\tspecs \n\t\t\t\t\ttype: \t\ttype? get fn\n\t\t\t\t\targ-num: \tlength? args\n\t\t\t\t\targ-names: \tcopy keys-of args\n\t\t\t\t\targ-types: \tcopy values-of args\n\t\t\t\t\tref-names: \tcopy keys-of refinements\n\t\t\t\t\tref-types: \tcopy values-of refinements\n\t\t\t\t\tref-num:\tlength? refinements\n\t\t\t\t]\n\t\t\t]\n\t\t])\n\t]\n\tout\n]\n"
},
{
"path": "demo/kitchen-sink/docs/rhtml.Rhtml",
"content": "\n\n\nTitle \n\n\n\n\n
{{ row.name }}
\n{% endfor %}"
},
{
"path": "demo/kitchen-sink/docs/objectivec.m",
"content": "@protocol Printing: someParent\n-(void) print;\n@end\n\n@interface Fraction: NSObject This is appended to the master sidebar.
\n @endsection\n \n @if (count($records) === 1)\n I have one record!\n @elseif (count($records) > 1)\n I have multiple records!\n @else\n I don't have any records!\n @endif\n\n @foreach ($users as $user)\n @if ($user->type == 1)\n @continue\n @endif\n\n\n @include('shared.errors')\n\n \n
\n\n @includeIf('view.name', ['some' => 'data'])\n\n @env('local')\n // The application is in the local environment...\n @elseenv('testing')\n // The application is in the testing environment...\n @else\n // The application is not in the local or testing environment...\n @endenv\n\n \n @yield('content')\n
\n \n\n\n\n{{-- comment --}}\n\n@if (\n {{-- comment --}}\n /*block comment*/\n #another comment\n $user->type == 1\n // c comment\n /* comment*/\n)\n # not a comment \n@endif\n"
},
{
"path": "demo/kitchen-sink/docs/pig.pig",
"content": "A = load 'mobydick.txt';\nB = foreach A generate flatten(TOKENIZE((chararray)$0)) as word;\nC = filter B by word matches '\\\\w+';\nD = group C by word;\nE = foreach D generate COUNT(C) as count, group as word;\nF = order E by count desc;\n-- one comment\n/* another comment */\ndump F;\n"
},
{
"path": "demo/kitchen-sink/docs/plaintext.txt",
"content": "Lorem ipsum dolor sit amet, consetetur sadipscing elitr, sed diam nonumy eirmod tempor invidunt ut labore et dolore magna aliquyam erat, sed diam voluptua. At vero eos et accusam et justo duo dolores et ea rebum. Stet clita kasd gubergren, no sea takimata sanctus est Lorem ipsum dolor sit amet. Lorem ipsum dolor sit amet, consetetur sadipscing elitr, sed diam nonumy eirmod tempor invidunt ut labore et dolore magna aliquyam erat, sed diam voluptua. At vero eos et accusam et justo duo dolores et ea rebum. Stet clita kasd gubergren, no sea takimata sanctus est Lorem ipsum dolor sit amet. Lorem ipsum dolor sit amet, consetetur sadipscing elitr, sed diam nonumy eirmod tempor invidunt ut labore et dolore magna aliquyam erat, sed diam voluptua. At vero eos et accusam et justo duo dolores et ea rebum. Stet clita kasd gubergren, no sea takimata sanctus est Lorem ipsum dolor sit amet.\n\nDuis autem vel eum iriure dolor in hendrerit in vulputate velit esse molestie consequat, vel illum dolore eu feugiat nulla facilisis at vero eros et accumsan et iusto odio dignissim qui blandit praesent luptatum zzril delenit augue duis dolore te feugait nulla facilisi. Lorem ipsum dolor sit amet, consectetuer adipiscing elit, sed diam nonummy nibh euismod tincidunt ut laoreet dolore magna aliquam erat volutpat.\n\nUt wisi enim ad minim veniam, quis nostrud exerci tation ullamcorper suscipit lobortis nisl ut aliquip ex ea commodo consequat. Duis autem vel eum iriure dolor in hendrerit in vulputate velit esse molestie consequat, vel illum dolore eu feugiat nulla facilisis at vero eros et accumsan et iusto odio dignissim qui blandit praesent luptatum zzril delenit augue duis dolore te feugait nulla facilisi.\n\nNam liber tempor cum soluta nobis eleifend option congue nihil imperdiet doming id quod mazim placerat facer possim assum. Lorem ipsum dolor sit amet, consectetuer adipiscing elit, sed diam nonummy nibh euismod tincidunt ut laoreet dolore magna aliquam erat volutpat. Ut wisi enim ad minim veniam, quis nostrud exerci tation ullamcorper suscipit lobortis nisl ut aliquip ex ea commodo consequat.\n\nDuis autem vel eum iriure dolor in hendrerit in vulputate velit esse molestie consequat, vel illum dolore eu feugiat nulla facilisis.\n\nAt vero eos et accusam et justo duo dolores et ea rebum. Stet clita kasd gubergren, no sea takimata sanctus est Lorem ipsum dolor sit amet. Lorem ipsum dolor sit amet, consetetur sadipscing elitr, sed diam nonumy eirmod tempor invidunt ut labore et dolore magna aliquyam erat, sed diam voluptua. At vero eos et accusam et justo duo dolores et ea rebum. Stet clita kasd gubergren, no sea takimata sanctus est Lorem ipsum dolor sit amet. Lorem ipsum dolor sit amet, consetetur sadipscing elitr, At accusam aliquyam diam diam dolore dolores duo eirmod eos erat, et nonumy sed tempor et et invidunt justo labore Stet clita ea et gubergren, kasd magna no rebum. sanctus sea sed takimata ut vero voluptua. est Lorem ipsum dolor sit amet. Lorem ipsum dolor sit amet, consetetur"
},
{
"path": "demo/kitchen-sink/docs/plsql.plsql",
"content": "create table t (\n id integer, \n month varchar(3), \n value integer\n);\n\ninsert into t (month, value) values ('jan', 1);\ninsert into t (month, value) values ('jan', 1);\ninsert into t (month, value) values ('oct', 3);\ninsert into t (month, value) values ('dec', 96);\n\n\nselect * from (select month, value from t)\npivot\n(\n sum(value)\n for month in ('jan', 'oct', 'dec')\n);"
},
{
"path": "demo/kitchen-sink/docs/powershell.ps1",
"content": "# This is a simple comment\nfunction Hello($name) {\n Write-host \"Hello $name\"\n}\n\nfunction add($left, $right=4) {\n if ($right -ne 4) {\n return $left\n } elseif ($left -eq $null -and $right -eq 2) {\n return 3\n } else {\n return 2\n }\n}\n\n$number = 1 + 2;\n$number += 3\n\nWrite-Host Hello -name \"World\"\n\n$an_array = @(1, 2, 3)\n$a_hash = @{\"something\" = \"something else\"}\n\n& notepad .\\readme.md\n\n$h1 = @{ FirstName = \"James\"; LastName = \"Anderson\"; IDNum = 123 }\n$last = \"Anderson\"; $IDNum = 120\n$h2 = @{ FirstName = \"James\"; LastName = $last; IDNum = $IDNum + 3 }\n$h3 = @{ }\n$h4 = @{ 10 = \"James\"; 20.5 = \"Anderson\"; $true = 123 }\n\n${Maximum_Count_26}\n${Name with`twhite space and `{punctuation`}}\n${E:\\\\File.txt}\n\n\"C:\\Temp\\\" {mkdir \"C:\\Temp\\\"}\n\"C:\\Temp\\\"\n\n@\"\nThis is a here string\n$h1 = @{ FirstName = \"James\"; LastName = \"Anderson\"; IDNum = 123 }\n$last = \"Anderson\"; $IDNum = 120\n$h2 = @{ FirstName = \"James\"; LastName = $last; IDNum = $IDNum + 3 }\n$h3 = @{ }\n$h4 = @{ 10 = \"James\"; 20.5 = \"Anderson\"; $true = 123 }\n$j = 20\n\nstill string\n$($i = 10) # pipeline gets nothing\n$(($i = 10)) # pipeline gets int 10\n$($i = 10; $j) # pipeline gets int 20\n$(($i = 10); $j) # pipeline gets [object[]](10,20)\n$(($i = 10); ++$j) # pipeline gets int 10\n$(($i = 10); (++$j)) # pipeline gets [object[]](10,22)\n$($i = 10; ++$j) # pipeline gets nothing\n$(2,4,6) # pipeline gets [object[]](2,4,6)\n\"@\n\n@'\nExpressions inside should be recognised as string\n$h1 = @{ FirstName = \"James\"; LastName = \"Anderson\"; IDNum = 123 }\n$last = \"Anderson\"; $IDNum = 120\n$h2 = @{ FirstName = \"James\"; LastName = $last; IDNum = $IDNum + 3 }\n$h3 = @{ }\n$h4 = @{ 10 = \"James\"; 20.5 = \"Anderson\"; $true = 123 }\n'@\n"
},
{
"path": "demo/kitchen-sink/docs/praat.praat",
"content": "form Highlighter test\n sentence My_sentence This should all be a string\n text My_text This should also all be a string\n word My_word Only the first word is a string, the rest is invalid\n boolean Binary 1\n boolean Text no\n boolean Quoted \"yes\"\n comment This should be a string\n real left_Range -123.6\n positive right_Range_max 3.3\n integer Int 4\n natural Nat 4\nendform\n\n# External scripts\ninclude /path/to/file\nrunScript: \"/path/to/file\"\nexecute /path/to/file\n\nstopwatch\n\n# old-style procedure call\ncall oldStyle \"quoted\" 2 unquoted string\nassert oldStyle.local = 1\n\n# New-style procedure call with parens\n@newStyle(\"quoted\", 2, \"quoted string\")\nif praatVersion >= 5364 \n # New-style procedure call with colon\n @newStyle: \"quoted\", 2, \"quoted string\"\nendif\n\n# if-block with built-in variables\nif windows\n # We are on Windows\nelsif unix = 1 or !macintosh\n exitScript: \"We are on Linux\"\nelse macintosh == 1\n exit We are on Mac\nendif\n\n# inline if with inline comment\nvar = if macintosh = 1 then 0 else 1 fi ; This is an inline comment\n\n# for-loop with explicit from using local variable\n# and paren-style function calls and variable interpolation\nn = numberOfSelected(\"Sound\")\nfor i from newStyle.local to n\n sound'i' = selected(\"Sound\", i)\n sound[i] = sound'i'\nendfor\n\nfor i from 1 to n\n # Different styles of object selection\n select sound'i'\n sound = selected()\n sound$ = selected$(\"Sound\")\n select Sound 'sound$'\n selectObject(sound[i])\n selectObject: sound\n \n # Pause commands\n beginPause(\"Viewing \" + sound$)\n if i > 1\n button = endPause(\"Stop\", \"Previous\",\n ...if i = total_sounds then \"Finish\" else \"Next\" fi,\n ...3, 1)\n else\n button = endPause(\"Stop\",\n ...if i = total_sounds then \"Finish\" else \"Next\" fi,\n ...2, 1) \n endif\n editor_name$ = if total_textgrids then \"TextGrid \" else \"Sound \" fi + name$\n nocheck editor 'editor_name$'\n nocheck Close\n nocheck endeditor\n \n # New-style standalone command call\n Rename: \"SomeName\"\n\n # Command call with assignment\n duration = Get total duration\n \n # Multi-line command with modifier\n pitch = noprogress To Pitch (ac): 0, 75, 15, \"no\",\n ...0.03, 0.45, 0.01, 0.35, 0.14, 600\n \n # do-style command with assignment\n minimum = do(\"Get minimum...\", 0, 0, \"Hertz\", \"Parabolic\")\n\n # New-style multi-line command call with broken strings\n table = Create Table with column names: \"table\", 0,\n ...\"file subject speaker\n ...f0 f1 f2 f3 \" +\n ...\"duration response\"\n \n removeObject: pitch, table\n \n # Picture window commands\n selectObject: sound\n # do-style command\n do(\"Select inner viewport...\", 1, 6, 0.5, 1.5)\n Black\n Draw... 0 0 0 0 \"no\" Curve\n Draw inner box\n Text bottom: \"yes\", sound$\n Erase all\n \n # Demo window commands\n demo Erase all\n demo Select inner viewport... 0 100 0 100\n demo Axes... 0 100 0 100\n demo Paint rectangle... white 0 100 0 100\n demo Text... 50 centre 50 half Click to finish\n demoWaitForInput ( )\n demo Erase all\n demo Text: 50, \"centre\", 50, \"half\", \"Finished\"\nendfor\n\n# An old-style sendpraat block\nsendpraat Praat\n ...'newline$' Create Sound as pure tone... \"tone\" 1 0 0.4 44100 440 0.2 0.01 0.01\n ...'newline$' Play\n ...'newline$' Remove\n\n# A new-style sendpraat block\nbeginSendPraat: \"Praat\"\n Create Sound as pure tone: \"tone\", 1, 0, 0.4, 44100, 440, 0.2, 0.01, 0.01\n duration = Get total duration\n Remove\nendSendPraat: \"duration\"\nappendInfoLine: \"The generated sound lasted for \", duration, \"seconds\"\n\ntime = stopwatch\nclearinfo\necho This script took \nprint 'time' seconds to \nprintline execute.\n\n# Old-style procedure declaration\nprocedure oldStyle .str1$ .num .str2$\n .local = 1\nendproc\n\n# New-style procedure declaration with parentheses\nprocedure newStyle (.str1$, .num, .str2$)\n # Command with \"local\" variable\n .local = Get total duration\nendproc\n\n# New-style procedure declaration with colon\nprocedure newStyle: .str1$, .num, .str2$\n # Command with \"local\" variable\n newStyle.local = Get total duration\nendproc\n"
},
{
"path": "demo/kitchen-sink/docs/prisma.prisma",
"content": "generator photon {\n provider = \"photonjs\"\n}\n\nmodel User {\n id String @default(cuid()) @id\n createdAt DateTime @default(now())\n updatedAt DateTime @updatedAt\n firstName String\n lastName String\n email String @unique\n password String\n phone String\n responseRate Float?\n responseTime Int?\n ReportsTo User? @relation(\"EmployeeToEmployee_ReportsTo\")\n employees User[] @relation(\"EmployeeToEmployee_ReportsTo\")\n isSuperHost Boolean\n ownedPlaces Place[]\n location Location?\n bookings Booking[]\n paymentAccount PaymentAccount[]\n sentMessages Message[] @relation(\"SentMessages\")\n receivedMessages Message[] @relation(\"ReceivedMessages\")\n notifications Notification[]\n profilePicture Picture?\n hostingExperiences Experience[]\n}\n\nmodel Place {\n id String @default(cuid()) @id\n name String\n size PLACE_SIZES?\n shortDescription String\n description String\n slug String\n maxGuests Int\n numBedrooms Int\n numBeds Int\n numBaths Int\n reviews Review[]\n amenities Amenities\n host User\n pricing Pricing\n location Location\n views Views\n guestRequirements GuestRequirements?\n policies Policies?\n houseRules HouseRules?\n bookings Booking[]\n pictures Picture[]\n popularity Int\n}\n\nmodel Pricing {\n id String @default(cuid()) @id\n place Place\n monthlyDiscount Int?\n weeklyDiscount Int?\n perNight Int\n smartPricing Boolean\n basePrice Int\n averageWeekly Int\n averageMonthly Int\n cleaningFee Int?\n securityDeposit Int?\n extraGuests Int?\n weekendPricing Int?\n currency CURRENCY?\n}\n\nmodel GuestRequirements {\n id String @default(cuid()) @id\n govIssuedId Boolean\n recommendationsFromOtherHosts Boolean\n guestTripInformation Boolean\n place Place\n}\n\nmodel Policies {\n id String @default(cuid()) @id\n createdAt DateTime @default(now())\n updatedAt DateTime @updatedAt\n checkInStartTime Float\n checkInEndTime Float\n checkoutTime Float\n place Place\n}\n\nmodel HouseRules {\n id String @default(cuid()) @id\n createdAt DateTime @default(now())\n updatedAt DateTime @updatedAt\n suitableForChildren Boolean?\n suitableForInfants Boolean?\n petsAllowed Boolean?\n smokingAllowed Boolean?\n partiesAndEventsAllowed Boolean?\n additionalRules String?\n}\n\nmodel Views {\n id String @default(cuid()) @id\n lastWeek Int\n place Place\n}\n\nmodel Location {\n id String @default(cuid()) @id\n lat Float\n lng Float\n neighbourHood Neighbourhood?\n user User?\n place Place?\n address String\n directions String\n experience Experience?\n restaurant Restaurant?\n}\n\nmodel Neighbourhood {\n id String @default(cuid()) @id\n locations Location[]\n name String\n slug String\n homePreview Picture?\n city City\n featured Boolean\n popularity Int\n}\n\nmodel City {\n id String @default(cuid()) @id\n name String\n neighbourhoods Neighbourhood[]\n}\n\nmodel Picture {\n id String @default(cuid()) @id\n url String\n}\n\nmodel Experience {\n id String @default(cuid()) @id\n category ExperienceCategory?\n title String\n host User\n location Location\n pricePerPerson Int\n reviews Review[]\n preview Picture\n popularity Int\n}\n\nmodel ExperienceCategory {\n id String @default(cuid()) @id\n mainColor String\n name String\n experience Experience?\n}\n\nmodel Amenities {\n id String @default(cuid()) @id\n place Place\n elevator Boolean\n petsAllowed Boolean\n internet Boolean\n kitchen Boolean\n wirelessInternet Boolean\n familyKidFriendly Boolean\n freeParkingOnPremises Boolean\n hotTub Boolean\n pool Boolean\n smokingAllowed Boolean\n wheelchairAccessible Boolean\n breakfast Boolean\n cableTv Boolean\n suitableForEvents Boolean\n dryer Boolean\n washer Boolean\n indoorFireplace Boolean\n tv Boolean\n heating Boolean\n hangers Boolean\n iron Boolean\n hairDryer Boolean\n doorman Boolean\n paidParkingOffPremises Boolean\n freeParkingOnStreet Boolean\n gym Boolean\n airConditioning Boolean\n shampoo Boolean\n essentials Boolean\n laptopFriendlyWorkspace Boolean\n privateEntrance Boolean\n buzzerWirelessIntercom Boolean\n babyBath Boolean\n babyMonitor Boolean\n babysitterRecommendations Boolean\n bathtub Boolean\n changingTable Boolean\n childrensBooksAndToys Boolean\n childrensDinnerware Boolean\n crib Boolean\n}\n\nmodel Review {\n id String @default(cuid()) @id\n createdAt DateTime @default(now())\n text String\n stars Int\n accuracy Int\n location Int\n checkIn Int\n value Int\n cleanliness Int\n communication Int\n place Place\n experience Experience?\n}\n\nmodel Booking {\n id String @default(cuid()) @id\n createdAt DateTime @default(now())\n bookee User\n place Place\n startDate DateTime\n endDate DateTime\n payment Payment?\n}\n\nmodel Payment {\n id String @default(cuid()) @id\n createdAt DateTime @default(now())\n serviceFee Float\n placePrice Float\n totalPrice Float\n booking Booking\n paymentMethod PaymentAccount\n}\n\nmodel PaymentAccount {\n id String @default(cuid()) @id\n createdAt DateTime @default(now())\n type PAYMENT_PROVIDER?\n user User\n payments Payment[]\n paypal PaypalInformation?\n creditcard CreditCardInformation?\n}\n\nmodel PaypalInformation {\n id String @default(cuid()) @id\n createdAt DateTime @default(now())\n email String\n paymentAccount PaymentAccount\n}\n\nmodel CreditCardInformation {\n id String @default(cuid()) @id\n createdAt DateTime @default(now())\n cardNumber String\n expiresOnMonth Int\n expiresOnYear Int\n securityCode String\n firstName String\n lastName String\n postalCode String\n country String\n paymentAccount PaymentAccount?\n}\n\nmodel Message {\n id String @default(cuid()) @id\n createdAt DateTime @default(now())\n from User @relation(\"SentMessages\")\n to User @relation(\"ReceivedMessages\")\n deliveredAt DateTime\n readAt DateTime\n}\n\nmodel Notification {\n id String @default(cuid()) @id\n createdAt DateTime @default(now())\n type NOTIFICATION_TYPE?\n user User\n link String\n readDate DateTime\n}\n\nmodel Restaurant {\n id String @default(cuid()) @id\n createdAt DateTime @default(now())\n title String\n avgPricePerPerson Int\n pictures Picture[]\n location Location\n isCurated Boolean\n slug String\n popularity Int\n}\n\nenum CURRENCY {\n CAD\n CHF\n EUR\n JPY\n USD\n ZAR\n}\n\nenum PLACE_SIZES {\n ENTIRE_HOUSE\n ENTIRE_APARTMENT\n ENTIRE_EARTH_HOUSE\n ENTIRE_CABIN\n ENTIRE_VILLA\n ENTIRE_PLACE\n ENTIRE_BOAT\n PRIVATE_ROOM\n}\n\nenum PAYMENT_PROVIDER {\n PAYPAL\n CREDIT_CARD\n}\n\nenum NOTIFICATION_TYPE {\n OFFER\n INSTANT_BOOK\n RESPONSIVENESS\n NEW_AMENITIES\n HOUSE_RULES\n}"
},
{
"path": "demo/kitchen-sink/docs/prolog.plg",
"content": "partition([], _, [], []).\npartition([X|Xs], Pivot, Smalls, Bigs) :-\n ( X @< Pivot ->\n Smalls = [X|Rest],\n partition(Xs, Pivot, Rest, Bigs)\n ; Bigs = [X|Rest],\n partition(Xs, Pivot, Smalls, Rest)\n ).\n \nquicksort([]) --> [].\nquicksort([X|Xs]) -->\n { partition(Xs, X, Smaller, Bigger) },\n quicksort(Smaller), [X], quicksort(Bigger).\n\nperfect(N) :-\n between(1, inf, N), U is N // 2,\n findall(D, (between(1,U,D), N mod D =:= 0), Ds),\n sumlist(Ds, N)."
},
{
"path": "demo/kitchen-sink/docs/properties.properties",
"content": "# You are reading the \".properties\" entry.\n! The exclamation mark can also mark text as comments.\n# The key and element characters #, !, =, and : are written with a preceding backslash to ensure that they are properly loaded.\nwebsite = http\\://en.wikipedia.org/\nlanguage = English\n# The backslash below tells the application to continue reading\n# the value onto the next line.\nmessage = Welcome to \\\n Wikipedia!\n# Add spaces to the key\nkey\\ with\\ spaces = This is the value that could be looked up with the key \"key with spaces\".\n# Unicode\ntab : \\u0009\nempty-key=\nlast.line=value\n"
},
{
"path": "demo/kitchen-sink/docs/protobuf.proto",
"content": "message Point {\n required int32 x = 1;\n required int32 y = 2;\n optional string label = 3;\n}\n\nmessage Line {\n required Point start = 1;\n required Point end = 2;\n optional string label = 3;\n}\n\nmessage Polyline {\n repeated Point point = 1;\n optional string label = 2;\n}"
},
{
"path": "demo/kitchen-sink/docs/prql.prql",
"content": "from invoices\nfilter invoice_date >= @1970-01-16\nderive {\n transaction_fees = 0.8,\n income = total - transaction_fees\n}\nfilter income > 1\ngroup customer_id (\n aggregate {\n average total,\n sum_income = sum income,\n ct = count total,\n }\n)\nsort {-sum_income}\ntake 10\njoin c=customers (==customer_id)\nderive name = f\"{c.last_name}, {c.first_name}\"\nselect {\n c.customer_id, name, sum_income\n}\nderive db_version = s\"version()\"\n"
},
{
"path": "demo/kitchen-sink/docs/puppet.epp",
"content": "define apache::vhost ($port, $docroot, $servername = $title, $vhost_name = '*') {\n include apache\n include apache::params\n $vhost_dir = $apache::params::vhost_dir\n file { \"${vhost_dir}/${servername}.conf\":\n content => template('apache/vhost-default.conf.erb'),\n owner => 'www',\n group => 'www',\n mode => '644',\n require => Package['httpd'],\n notify => Service['httpd'],\n }\n}\n\ntype MyModule::Tree = Array[Variant[Data, Tree]]\n\nfunction apache::bool2http(Variant[String, Boolean] $arg) >> String {\n case $arg {\n false, undef, /(?i:false)/ : { 'Off' }\n true, /(?i:true)/ : { 'On' }\n default : { \"$arg\" }\n }\n}\n\n# A class with parameters\nclass apache (String $version = 'latest') {\n package {'httpd':\n ensure => $version, # Using the class parameter from above\n before => File['/etc/httpd.conf'],\n }\n file {'/etc/httpd.conf':\n ensure => file,\n owner => 'httpd',\n content => template('apache/httpd.conf.erb'), # Template from a module\n }\n service {'httpd':\n ensure => running,\n enable => true,\n subscribe => File['/etc/httpd.conf'],\n }\n}\n\n\nif $is_virtual {\n warning( 'Tried to include class ntp on virtual machine; this node might be misclassified.' )\n}\nelsif $operatingsystem == 'Darwin' {\n warning( 'This NTP module does not yet work on our Mac laptops.' )\nelse {\n include ntp\n}"
},
{
"path": "demo/kitchen-sink/docs/python.py",
"content": "#!/usr/local/bin/python\n\nimport string, sys\n\n# If no arguments were given, print a helpful message\nif len(sys.argv)==1:\n print '''Usage:\ncelsius temp1 temp2 ...'''\n sys.exit(0)\n\n# Loop over the arguments\nfor i in sys.argv[1:]:\n try:\n fahrenheit=float(string.atoi(i))\n except string.atoi_error:\n print repr(i), \"not a numeric value\"\n else:\n celsius=(fahrenheit-32)*5.0/9.0\n print '%i\\260F = %i\\260C' % (int(fahrenheit), int(celsius+.5))"
},
{
"path": "demo/kitchen-sink/docs/qml.qml",
"content": "// A simple example\nimport QtQuick 2.7\nimport QtQuick.Controls 2.3\n\nRectangle {\n color: \"red\"\n anchors.fill: parent\n\n Text {\n text: \"WEEEEEEEEEE\"\n font.pixelSize: 50\n color: \"white\"\n anchors.centerIn: parent\n RotationAnimator on rotation {\n running: true\n loops: Animation.Infinite\n from: 0\n to: 360\n duration: 1500\n }\n }\n}\n"
},
{
"path": "demo/kitchen-sink/docs/r.r",
"content": "Call:\nlm(formula = y ~ x)\n \nResiduals:\n1 2 3 4 5 6\n3.3333 -0.6667 -2.6667 -2.6667 -0.6667 3.3333\n \nCoefficients:\n Estimate Std. Error t value Pr(>|t|)\n(Intercept) -9.3333 2.8441 -3.282 0.030453 *\nx 7.0000 0.7303 9.585 0.000662 ***\n---\nSignif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1\n \nResidual standard error: 3.055 on 4 degrees of freedom\nMultiple R-squared: 0.9583, Adjusted R-squared: 0.9478\nF-statistic: 91.88 on 1 and 4 DF, p-value: 0.000662\n \n> par(mfrow=c(2, 2)) # Request 2x2 plot layout\n> plot(lm_1) # Diagnostic plot of regression model"
},
{
"path": "demo/kitchen-sink/docs/raku.raku",
"content": "=begin comment\nRaku example for ace\n=end comment\nclass Cook is Employee {\n has @.utensils is rw;\n has @.cookbooks is rw;\n\n method cook( $food ) {\n say \"Cooking $food\";\n }\n\n method clean_utensils {\n say \"Cleaning $_\" for @.utensils;\n }\n}\n\nclass Baker is Cook {\n method cook( $confection ) {\n say \"Baking a tasty $confection\";\n }\n}\n\nmy $cook = Cook.new(\n utensils => This is an R HTML document. When you click the