@harmoniclabs/monaco-editor 0.52.0

package/website/src/website/data/home-samples/sample.objective-c.txt

@@ -0,0 +1,52 @@
+//
+//  Copyright (c) Microsoft Corporation. All rights reserved.
+//
+
+#import "UseQuotes.h"
+#import <Use/GTLT.h> 
+
+/*
+	Multi 
+	Line
+	Comments 
+*/
+@implementation Test
+
+- (void) applicationWillFinishLaunching:(NSNotification *)notification
+{
+}
+
+- (IBAction)onSelectInput:(id)sender
+{
+    NSString* defaultDir = NSSearchPathForDirectoriesInDomains(NSDocumentDirectory, NSUserDomainMask, true)[0];
+    
+    NSOpenPanel* panel = [NSOpenPanel openPanel];
+    [panel setAllowedFileTypes:[[NSArray alloc] initWithObjects:@"ipa", @"xcarchive", @"app", nil]];
+    
+    [panel beginWithCompletionHandler:^(NSInteger result)
+     {
+         if (result == NSFileHandlingPanelOKButton)
+             [self.inputTextField setStringValue:[panel.URL path]];
+     }];
+     return YES;
+
+     int hex = 0xFEF1F0F;
+	 float ing = 3.14;
+	 ing = 3.14e0;
+	 ing = 31.4e-2;
+}
+
+-(id) initWithParams:(id<anObject>) aHandler withDeviceStateManager:(id<anotherObject>) deviceStateManager
+{
+    // add a tap gesture recognizer
+    UITapGestureRecognizer *tapGesture = [[UITapGestureRecognizer alloc] initWithTarget:self action:@selector(handleTap:)];
+    NSMutableArray *gestureRecognizers = [NSMutableArray array];
+    [gestureRecognizers addObject:tapGesture];
+    [gestureRecognizers addObjectsFromArray:scnView.gestureRecognizers];
+    scnView.gestureRecognizers = gestureRecognizers;
+
+	return tapGesture;
+	return nil;
+}
+
+@end

package/website/src/website/data/home-samples/sample.pascal.txt

@@ -0,0 +1,28 @@
+program GreetingsNumberOfTimes;
+
+{$APPTYPE CONSOLE}
+
+{$R *.res}
+
+uses
+  System.SysUtils;
+
+var
+  greetingsMessage: string;
+  numberOfTimes, i: integer;
+
+begin
+  try
+    { TODO -oUser -cConsole Main : Insert code here }
+    greetingsMessage := 'Hello World!';
+    numberOfTimes := 10;
+
+    for i := 1 to numberOfTimes do
+    begin
+      Writeln(greetingsMessage);
+    end;
+  except
+    on E: Exception do
+      Writeln(E.ClassName, ': ', E.Message);
+  end;
+end.

package/website/src/website/data/home-samples/sample.pascaligo.txt

@@ -0,0 +1,20 @@
+type storage is int
+type parameter is
+  Increment of int
+| Decrement of int
+| Reset
+type return is list (operation) * storage
+// Two entrypoints
+function add (const store : storage; const delta : int) : storage is
+  store + delta
+function sub (const store : storage; const delta : int) : storage is
+  store - delta
+(* Main access point that dispatches to the entrypoints according to
+   the smart contract parameter. *)
+function main (const action : parameter; const store : storage) : return is
+ ((nil : list (operation)),    // No operations
+  case action of
+    Increment (n) -> add (store, n)
+  | Decrement (n) -> sub (store, n)
+  | Reset         -> 0
+  end)

package/website/src/website/data/home-samples/sample.pebble.txt

@@ -0,0 +1,54 @@
+/*
+	This is a sample pebble file
+*/
+
+
+struct Datum {
+    owner: string,
+}
+
+struct Animal {
+    Dog {
+        name: string,
+        barksCount: int,
+    }
+    Cat {
+        name: string,
+        color: string,
+    }
+    Fish {
+        name: string,
+    }
+}
+
+
+let a = 0;
+let b = 1;
+let c = 2;
+
+for (let i = 0; i < 10; i++) {
+    a += 1;
+}
+
+
+
+/* Folding markers */
+#region Initialization
+let x = 10
+let y = 20
+#endregion
+
+#region Calculation
+let sum = x + y
+print("Sum: " + sum)
+#endregion
+
+
+/* Conditional statements */
+if (a === 1) {
+    print("Condition passes")
+} else {
+    print("Failing")
+}
+
+

