Skip to content

Commit 789174c

Browse files
committed
Update dependencies indexes to use signature and add failing module abbreviation case.
1 parent 7435583 commit 789174c

File tree

1 file changed

+33
-5
lines changed

1 file changed

+33
-5
lines changed

tests/ParallelTypeCheckingTests/Tests/Scenarios.fs

Lines changed: 33 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -229,7 +229,7 @@ module B
229229
230230
let b = A.a 42
231231
"""
232-
(set [| 1 |])
232+
(set [| 0 |])
233233
]
234234
scenario
235235
"A partial open statement still links to a file as a last resort"
@@ -388,7 +388,7 @@ open A
388388
389389
val b: AType -> unit
390390
"""
391-
(set [| 1 |])
391+
(set [| 0 |])
392392
sourceFile // 3
393393
"B.fs"
394394
"""
@@ -398,7 +398,7 @@ open A
398398
399399
let b (a:AType) = ()
400400
"""
401-
(set [| 1; 2 |])
401+
(set [| 0; 2 |])
402402
sourceFile // 4
403403
"C.fsi"
404404
"""
@@ -425,7 +425,7 @@ open C
425425
426426
val d: CType -> unit
427427
"""
428-
(set [| 1; 5 |])
428+
(set [| 0; 4 |])
429429
sourceFile // 7
430430
"D.fs"
431431
"""
@@ -439,6 +439,34 @@ let d (c: CType) =
439439
let a : AType = failwith "todo"
440440
b a
441441
"""
442-
(set [| 1; 3; 5; 6 |])
442+
(set [| 0; 2; 4; 6 |])
443+
]
444+
scenario
445+
"Module abbreviations with shared namespace"
446+
[
447+
sourceFile
448+
"A.fsi"
449+
"""
450+
module internal FSharp.Compiler.CheckExpressions
451+
452+
exception BakedInMemberConstraintName of string
453+
"""
454+
Set.empty
455+
sourceFile
456+
"A.fs"
457+
"""
458+
module internal FSharp.Compiler.CheckExpressions
459+
460+
exception BakedInMemberConstraintName of string
461+
"""
462+
(set [| 0 |])
463+
sourceFile
464+
"B.fs"
465+
"""
466+
namespace FSharp.Compiler.CodeAnalysis
467+
468+
module Tc = CheckExpressions
469+
"""
470+
(set [| 0 |])
443471
]
444472
]

0 commit comments

Comments
 (0)