Skip to content

Commit

Permalink
Cambridge
Browse files Browse the repository at this point in the history
  • Loading branch information
KevinRansom committed Dec 21, 2022
1 parent 5496960 commit a0568ac
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions tests/fsharp/core/attributes/test.fsx
Original file line number Diff line number Diff line change
Expand Up @@ -1136,7 +1136,7 @@ module Bug5762 =
let moduleType = typeof<T>.DeclaringType
let mFindFirstFile = moduleType.GetMethod("FindFirstFile")
let dataParam = mFindFirstFile.GetParameters().[1]
let marshalAsAttrs = dataParam.GetCustomAttributes(typeof<MarshalAsAttribute>, false)
let marshalAsAttrs = dataParam.GetCustomAttributes(typeof<MarshalAsAttribute>, false) |> Array.distinct
check "gjhfdey547"
(match marshalAsAttrs with
| [| (:? MarshalAsAttribute as ma) |] when ma.Value = UnmanagedType.LPStruct -> true
Expand All @@ -1145,7 +1145,7 @@ module Bug5762 =

let findDataType = typeof<WIN32_FIND_DATA>
check "dguyestgfuysdc"
(match findDataType.GetField("cFileName").GetCustomAttributes(typeof<MarshalAsAttribute>, false) with
(match findDataType.GetField("cFileName").GetCustomAttributes(typeof<MarshalAsAttribute>, false) |> Array.distinct with
| [| (:? MarshalAsAttribute as ma) |]
when ma.Value = UnmanagedType.ByValTStr && ma.SizeConst = 260 ->
true
Expand Down

0 comments on commit a0568ac

Please sign in to comment.