Find All References for Partial/Active Patterns #2745
Triggered via pull request
December 19, 2025 03:19
Status
Failure
Total duration
41m 24s
Artifacts
–
Annotations
24 errors
|
Build on ubuntu-latest for 8.0 WorkspaceLoader BackgroundCompiler
Process completed with exit code 1.
|
|
FSAC.lsp.Ionide WorkspaceLoader.BackgroundCompiler.Find All References tests.ActivePatternProject.inside Patterns.fs.IsOneOfChoice
1. reference inside file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs has incorrect range.
Note: Ranges in actual might be longer than in expected. That's ok because `exact=false`
. String does not match at position 3510. Expected char: 'v', but got '〈'.
---------- Expected: ------------------
namespace ActivePatternProject
module Seq =
let inline tryPickV chooser (source: seq<'T>) =
use e = source.GetEnumerator()
let mutable res = ValueNone
while (ValueOption.isNone res && e.MoveNext()) do
res <- chooser e.Current
res
/// Module containing various active pattern definitions
module Patterns =
// ============================================
// TOTAL/FULL ACTIVE PATTERNS
// ============================================
/// Total active pattern for even/odd classification
let (|Even|Odd|) value =
if value % 2 = 0 then Even else Odd
/// Total active pattern for sign classification
let (|Positive|Negative|Zero|) value =
if value > 0 then Positive
elif value < 0 then Negative
else Zero
// ============================================
// PARTIAL ACTIVE PATTERNS
// ============================================
/// Partial active pattern for parsing integers
let (|ParseInt|_|) (input: string) =
match System.Int32.TryParse input with
| true, v -> Some v
| false, _ -> None
/// Partial active pattern for parsing floats
let (|ParseFloat|_|) (input: string) =
match System.Double.TryParse input with
| true, v -> Some v
| false, _ -> None
/// Partial active pattern for non-empty strings
let (|NonEmpty|_|) (input: string) =
if System.String.IsNullOrWhiteSpace input then None
else Some input
// ============================================
// PARAMETERIZED ACTIVE PATTERNS
// ============================================
/// Parameterized active pattern for divisibility
let (|DivisibleBy|_|) divisor value =
if value % divisor = 0 then Some(value / divisor)
else None
/// Parameterized active pattern for regex matching
let (|Regex|_|) pattern input =
let m = System.Text.RegularExpressions.Regex.Match(input, pattern)
if m.Success then Some m.Value
else None
// ============================================
// STRUCT PARTIAL ACTIVE PATTERNS (F# 7+)
// These use ValueOption for better performance (no heap allocation)
// ============================================
/// Struct partial active pattern for parsing integers
[<return: Struct>]
let (|ParseIntStruct|_|) (input: string) =
match System.Int32.TryParse input with
| true, v -> ValueSome v
| false, _ -> ValueNone
/// Struct partial active pattern for parsing floats
[<return: Struct>]
let (|ParseFloatStruct|_|) (input: string) =
match System.Double.TryParse input with
| true, v -> ValueSome v
| false, _ -> ValueNone
/// Struct partial active pattern for non-empty strings
[<return: Struct>]
let (|NonEmptyStruct|_|) (input: string) =
if System.String.IsNullOrWhiteSpace input then ValueNone
else ValueSome input
/// Struct parameterized active pattern for divisibility
[<return: Struct>]
let inline (|DivisibleByStruct|_|) divisor value =
if value % divisor = 0 then ValueSome(value / divisor)
else ValueNone
[<return: Struct>]
let inline (|IsOneOfChoice|_|) (chooser: 'a -> 'b -> 'c voption, values : 'a seq) (item : 'b) =
//> ^^^^^^^^^^^^^^^^^ IsOneOfChoice
values |> Seq.tryPickV (fun x -> chooser x item)
[<return: Struct>]
let inline (|StrStartsWith|_|) (value : string) (item : string) =
if item.StartsWith value then ValueSome ()
else ValueNone
[<return: Struct>]
let inline (|StrStartsWithOneOf|_|) (values : string
|
|
Build on ubuntu-latest for 8.0 WorkspaceLoader TransparentCompiler
Process completed with exit code 1.
|
|
FSAC.lsp.Ionide WorkspaceLoader.TransparentCompiler.Find All References tests.ActivePatternProject.inside Patterns.fs.IsOneOfChoice
Should find references in correct docs. Sequence does not match at position 1. Expected item: "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module2.fs", but got "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs".
expected:
[0] "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module1.fs"
[1] "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module2.fs"
[2] "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs"
actual:
[0] "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module1.fs"
[1] "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs"
at FsAutoComplete.Tests.FindReferences.Expect.inspect@157(FSharpFunc`2 getSource, Boolean exact, Location[] actual, Location[] expected, Unit unitVar0) in /home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/FindReferencesTests.fs:line 163
at FsAutoComplete.Tests.FindReferences.Expect.locationsEqual(FSharpFunc`2 getSource, Boolean exact, Location[] actual, Location[] expected) in /home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/FindReferencesTests.fs:line 210
at FsAutoComplete.Tests.FindReferences.activePatternProjectTests@463-5.Invoke(FSharpResult`2 refs) in /home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/FindReferencesTests.fs:line 474
at Microsoft.FSharp.Control.AsyncPrimitives.CallThenInvokeNoHijackCheck[a,b](AsyncActivation`1 ctxt, b result1, FSharpFunc`2 userCode) in D:\a\_work\1\s\src\fsharp\src\FSharp.Core\async.fs:line 527
at FsAutoComplete.CommandsModule.symbolUseWorkspaceAux@1000-23.Invoke(AsyncActivation`1 ctxt)
|
|
Build on ubuntu-latest for 9.0 WorkspaceLoader TransparentCompiler
Process completed with exit code 1.
|
|
FSAC.lsp.Ionide WorkspaceLoader.TransparentCompiler.Find All References tests.ActivePatternProject.inside Patterns.fs.IsOneOfChoice
Should find references in correct docs. Sequence does not match at position 1. Expected item: "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module2.fs", but got "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs".
expected:
[0] "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module1.fs"
[1] "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module2.fs"
[2] "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs"
actual:
[0] "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module1.fs"
[1] "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs"
at FsAutoComplete.Tests.FindReferences.Expect.inspect@157(FSharpFunc`2 getSource, Boolean exact, Location[] actual, Location[] expected, Unit unitVar0) in /home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/FindReferencesTests.fs:line 163
at FsAutoComplete.Tests.FindReferences.Expect.locationsEqual(FSharpFunc`2 getSource, Boolean exact, Location[] actual, Location[] expected) in /home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/FindReferencesTests.fs:line 210
at FsAutoComplete.Tests.FindReferences.activePatternProjectTests@463-5.Invoke(FSharpResult`2 refs) in /home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/FindReferencesTests.fs:line 474
at Microsoft.FSharp.Control.AsyncPrimitives.CallThenInvokeNoHijackCheck[a,b](AsyncActivation`1 ctxt, b result1, FSharpFunc`2 userCode) in D:\a\_work\1\s\src\fsharp\src\FSharp.Core\async.fs:line 527
at FsAutoComplete.CommandsModule.symbolUseWorkspaceAux@1000-23.Invoke(AsyncActivation`1 ctxt)
|
|
Build on ubuntu-latest for 10.0 WorkspaceLoader TransparentCompiler
Process completed with exit code 1.
|
|
FSAC.lsp.Ionide WorkspaceLoader.TransparentCompiler.Find All References tests.ActivePatternProject.inside Patterns.fs.IsOneOfChoice
Should find references in correct docs. Sequence does not match at position 1. Expected item: "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module2.fs", but got "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs".
expected:
[0] "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module1.fs"
[1] "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module2.fs"
[2] "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs"
actual:
[0] "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module1.fs"
[1] "file:///home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs"
at FsAutoComplete.Tests.FindReferences.Expect.inspect@157(FSharpFunc`2 getSource, Boolean exact, Location[] actual, Location[] expected, Unit unitVar0) in /home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/FindReferencesTests.fs:line 163
at FsAutoComplete.Tests.FindReferences.Expect.locationsEqual(FSharpFunc`2 getSource, Boolean exact, Location[] actual, Location[] expected) in /home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/FindReferencesTests.fs:line 210
at FsAutoComplete.Tests.FindReferences.activePatternProjectTests@463-5.Invoke(FSharpResult`2 refs) in /home/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/FindReferencesTests.fs:line 474
at Microsoft.FSharp.Control.AsyncPrimitives.CallThenInvokeNoHijackCheck[a,b](AsyncActivation`1 ctxt, b result1, FSharpFunc`2 userCode) in D:\a\_work\1\s\src\fsharp\src\FSharp.Core\async.fs:line 527
at FsAutoComplete.CommandsModule.symbolUseWorkspaceAux@1000-23.Invoke(AsyncActivation`1 ctxt)
|
|
Build on windows-latest for 8.0 WorkspaceLoader BackgroundCompiler
Process completed with exit code 1.
|
|
FSAC.lsp.Ionide WorkspaceLoader.BackgroundCompiler.Find All References tests.ActivePatternProject.inside Patterns.fs.IsOneOfChoice
Found 3 references in doc file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs, but expected 2 references.
Note: Ranges in actual might be longer than in expected. That's ok because `exact=false`
. String does not match at position 3316. Expected char: 'v', but got '〈'.
---------- Expected: ------------------
namespace ActivePatternProject
module Seq =
let inline tryPickV chooser (source: seq<'T>) =
use e = source.GetEnumerator()
let mutable res = ValueNone
while (ValueOption.isNone res && e.MoveNext()) do
res <- chooser e.Current
res
/// Module containing various active pattern definitions
module Patterns =
// ============================================
// TOTAL/FULL ACTIVE PATTERNS
// ============================================
/// Total active pattern for even/odd classification
let (|Even|Odd|) value =
if value % 2 = 0 then Even else Odd
/// Total active pattern for sign classification
let (|Positive|Negative|Zero|) value =
if value > 0 then Positive
elif value < 0 then Negative
else Zero
// ============================================
// PARTIAL ACTIVE PATTERNS
// ============================================
/// Partial active pattern for parsing integers
let (|ParseInt|_|) (input: string) =
match System.Int32.TryParse input with
| true, v -> Some v
| false, _ -> None
/// Partial active pattern for parsing floats
let (|ParseFloat|_|) (input: string) =
match System.Double.TryParse input with
| true, v -> Some v
| false, _ -> None
/// Partial active pattern for non-empty strings
let (|NonEmpty|_|) (input: string) =
if System.String.IsNullOrWhiteSpace input then None
else Some input
// ============================================
// PARAMETERIZED ACTIVE PATTERNS
// ============================================
/// Parameterized active pattern for divisibility
let (|DivisibleBy|_|) divisor value =
if value % divisor = 0 then Some(value / divisor)
else None
/// Parameterized active pattern for regex matching
let (|Regex|_|) pattern input =
let m = System.Text.RegularExpressions.Regex.Match(input, pattern)
if m.Success then Some m.Value
else None
// ============================================
// STRUCT PARTIAL ACTIVE PATTERNS (F# 7+)
// These use ValueOption for better performance (no heap allocation)
// ============================================
/// Struct partial active pattern for parsing integers
[<return: Struct>]
let (|ParseIntStruct|_|) (input: string) =
match System.Int32.TryParse input with
| true, v -> ValueSome v
| false, _ -> ValueNone
/// Struct partial active pattern for parsing floats
[<return: Struct>]
let (|ParseFloatStruct|_|) (input: string) =
match System.Double.TryParse input with
| true, v -> ValueSome v
| false, _ -> ValueNone
/// Struct partial active pattern for non-empty strings
[<return: Struct>]
let (|NonEmptyStruct|_|) (input: string) =
if System.String.IsNullOrWhiteSpace input then ValueNone
else ValueSome input
/// Struct parameterized active pattern for divisibility
[<return: Struct>]
let inline (|DivisibleByStruct|_|) divisor value =
if value % divisor = 0 then ValueSome(value / divisor)
else ValueNone
[<return: Struct>]
let inline (〈|IsOneOfChoice|_|〉) (chooser: 'a -> 'b -> 'c voption, values : 'a seq) (item : 'b) =
//> ^^^^^^^^^^^^^^^^^ IsOneOfChoice
values |> Seq.tryPickV (fun x -> chooser x item)
[<return: Struct>]
let inline (|StrStartsWith|_|) (value : string) (item : string) =
if item.StartsWith value then ValueSome ()
else ValueNone
[<return: Struct>]
let inline (|StrStartsWithOneOf|_|) (values
|
|
Build on windows-latest for 8.0 WorkspaceLoader TransparentCompiler
Process completed with exit code 1.
|
|
FSAC.lsp.Ionide WorkspaceLoader.TransparentCompiler.Find All References tests.ActivePatternProject.inside Patterns.fs.IsOneOfChoice
Should find references in correct docs. Sequence does not match at position 1. Expected item: "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module2.fs", but got "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs".
expected:
[0] "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module1.fs"
[1] "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module2.fs"
[2] "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs"
actual:
[0] "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module1.fs"
[1] "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs"
at FsAutoComplete.Tests.FindReferences.Expect.inspect@157(FSharpFunc`2 getSource, Boolean exact, Location[] actual, Location[] expected, Unit unitVar0) in D:\a\FsAutoComplete\FsAutoComplete\test\FsAutoComplete.Tests.Lsp\FindReferencesTests.fs:line 163
at FsAutoComplete.Tests.FindReferences.Expect.locationsEqual(FSharpFunc`2 getSource, Boolean exact, Location[] actual, Location[] expected) in D:\a\FsAutoComplete\FsAutoComplete\test\FsAutoComplete.Tests.Lsp\FindReferencesTests.fs:line 210
at FsAutoComplete.Tests.FindReferences.activePatternProjectTests@463-5.Invoke(FSharpResult`2 refs) in D:\a\FsAutoComplete\FsAutoComplete\test\FsAutoComplete.Tests.Lsp\FindReferencesTests.fs:line 474
at Microsoft.FSharp.Control.AsyncPrimitives.CallThenInvokeNoHijackCheck[a,b](AsyncActivation`1 ctxt, b result1, FSharpFunc`2 userCode) in D:\a\_work\1\s\src\fsharp\src\FSharp.Core\async.fs:line 527
at FsAutoComplete.CommandsModule.symbolUseWorkspaceAux@1000-23.Invoke(AsyncActivation`1 ctxt)
|
|
Build on windows-latest for 9.0 WorkspaceLoader TransparentCompiler
Process completed with exit code 1.
|
|
FSAC.lsp.Ionide WorkspaceLoader.TransparentCompiler.Find All References tests.ActivePatternProject.inside Patterns.fs.IsOneOfChoice
Should find references in correct docs. Sequence does not match at position 1. Expected item: "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module2.fs", but got "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs".
expected:
[0] "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module1.fs"
[1] "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module2.fs"
[2] "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs"
actual:
[0] "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module1.fs"
[1] "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs"
at FsAutoComplete.Tests.FindReferences.Expect.inspect@157(FSharpFunc`2 getSource, Boolean exact, Location[] actual, Location[] expected, Unit unitVar0) in D:\a\FsAutoComplete\FsAutoComplete\test\FsAutoComplete.Tests.Lsp\FindReferencesTests.fs:line 163
at FsAutoComplete.Tests.FindReferences.Expect.locationsEqual(FSharpFunc`2 getSource, Boolean exact, Location[] actual, Location[] expected) in D:\a\FsAutoComplete\FsAutoComplete\test\FsAutoComplete.Tests.Lsp\FindReferencesTests.fs:line 210
at FsAutoComplete.Tests.FindReferences.activePatternProjectTests@463-5.Invoke(FSharpResult`2 refs) in D:\a\FsAutoComplete\FsAutoComplete\test\FsAutoComplete.Tests.Lsp\FindReferencesTests.fs:line 474
at Microsoft.FSharp.Control.AsyncPrimitives.CallThenInvokeNoHijackCheck[a,b](AsyncActivation`1 ctxt, b result1, FSharpFunc`2 userCode) in D:\a\_work\1\s\src\fsharp\src\FSharp.Core\async.fs:line 527
at FsAutoComplete.CommandsModule.symbolUseWorkspaceAux@1000-23.Invoke(AsyncActivation`1 ctxt)
|
|
Build on windows-latest for 10.0 WorkspaceLoader TransparentCompiler
Process completed with exit code 1.
|
|
FSAC.lsp.Ionide WorkspaceLoader.TransparentCompiler.Find All References tests.ActivePatternProject.inside Patterns.fs.IsOneOfChoice
Should find references in correct docs. Sequence does not match at position 1. Expected item: "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module2.fs", but got "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs".
expected:
[0] "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module1.fs"
[1] "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module2.fs"
[2] "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs"
actual:
[0] "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module1.fs"
[1] "file:///d%3A/a/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs"
at FsAutoComplete.Tests.FindReferences.Expect.inspect@157(FSharpFunc`2 getSource, Boolean exact, Location[] actual, Location[] expected, Unit unitVar0) in D:\a\FsAutoComplete\FsAutoComplete\test\FsAutoComplete.Tests.Lsp\FindReferencesTests.fs:line 163
at FsAutoComplete.Tests.FindReferences.Expect.locationsEqual(FSharpFunc`2 getSource, Boolean exact, Location[] actual, Location[] expected) in D:\a\FsAutoComplete\FsAutoComplete\test\FsAutoComplete.Tests.Lsp\FindReferencesTests.fs:line 210
at FsAutoComplete.Tests.FindReferences.activePatternProjectTests@463-5.Invoke(FSharpResult`2 refs) in D:\a\FsAutoComplete\FsAutoComplete\test\FsAutoComplete.Tests.Lsp\FindReferencesTests.fs:line 474
at Microsoft.FSharp.Control.AsyncPrimitives.CallThenInvokeNoHijackCheck[a,b](AsyncActivation`1 ctxt, b result1, FSharpFunc`2 userCode) in D:\a\_work\1\s\src\fsharp\src\FSharp.Core\async.fs:line 527
at FsAutoComplete.CommandsModule.symbolUseWorkspaceAux@1000-23.Invoke(AsyncActivation`1 ctxt)
|
|
Build on macos-15 for 8.0 WorkspaceLoader BackgroundCompiler
Process completed with exit code 1.
|
|
FSAC.lsp.Ionide WorkspaceLoader.BackgroundCompiler.Find All References tests.ActivePatternProject.inside Patterns.fs.IsOneOfChoice
Found 3 references in doc file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs, but expected 2 references.
Note: Ranges in actual might be longer than in expected. That's ok because `exact=false`
. String does not match at position 344. Expected char: 'P', but got '〈'.
---------- Expected: ------------------
namespace ActivePatternProject
module Seq =
let inline tryPickV chooser (source: seq<'T>) =
use e = source.GetEnumerator()
let mutable res = ValueNone
while (ValueOption.isNone res && e.MoveNext()) do
res <- chooser e.Current
res
/// Module containing various active pattern definitions
module Patterns =
// ============================================
// TOTAL/FULL ACTIVE PATTERNS
// ============================================
/// Total active pattern for even/odd classification
let (|Even|Odd|) value =
if value % 2 = 0 then Even else Odd
/// Total active pattern for sign classification
let (|Positive|Negative|Zero|) value =
if value > 0 then Positive
elif value < 0 then Negative
else Zero
// ============================================
// PARTIAL ACTIVE PATTERNS
// ============================================
/// Partial active pattern for parsing integers
let (|ParseInt|_|) (input: string) =
match System.Int32.TryParse input with
| true, v -> Some v
| false, _ -> None
/// Partial active pattern for parsing floats
let (|ParseFloat|_|) (input: string) =
match System.Double.TryParse input with
| true, v -> Some v
| false, _ -> None
/// Partial active pattern for non-empty strings
let (|NonEmpty|_|) (input: string) =
if System.String.IsNullOrWhiteSpace input then None
else Some input
// ============================================
// PARAMETERIZED ACTIVE PATTERNS
// ============================================
/// Parameterized active pattern for divisibility
let (|DivisibleBy|_|) divisor value =
if value % divisor = 0 then Some(value / divisor)
else None
/// Parameterized active pattern for regex matching
let (|Regex|_|) pattern input =
let m = System.Text.RegularExpressions.Regex.Match(input, pattern)
if m.Success then Some m.Value
else None
// ============================================
// STRUCT PARTIAL ACTIVE PATTERNS (F# 7+)
// These use ValueOption for better performance (no heap allocation)
// ============================================
/// Struct partial active pattern for parsing integers
[<return: Struct>]
let (|ParseIntStruct|_|) (input: string) =
match System.Int32.TryParse input with
| true, v -> ValueSome v
| false, _ -> ValueNone
/// Struct partial active pattern for parsing floats
[<return: Struct>]
let (|ParseFloatStruct|_|) (input: string) =
match System.Double.TryParse input with
| true, v -> ValueSome v
| false, _ -> ValueNone
/// Struct partial active pattern for non-empty strings
[<return: Struct>]
let (|NonEmptyStruct|_|) (input: string) =
if System.String.IsNullOrWhiteSpace input then ValueNone
else ValueSome input
/// Struct parameterized active pattern for divisibility
[<return: Struct>]
let inline (|DivisibleByStruct|_|) divisor value =
if value % divisor = 0 then ValueSome(value / divisor)
else ValueNone
[<return: Struct>]
let inline (〈|IsOneOfChoice|_|〉) (chooser: 'a -> 'b -> 'c voption, values : 'a seq) (item : 'b) =
//> ^^^^^^^^^^^^^^^^^ IsOneOfChoice
values |> Seq.tryPickV (fun x -> chooser x item)
[<return: Struct>]
let inline (|StrStartsWith|_|) (value : string) (item : string) =
if item.StartsWith value then ValueSome ()
else ValueNone
[<return: Struct>]
let inline (|StrStart
|
|
Build on macos-15 for 9.0 WorkspaceLoader TransparentCompiler
Process completed with exit code 1.
|
|
FSAC.lsp.Ionide WorkspaceLoader.TransparentCompiler.Find All References tests.ActivePatternProject.inside Patterns.fs.IsOneOfChoice
Should find references in correct docs. Sequence does not match at position 1. Expected item: "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module2.fs", but got "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs".
expected:
[0] "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module1.fs"
[1] "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module2.fs"
[2] "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs"
actual:
[0] "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module1.fs"
[1] "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs"
at FsAutoComplete.Tests.FindReferences.Expect.inspect@157(FSharpFunc`2 getSource, Boolean exact, Location[] actual, Location[] expected, Unit unitVar0) in /Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/FindReferencesTests.fs:line 163
at FsAutoComplete.Tests.FindReferences.Expect.locationsEqual(FSharpFunc`2 getSource, Boolean exact, Location[] actual, Location[] expected) in /Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/FindReferencesTests.fs:line 210
at FsAutoComplete.Tests.FindReferences.activePatternProjectTests@463-5.Invoke(FSharpResult`2 refs) in /Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/FindReferencesTests.fs:line 474
at Microsoft.FSharp.Control.AsyncPrimitives.CallThenInvokeNoHijackCheck[a,b](AsyncActivation`1 ctxt, b result1, FSharpFunc`2 userCode) in D:\a\_work\1\s\src\fsharp\src\FSharp.Core\async.fs:line 527
at FsAutoComplete.CommandsModule.symbolUseWorkspaceAux@1000-23.Invoke(AsyncActivation`1 ctxt)
|
|
Build on macos-15 for 10.0 WorkspaceLoader TransparentCompiler
Process completed with exit code 1.
|
|
FSAC.lsp.Ionide WorkspaceLoader.TransparentCompiler.Find All References tests.ActivePatternProject.inside Patterns.fs.IsOneOfChoice
Should find references in correct docs. Sequence does not match at position 1. Expected item: "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module2.fs", but got "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs".
expected:
[0] "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module1.fs"
[1] "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module2.fs"
[2] "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs"
actual:
[0] "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module1.fs"
[1] "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs"
at FsAutoComplete.Tests.FindReferences.Expect.inspect@157(FSharpFunc`2 getSource, Boolean exact, Location[] actual, Location[] expected, Unit unitVar0) in /Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/FindReferencesTests.fs:line 163
at FsAutoComplete.Tests.FindReferences.Expect.locationsEqual(FSharpFunc`2 getSource, Boolean exact, Location[] actual, Location[] expected) in /Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/FindReferencesTests.fs:line 210
at FsAutoComplete.Tests.FindReferences.activePatternProjectTests@463-5.Invoke(FSharpResult`2 refs) in /Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/FindReferencesTests.fs:line 474
at Microsoft.FSharp.Control.AsyncPrimitives.CallThenInvokeNoHijackCheck[a,b](AsyncActivation`1 ctxt, b result1, FSharpFunc`2 userCode) in D:\a\_work\1\s\src\fsharp\src\FSharp.Core\async.fs:line 527
at FsAutoComplete.CommandsModule.symbolUseWorkspaceAux@1000-23.Invoke(AsyncActivation`1 ctxt)
|
|
Build on macos-15 for 8.0 WorkspaceLoader TransparentCompiler
Process completed with exit code 1.
|
|
FSAC.lsp.Ionide WorkspaceLoader.TransparentCompiler.Find All References tests.ActivePatternProject.inside Patterns.fs.IsOneOfChoice
Should find references in correct docs. Sequence does not match at position 1. Expected item: "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module2.fs", but got "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs".
expected:
[0] "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module1.fs"
[1] "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module2.fs"
[2] "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs"
actual:
[0] "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Module1.fs"
[1] "file:///Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/TestCases/FindReferences/ActivePatternProject/Patterns.fs"
at FsAutoComplete.Tests.FindReferences.Expect.inspect@157(FSharpFunc`2 getSource, Boolean exact, Location[] actual, Location[] expected, Unit unitVar0) in /Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/FindReferencesTests.fs:line 163
at FsAutoComplete.Tests.FindReferences.Expect.locationsEqual(FSharpFunc`2 getSource, Boolean exact, Location[] actual, Location[] expected) in /Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/FindReferencesTests.fs:line 210
at FsAutoComplete.Tests.FindReferences.activePatternProjectTests@463-5.Invoke(FSharpResult`2 refs) in /Users/runner/work/FsAutoComplete/FsAutoComplete/test/FsAutoComplete.Tests.Lsp/FindReferencesTests.fs:line 474
at Microsoft.FSharp.Control.AsyncPrimitives.CallThenInvokeNoHijackCheck[a,b](AsyncActivation`1 ctxt, b result1, FSharpFunc`2 userCode) in D:\a\_work\1\s\src\fsharp\src\FSharp.Core\async.fs:line 527
at FsAutoComplete.CommandsModule.symbolUseWorkspaceAux@1000-23.Invoke(AsyncActivation`1 ctxt)
|