Simple Test

Calendar.cs

using System;

namespace Aperea.iCalendar
{
    public class Calendar
    {
        public void SetTime(DateTime dateTime)
        {
        }

        public int Year { get; set; }
    }
}

CalendarSpec.fs

module CalendarSpec

open System
open Aperea.iCalendar
open NaturalSpec

let setting_starttime_to time (calendar:Calendar) = 
    printMethod time
    calendar.SetTime(time)
    calendar

let freshOne = new Calendar()

let Then = Whereas
let Should = It should
    
[<Scenario>]
let With_a_fresh_calendar() =
    Given freshOne
       |> When setting_starttime_to (new DateTime(2010,10,8))
       |> Then freshOne.Year
       |> Should equal 2010
       |> Verify