package/website/src/website/data/home-samples/sample.perl.txt

@@ -0,0 +1,18 @@
+#!/usr/bin/perl
+use strict;
+use warnings;
+
+use Path::Tiny;
+
+my $dir = path('foo','bar'); # foo/bar
+
+# Iterate over the content of foo/bar
+my $iter = $dir->iterator;
+while (my $file = $iter->()) {
+
+    # See if it is a directory and skip
+    next if $file->is_dir();
+
+    # Print out the file name and path
+    print "$file\n";
+}

package/website/src/website/data/home-samples/sample.pgsql.txt

@@ -0,0 +1,8 @@
+BEGIN
+    SELECT * INTO STRICT myrec FROM emp WHERE empname = myname;
+    EXCEPTION
+        WHEN NO_DATA_FOUND THEN
+            RAISE EXCEPTION 'employee % not found', myname;
+        WHEN TOO_MANY_ROWS THEN
+            RAISE EXCEPTION 'employee % not unique', myname;
+END;

package/website/src/website/data/home-samples/sample.php.txt

@@ -0,0 +1,82 @@
+<?php
+// The next line contains a syntax error:
+if () {
+	return "The parser recovers from this type of syntax error";
+}
+?>
+<html>
+<head>
+	<title>Example page</title>
+</head>
+
+<body>
+
+<script type="text/javascript">
+	// Some PHP embedded inside JS
+	// Generated <?=date('l, F jS, Y')?>
+	
+	var server_token = <?=rand(5, 10000)?>
+	if (typeof server_token === 'number') {
+		alert('token: ' + server_token);
+	}
+</script>
+
+<div>
+Hello
+<? if (isset($user)) { ?>
+	<b><?=$user?></b>
+<? } else { ?>
+	<i>guest</i>
+<? } ?>
+!
+</div>
+
+<?php
+
+	/* Example PHP file
+	multiline comment
+	*/
+
+	$cards = array("ah", "ac", "ad", "as",
+		"2h", "2c", "2d", "2s",
+		"3h", "3c", "3d", "3s",
+		"4h", "4c", "4d", "4s",
+		"5h", "5c", "5d", "5s",
+		"6h", "6c", "6d", "6s",
+		"7h", "7c", "7d", "7s",
+		"8h", "8c", "8d", "8s",
+		"9h", "9c", "9d", "9s",
+		"th", "tc", "td", "ts",
+		"jh", "jc", "jd", "js",
+		"qh", "qc", "qd", "qs",
+		"kh", "kc", "kd", "ks");
+
+	srand(time());
+
+	for($i = 0; $i < 52; $i++) {
+		$count = count($cards);
+		$random = (rand()%$count);
+
+		if($cards[$random] == "") {
+			$i--;
+		} else {
+			$deck[] = $cards[$random];
+			$cards[$random] = "";
+		}
+	}
+
+	srand(time());
+	$starting_point = (rand()%51);
+	print("Starting point for cut cards is: $starting_point<p>");
+
+	// display shuffled cards (EXAMPLE ONLY)
+	for ($index = 0; $index < 52; $index++) {
+		if ($starting_point == 52) { $starting_point = 0; }
+		print("Uncut Point: <strong>$deck[$index]</strong> ");
+		print("Starting Point: <strong>$deck[$starting_point]</strong><br>");
+		$starting_point++;
+	}
+?>
+
+</body>
+</html>

package/website/src/website/data/home-samples/sample.pla.txt

@@ -0,0 +1,4 @@
+.ob out1 out2 out3
+--1--     -        wait     110000
+.ilb in1 in0 wait ack nack
+.symbolic state<3> state<2>;aaa bbb; # comment

package/website/src/website/data/home-samples/sample.plaintext.txt

