Skip to content

Commit

Permalink
Merge pull request #1 from rneatherway/methods
Browse files Browse the repository at this point in the history
Test with overloaded methods and request in call
  • Loading branch information
rojepp committed Jun 23, 2015
2 parents 12c1a2a + ee564f2 commit 6690c7a
Show file tree
Hide file tree
Showing 3 changed files with 11 additions and 6 deletions.
Original file line number Diff line number Diff line change
Expand Up @@ -10,5 +10,7 @@ let add x y = x + y

type NewObjectType() =

member x.Terrific (y : int) : int =
y
member x.Terrific (y : int, z : char) : int = y
member x.Terrific (y : int, z : System.DateTime) : int = y
member x.Terrific (y : Set<'a>, z : int) : Set<'a> = y

Original file line number Diff line number Diff line change
Expand Up @@ -18,9 +18,10 @@ p.project "Test1.fsproj"
p.parse "FileTwo.fs"
p.parse "Program.fs"
Threading.Thread.Sleep(8000)
p.methods "Program.fs" 8 28
p.methods "Program.fs" 6 18
p.methods "Program.fs" 4 36
p.methods "Program.fs" 4 37
p.methods "Program.fs" 8 30
p.methods "Program.fs" 8 35
p.methods "Program.fs" 10 42
Threading.Thread.Sleep(1000)
p.send "quit\n"
p.finalOutput ()
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -5,7 +5,9 @@ let testval = FileTwo.NewObjectType()

let val2 = X.func(2)

let val3 = testval.Terrific(val2)
let val3 = testval.Terrific(val2, 'c')

let val4 = System.DateTime.Parse("hello", )

[<EntryPoint>]
let main args =
Expand Down

0 comments on commit 6690c7a

Please sign in to comment.