Skip to content

Commit 96d40ae

Browse files
committed
Fix 545 - tests (2)
1 parent 7cf1831 commit 96d40ae

File tree

1 file changed

+1
-3
lines changed

1 file changed

+1
-3
lines changed

tests/service/ProjectAnalysisTests.fs

Lines changed: 1 addition & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -4770,9 +4770,7 @@ type A<'XX, 'YY>() =
47704770
[<Test>]
47714771
let ``Test project38 abstract slot information`` () =
47724772
let printAbstractSignature (s: FSharpAbstractSignature) =
4773-
let printType (t: FSharpType) =
4774-
hash t |> ignore // smoke test to check hash code doesn't loop
4775-
(string t).[5 ..]
4773+
let printType (t: FSharpType) = (string t).[5 ..]
47764774
let args =
47774775
(s.AbstractArguments |> Seq.concat |> Seq.map (fun a ->
47784776
(match a.Name with Some n -> n + ":" | _ -> "") + printType a.Type) |> String.concat " * ")

0 commit comments

Comments
 (0)