@@ -0,0 +1,9 @@
+Lorem ipsum dolor sit amet, consectetur adipiscing elit. Donec cursus aliquet sapien, sed rhoncus leo ullamcorper ornare. Interdum et malesuada fames ac ante ipsum primis in faucibus. Phasellus feugiat eleifend nisl, aliquet rhoncus quam scelerisque vel. Morbi eu pellentesque ex. Nam suscipit maximus leo blandit cursus. Aenean sollicitudin nisi luctus, ornare nibh viverra, laoreet ex. Donec eget nibh sit amet dolor ornare elementum. Morbi sollicitudin enim vitae risus pretium vestibulum. Ut pretium hendrerit libero, non vulputate ante volutpat et. Vestibulum ante ipsum primis in faucibus orci luctus et ultrices posuere cubilia Curae; Nullam malesuada turpis vitae est porttitor, id tincidunt neque dignissim. Integer rhoncus vestibulum justo in iaculis. Praesent nec augue ut dui scelerisque gravida vel id velit. Donec vehicula feugiat mollis. Pellentesque habitant morbi tristique senectus et netus et malesuada fames ac turpis egestas.
+
+Praesent diam lorem, luctus quis ullamcorper non, consequat quis orci. Ut vel massa vel nunc sagittis porttitor a vitae ante. Quisque euismod lobortis imperdiet. Vestibulum tincidunt vehicula posuere. Nulla facilisi. Donec sodales imperdiet risus id ullamcorper. Nulla luctus orci tortor, vitae tincidunt urna aliquet nec. Class aptent taciti sociosqu ad litora torquent per conubia nostra, per inceptos himenaeos. Etiam consequat dapibus massa. Sed ac pharetra magna, in imperdiet neque. Nullam nunc nisi, consequat vel nunc et, sagittis aliquam arcu. Aliquam non orci magna. Class aptent taciti sociosqu ad litora torquent per conubia nostra, per inceptos himenaeos. Sed id sem ut sem pulvinar rhoncus. Aenean venenatis nunc eget mi ornare, vitae maximus lacus varius. Quisque quis vestibulum justo.
+
+Donec euismod luctus volutpat. Donec sed lacinia enim. Vivamus aliquam elit cursus, convallis diam at, volutpat turpis. Sed lacinia nisl in auctor dapibus. Nunc turpis mi, mattis ut rhoncus id, lacinia sed lectus. Donec sodales tellus quis libero gravida pretium et quis magna. Etiam ultricies mollis purus, eget consequat velit. Duis vitae nibh vitae arcu tincidunt congue. Maecenas ut velit in ipsum condimentum dictum quis eget urna. Sed mattis nulla arcu, vitae mattis ligula dictum at.
+
+Praesent at dignissim dolor. Donec quis placerat sem. Cras vitae placerat sapien, eu sagittis ex. Mauris nec luctus risus. Cras imperdiet semper neque suscipit auctor. Mauris nisl massa, commodo sit amet dignissim id, malesuada sed ante. Praesent varius sapien eget eros vehicula porttitor.
+
+Mauris auctor nunc in quam tempor, eget consectetur nisi rhoncus. Donec et nulla imperdiet, gravida dui at, accumsan velit. Pellentesque habitant morbi tristique senectus et netus et malesuada fames ac turpis egestas. Proin sollicitudin condimentum auctor. Sed lacinia eleifend nisi, id scelerisque leo laoreet sit amet. Morbi congue augue a malesuada pulvinar. Curabitur nec ante finibus, commodo orci vel, aliquam libero. Morbi molestie purus non nunc placerat fermentum. Pellentesque commodo ligula sed pretium aliquam. Praesent ut nibh ex. Vivamus vestibulum velit in leo suscipit, vitae pellentesque urna vulputate. Suspendisse pretium placerat ligula eu ullamcorper. Nam eleifend mi tellus, ut tristique ante ultricies vitae. Quisque venenatis dapibus tellus sit amet mattis. Donec erat arcu, elementum vel nisl at, sagittis vulputate nisi.

package/website/src/website/data/home-samples/sample.postiats.txt

