jsakamoto

<a id="code2013-kingyobachi-banner" href="http://codejapan.jp/2013/kingyobachi" target="_blank" style="display:inline-block">
<img src="http://codejapan.jp/images/code2013/info-kingyobachi.jpg" title="きんぎょばち ～ teach me / teach you ～ テーマ募集中!!" style="border:none"/>
</a>

jsakamoto

open System
open System.IO
open System.Net

let root = @"c:\inetpub\wwwroot"
let listener = new HttpListener()
listener.Prefixes.Add "http://*:8080/"
listener.Start ()

let rec procreq ():(unit->unit) = 

jsakamoto

if (args.Length == 2 && args[1] == "-f")
{
    sha1(File.ReadAllBytes(args[2]));
}
else if (args.Length == 1)
{
    sha1(Encoding.ASCII.GetBytes(args[1]));
}
else if (args.Length == 0)
{

jsakamoto

// download from http://sourceforge.net/projects/dday-ical/files/
//#r @"DDay.Collections.dll" 
#r "DDay.iCal.dll" 
#r "System.Xml.Linq"
open System
open System.IO
open System.Linq
open System.Xml
open System.Xml.Linq
open DDay.iCal

jsakamoto

// download from http://sourceforge.net/projects/dday-ical/files/
#r @"DDay.Collections.dll" 
#r @"DDay.iCal.dll" 
open DDay.iCal
open System
open System.Linq

new Uri("http://ical.mac.com/ical/Japanese32Holidays.ics")
    |> iCalendar.LoadFromUri
    |> Seq.collect (fun x -> x.Events)

jsakamoto

using DDay.iCal;
using System;
using System.Linq;

// PM> Install-Package DDay.iCal
class Program
{
    static void Main(string[] args)
    {
        var cals = iCalendar.LoadFromUri(new Uri("http://ical.mac.com/ical/Japanese32Holidays.ics"));

jsakamoto

@{
    var comics = new[] { 
        new {Title = "Groo", Publisher = "Dark Horse Comics"},
        new {Title = "Spiderman", Publisher = "Marvel"}
    };
}

<h1>Normal</h1>

<table border="1">

jsakamoto

#r "System.Xml.Linq"
open System
open System.Xml
open System.Xml.Linq
open System.IO

if fsi.CommandLineArgs.Length < 2 then
    raise <| new Exception("error: .gan file name not specified.")

let Element name (xelem:XElement) = xelem.Element(XName.Get(name))

jsakamoto

// PM> Install-Package ChainingAssertion
// http://nuget.org/packages/ChainingAssertion
// http://chainingassertion.codeplex.com/

using System;
using Microsoft.VisualStudio.TestTools.UnitTesting;

public class DateHelper
{
    public static DateTime? ToNullableDate(string input)

jsakamoto

using System;
using System.Configuration;
using System.Web;
using System.Web.Configuration;

public class MvcApplication : System.Web.HttpApplication
{
    public override void Init()
    {
        base.Init();