DominicFinn

open System
open Nancy
open Nancy.Hosting.Self

let (?) (parameters:obj) param =
    (parameters :?> Nancy.DynamicDictionary).[param]

let sayHello(name) = 
    "hello " + name

DominicFinn

open System
open System.Text.RegularExpressions

let matcher(s) = 
    let regex = new Regex("^[0-9]{2}$")
    let matched = regex.Match(s) 
    matched.Success

let stringOne = matcher "dom" // false
let stringTwo = matcher "12" // true

DominicFinn

#r "FSharp.Data.TypeProviders.dll"
#r "System.Data.Linq.dll"

open System
open System.Linq
open System.Data
open Microsoft.FSharp.Data.TypeProviders
open System.Text.RegularExpressions

[<Literal>]

DominicFinn

open System.Windows.Forms
open System.Threading.Tasks

let createForm() = 
    let form = new Form()

    let button = new Button()
    button.Text <- "Start"
    form.Controls.Add(button)

DominicFinn

#r "C:\\Program Files (x86)\\Reference Assemblies\\Microsoft\\Framework\\.NETFramework\\v4.5\\System.Messaging.dll"

// reference system.messaging, no external dependencies required.
open System.Messaging

// delete the queues if you are playing about and need them again
//MessageQueue.Delete(@".\private$\doms-fsi-queue-1")
//MessageQueue.Delete(@".\private$\doms-fsi-queue-2")

// create a queue with all the defaults 

DominicFinn

var fs = require('fs');

function fileEndsWith(fileName, suffix) {
    return fileName.indexOf(suffix, fileName.length - suffix.length) !== -1;
};

var dir = './tmp/';

fs.readdir(dir, function(err, files) {
	if (err) throw err;

DominicFinn

var people = [
	  { name:"dom", age:22}
	, { name:"paddy", age:22}
	, { name:"pete", age:22}
	, { name:"dick", age:100}
]

var query1 = { field: "age", found: function(field) { 
		if(field > 50) { 
			return true;

DominicFinn

public class Service
{
	public IEnumerable<Report> Report(DateTime start, DateTime end) 
	{
		var results = unitOfWork.Session.CreateSQLQuery(@"
select r.id, r.number
from Report r
where r.Date between =:start and =:end
				")
		                .SetParameter("start", start)

DominicFinn

using System;
using System.Collections.Generic;
using System.Linq;
using System.Reflection;
using System.Text;
using System.Threading.Tasks;

namespace lol
{
    class Program

DominicFinn

open Microsoft.WindowsAzure.Storage
open System.Configuration
open Microsoft.WindowsAzure.Storage.Queue
open System
open Newtonsoft.Json

type Message = { Title:string; Details:string }

type LogMessage =
    | Error of Message