@@ -0,0 +1,64 @@
+// http://www.ats-lang.org/
+(* Say Hello! once *)
+val () = print"Hello!\n"
+//
+(* Say Hello! 3 times *)
+val () = 3*delay(print"Hello!")
+val () = print_newline((*void*))
+//
+
+//
+(* Build a list of 3 *)
+val xs = $list{int}(0, 1, 2)
+//
+val x0 = xs[0] // legal
+val x1 = xs[1] // legal
+val x2 = xs[2] // legal
+val x3 = xs[3] // illegal
+//
+
+//
+extern
+fun{} f0 (): int
+extern
+fun{} f1 (int): int
+extern
+fun{} repeat_f0f1 (int): int
+//
+implement
+{}(*tmp*)
+repeat_f0f1(n) =
+  if n = 0
+    then f0()
+    else f1(repeat_f0f1(n-1))
+  // end of [if]
+//
+fun
+times (
+  m:int, n:int
+) : int = // m*n
+  repeat_f0f1 (m) where
+{
+  implement f0<> () = 0
+  implement f1<> (x) = x + n
+}
+//
+fun
+power (
+  m:int, n:int
+) : int = // m^n
+  repeat_f0f1 (n) where
+{
+  implement f0<> () = 1
+  implement f1<> (x) = m * x
+}
+//
+val () =
+println! ("5*5 = ", times(5,5))
+val () =
+println! ("5^2 = ", power(5,2))
+val () =
+println! ("2^10 = ", power(2,10))
+val () =
+println! ("3^10 = ", power(3,10))
+//

package/website/src/website/data/home-samples/sample.powerquery.txt

@@ -0,0 +1,12 @@
+let
+    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
+    SplitColumnDelimiter = Table.SplitColumn(Source,"Input",Splitter.SplitTextByDelimiter(","),13),
+    Unpivot = Table.Unpivot(SplitColumnDelimiter,{"Input.1", "Input.2", "Input.3", "Input.4",
+    "Input.5", "Input.6",    "Input.7", "Input.8", "Input.9", "Input.10", "Input.11", "Input.12"
+    ,  "Input.13"},"Attribute","Value"),
+    RemovedColumns = Table.RemoveColumns(Unpivot,{"Attribute"}),
+    DuplicatesRemoved = Table.Distinct(RemovedColumns),
+    GroupedRows = Table.Group(DuplicatesRemoved, {"RowID"}, {{"Count of Distinct Values"
+    , each Table.RowCount(_), type number}})
+in
+    GroupedRows

package/website/src/website/data/home-samples/sample.powershell.txt

@@ -0,0 +1,30 @@
+$SelectedObjectNames=@();
+$XenCenterNodeSelected = 0;
+#the object info array contains hashmaps, each of which represent a parameter set and describe a target in the XenCenter resource list
+foreach($parameterSet in $ObjInfoArray)
+{
+	if ($parameterSet["class"] -eq "blank")
+	{
+		#When the XenCenter node is selected a parameter set is created for each of your connected servers with the class and objUuid keys marked as blank
+		if ($XenCenterNodeSelected)
+		{
+			continue
+		}
+		$XenCenterNodeSelected = 1;
+		$SelectedObjectNames += "XenCenter"
+	}
+	elseif ($parameterSet["sessionRef"] -eq "null")
+	{
+		#When a disconnected server is selected there is no session information, we get null for everything except class
+	}
+		$SelectedObjectNames += "a disconnected server"
+	else
+	{
+		Connect-XenServer -url $parameterSet["url"] -opaqueref $parameterSet["sessionRef"]
+		#Use $class to determine which server objects to get
+		#-properties allows us to filter the results to just include the selected object
+		$exp = "Get-XenServer:{0} -properties @{{uuid='{1}'}}" -f $parameterSet["class"], $parameterSet["objUuid"]
+		$obj = Invoke-Expression $exp
+		$SelectedObjectNames += $obj.name_label;
+	} 
+}

package/website/src/website/data/home-samples/sample.proto.txt

@@ -0,0 +1,11 @@
+syntax = "proto3";
+import public "other.proto";
+
+/* SearchRequest represents a search query, with pagination options to
+ * indicate which results to include in the response. */
+
+message SearchRequest {
+  required string query = 1;
+  optional int32 page_number = 2;  // Which page number do we want?
+  optional int32 result_per_page = 3;  // Number of results to return per page.
+}

package/website/src/website/data/home-samples/sample.pug.txt

