1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
|
namespace AndroidFSharpLanguageUnitTests
open System
open System.Reflection
open System.Collections.Generic
open System.Linq
open System.Text
open Android.App
open Android.Content
open Android.OS
open Android.Runtime
open Android.Views
open Android.Widget
open Xamarin.Android.NUnitLite
open NUnit.Framework
[<Activity (Label = "AndroidFSharpLanguageUnitTests", MainLauncher = true)>]
type MainActivity() =
inherit TestSuiteActivity()
override x.OnCreate(bundle) =
x.AddTest(Assembly.GetExecutingAssembly())
base.OnCreate (bundle)
[<TestFixture; Description("Blah blah")>]
type ``My tests``() =
[<Test>]
member x.``Subtype Tests``() =
let results = true
Assert.IsTrue(results)
|
