Skip to content

Commit 3f49b07

Browse files
michalmocarskibaronfel
authored andcommitted
Remove redundant takeWhile
It cancels significant version numbers if they're preceeded by zeros and can lead to inconsistency between product version and file version.
1 parent 61acf88 commit 3f49b07

File tree

1 file changed

+0
-1
lines changed

1 file changed

+0
-1
lines changed

src/fsharp/fsc.fs

Lines changed: 0 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -841,7 +841,6 @@ module MainModuleBuilder =
841841
let validParts =
842842
version.Split('.')
843843
|> Seq.map parseOrZero
844-
|> Seq.takeWhile ((<>) 0us)
845844
|> Seq.toList
846845
match validParts @ [0us; 0us; 0us; 0us] with
847846
| major :: minor :: build :: rev :: _ -> ILVersionInfo(major, minor, build, rev)

0 commit comments

Comments
 (0)