@@ -0,0 +1,18 @@
+doctype 5
+html(lang="en")
+    head
+        title= pageTitle
+        script(type='text/javascript')
+            if (foo) {
+                bar()
+            }
+    body
+        // Disclaimer: You will need to turn insertSpaces to true in order for the
+            syntax highlighting to kick in properly (especially for comments)
+            Enjoy :)
+        h1 Pug - node template engine
+        #container
+            if youAreUsingPug
+                p You are amazing
+            else
+                p Get on it!

package/website/src/website/data/home-samples/sample.python.txt

@@ -0,0 +1,13 @@
+import banana
+
+
+class Monkey:
+    # Bananas the monkey can eat.
+    capacity = 10
+    def eat(self, n):
+        """Make the monkey eat n bananas!"""
+        self.capacity -= n * banana.size
+
+    def feeding_frenzy(self):
+        self.eat(9.25)
+        return "Yum yum"

package/website/src/website/data/home-samples/sample.qsharp.txt

@@ -0,0 +1,45 @@
+// Run this cell using Ctrl+Enter (⌘+Enter on Mac)
+// Then run the next cell to see the output
+
+open Microsoft.Quantum.Diagnostics;
+
+operation QubitsDemo () : Unit {
+    // This line allocates a qubit in state |0⟩
+    use q = Qubit();
+    Message("State |0⟩:");
+
+    // This line prints out the state of the quantum computer
+    // Since only one qubit is allocated, only its state is printed
+    DumpMachine();
+
+    // This line changes the qubit from state |0⟩ to state |1⟩
+    X(q);
+
+    Message("State |1⟩:");
+    DumpMachine();
+
+    // This line changes the qubit to state |-⟩ = (1/sqrt(2))(|0⟩ - |1⟩)
+    // That is, this puts the qubit into a superposition
+    // 1/sqrt(2) is approximately 0.707107
+    H(q);
+
+    Message("State |-⟩:");
+    DumpMachine();
+
+    // This line changes the qubit to state |-i⟩ = (1/sqrt(2))(|0⟩ - i|1⟩)
+    S(q);
+
+    Message("State |-i⟩:");
+    DumpMachine();
+
+    // This will put the qubit into an uneven superposition,
+    // where the amplitudes of |0⟩ and |1⟩ have different moduli
+    Rx(2.0, q);
+    Ry(1.0, q);
+
+    Message("Uneven superposition state:");
+    DumpMachine();
+
+    // This line returns the qubit to state |0⟩
+    Reset(q);
+}

package/website/src/website/data/home-samples/sample.r.txt

@@ -0,0 +1,41 @@
+# © Microsoft. All rights reserved.
+
+#' Add together two numbers.
+#' 
+#' @param x A number.
+#' @param y A number.
+#' @return The sum of \code{x} and \code{y}.
+#' @examples
+#' add(1, 1)
+#' add(10, 1)
+add <- function(x, y) {
+  x + y
+}
+
+add(1, 2)
+add(1.0, 2.0)
+add(-1, -2)
+add(-1.0, -2.0)
+add(1.0e10, 2.0e10)
+
+
+#' Concatenate together two strings.
+#' 
+#' @param x A string.
+#' @param y A string.
+#' @return The concatenated string built of \code{x} and \code{y}.
+#' @examples
+#' strcat("one", "two")
+strcat <- function(x, y) {
+  paste(x, y)
+}
+
+paste("one", "two")
+paste('one', 'two')
+paste(NULL, NULL)
+paste(NA, NA)
+
+paste("multi-
+      line",
+      'multi-
+      line')

package/website/src/website/data/home-samples/sample.razor.txt

@@ -0,0 +1,46 @@
+@{
+    var total = 0;
+    var totalMessage = "";
+    @* a multiline
+      razor comment embedded in csharp *@
+    if (IsPost) {
+
+        // Retrieve the numbers that the user entered.
+        var num1 = Request["text1"];
+        var num2 = Request["text2"];
+
+        // Convert the entered strings into integers numbers and add.
+        total = num1.AsInt() + num2.AsInt();
+		<italic><bold>totalMessage = "Total = " + total;</bold></italic>
+    }
+}
+
+<!DOCTYPE html>
+<html lang="en">
+  <head>
+    <title>Add Numbers</title>
+    <meta charset="utf-8" />
+  </head>
+<body>
+  <p>Enter two whole numbers and then click <strong>Add</strong>.</p>
+  <form action="" method="post">
+    <p><label for="text1">First Number:</label>
+      <input type="text" name="text1" />
+    </p>
+    <p><label for="text2">Second Number:</label>
+      <input type="text" name="text2" />
+    </p>
+    <p><input type="submit" value="Add" /></p>
+  </form>
+
+	@* now we call the totalMessage method 
+	   (a multi line razor comment outside code) *@
+
+  <p>@totalMessage</p>
+  
+  <p>@(totalMessage+"!")</p>
+  
+  An email address (with escaped at character): name@@domain.com
+ 
+</body>
+</html>

package/website/src/website/data/home-samples/sample.redis.txt

@@ -0,0 +1,4 @@
+EXISTS mykey
+APPEND mykey "Hello"
+APPEND mykey " World"
+GET mykey

package/website/src/website/data/home-samples/sample.redshift.txt

@@ -0,0 +1,9 @@
+create view tables_vw as
+select distinct(id) table_id
+,trim(datname)   db_name
+,trim(nspname)   schema_name
+,trim(relname)   table_name
+from stv_tbl_perm
+join pg_class on pg_class.oid = stv_tbl_perm.id
+join pg_namespace on pg_namespace.oid = relnamespace
+join pg_database on pg_database.oid = stv_tbl_perm.db_id;

package/website/src/website/data/home-samples/sample.restructuredtext.txt

@@ -0,0 +1,26 @@
+=================
+My Project Readme
+=================
+-------------------------
+Clever subtitle goes here
+-------------------------
+
+Introduction
+============
+
+This is an example reStructuredText document that starts at the very top
+with a title and a sub-title. There is one primary header, Introduction.
+There is one example subheading below.
+The document is just plain text so it is easily readable even before
+being converted to HTML, man page, PDF or other formats.
+
+Subheading
+----------
+
+The basic syntax is not that different from Markdown, but it also
+has many more powerful features that Markdown doesn't have. We aren't
+taking advantage of those yet though.
+
+- Bullet points
+- Are intuitive
+- And simple too

package/website/src/website/data/home-samples/sample.ruby.txt

@@ -0,0 +1,21 @@
+#-------------------------------------------------------------------------
+# Copyright (c) Microsoft. All rights reserved.
+#--------------------------------------------------------------------------
+
+module Azure
+  module Blob
+    class Blob
+      
+      def initialize
+        @properties = {}
+        @metadata = {}
+        yield self if block_given?
+      end
+
+      attr_accessor :name
+      attr_accessor :snapshot
+      attr_accessor :properties
+      attr_accessor :metadata
+    end
+  end
+end

package/website/src/website/data/home-samples/sample.rust.txt

@@ -0,0 +1,29 @@
+fn main() {
+    let greetings = ["Hello", "Hola", "Bonjour",
+                     "Ciao", "こんにちは", "안녕하세요",
+                     "Cześć", "Olá", "Здравствуйте",
+                     "Chào bạn", "您好", "Hallo",
+                     "Hej", "Ahoj", "سلام"];
+
+    for (num, greeting) in greetings.iter().enumerate() {
+        print!("{} : ", greeting);
+        match num {
+            0 =>  println!("This code is editable and runnable!"),
+            1 =>  println!("¡Este código es editable y ejecutable!"),
+            2 =>  println!("Ce code est modifiable et exécutable !"),
+            3 =>  println!("Questo codice è modificabile ed eseguibile!"),
+            4 =>  println!("このコードは編集して実行出来ます！"),
+            5 =>  println!("여기에서 코드를 수정하고 실행할 수 있습니다!"),
+            6 =>  println!("Ten kod można edytować oraz uruchomić!"),
+            7 =>  println!("Este código é editável e executável!"),
+            8 =>  println!("Этот код можно отредактировать и запустить!"),
+            9 =>  println!("Bạn có thể edit và run code trực tiếp!"),
+            10 => println!("这段代码是可以编辑并且能够运行的！"),
+            11 => println!("Dieser Code kann bearbeitet und ausgeführt werden!"),
+            12 => println!("Den här koden kan redigeras och köras!"),
+            13 => println!("Tento kód můžete upravit a spustit"),
+            14 => println!("این کد قابلیت ویرایش و اجرا دارد!"),
+            _ =>  {},
+        }
+    }
+}