Skip to content

Commit 93e3154

Browse files
dsymebaronfel
dsyme
authored and
baronfel
committed
whitespace cleanup (#6354)
1 parent 4c5fcc7 commit 93e3154

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

43 files changed

+4566
-4548
lines changed

‎src/absil/il.fs

Lines changed: 374 additions & 366 deletions
Large diffs are not rendered by default.

‎src/absil/ilbinary.fs

Lines changed: 249 additions & 249 deletions
Large diffs are not rendered by default.

‎src/absil/illib.fs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1348,9 +1348,9 @@ module Shim =
13481348

13491349
member __.FileStreamReadShim (fileName: string) = new FileStream(fileName, FileMode.Open, FileAccess.Read, FileShare.ReadWrite) :> Stream
13501350

1351-
member __.FileStreamCreateShim (fileName: string) = new FileStream(fileName, FileMode.Create, FileAccess.Write, FileShare.Read , 0x1000, false) :> Stream
1351+
member __.FileStreamCreateShim (fileName: string) = new FileStream(fileName, FileMode.Create, FileAccess.Write, FileShare.Read, 0x1000, false) :> Stream
13521352

1353-
member __.FileStreamWriteExistingShim (fileName: string) = new FileStream(fileName, FileMode.Open, FileAccess.Write, FileShare.Read , 0x1000, false) :> Stream
1353+
member __.FileStreamWriteExistingShim (fileName: string) = new FileStream(fileName, FileMode.Open, FileAccess.Write, FileShare.Read, 0x1000, false) :> Stream
13541354

13551355
member __.GetFullPathShim (fileName: string) = System.IO.Path.GetFullPath fileName
13561356

‎src/absil/ilmorph.fs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -113,7 +113,7 @@ let mref_ty2ty (f: ILType -> ILType) (x:ILMethodRef) =
113113

114114
type formal_scopeCtxt = Choice<ILMethodSpec, ILFieldSpec>
115115

116-
let mspec_ty2ty (((factualty : ILType -> ILType) , (fformalty: formal_scopeCtxt -> ILType -> ILType))) (x: ILMethodSpec) =
116+
let mspec_ty2ty (((factualty : ILType -> ILType), (fformalty: formal_scopeCtxt -> ILType -> ILType))) (x: ILMethodSpec) =
117117
mkILMethSpecForMethRefInTy(mref_ty2ty (fformalty (Choice1Of2 x)) x.MethodRef,
118118
factualty x.DeclaringType,
119119
tys_ty2ty factualty x.GenericArgs)

‎src/absil/ilread.fs

Lines changed: 449 additions & 448 deletions
Large diffs are not rendered by default.

‎src/absil/ilreflect.fs

Lines changed: 374 additions & 368 deletions
Large diffs are not rendered by default.

‎src/absil/ilsupp.fs

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -45,11 +45,11 @@ let MAX_PATH = 260
4545

4646
let E_FAIL = 0x80004005
4747

48-
let bytesToWord ((b0: byte) , (b1: byte)) =
48+
let bytesToWord ((b0: byte), (b1: byte)) =
4949
(int16)b0 ||| ((int16)b1 <<< 8)
50-
let bytesToDWord ((b0: byte) , (b1: byte) , (b2: byte) , (b3: byte)) =
50+
let bytesToDWord ((b0: byte), (b1: byte), (b2: byte), (b3: byte)) =
5151
(int)b0 ||| ((int)b1 <<< 8) ||| ((int)b2 <<< 16) ||| ((int)b3 <<< 24)
52-
let bytesToQWord ((b0: byte) , (b1: byte) , (b2: byte) , (b3: byte) , (b4: byte) , (b5: byte) , (b6: byte) , (b7: byte)) =
52+
let bytesToQWord ((b0: byte), (b1: byte), (b2: byte), (b3: byte), (b4: byte), (b5: byte), (b6: byte), (b7: byte)) =
5353
(int64)b0 ||| ((int64)b1 <<< 8) ||| ((int64)b2 <<< 16) ||| ((int64)b3 <<< 24) ||| ((int64)b4 <<< 32) ||| ((int64)b5 <<< 40) ||| ((int64)b6 <<< 48) ||| ((int64)b7 <<< 56)
5454

5555
let dwToBytes n = [| (byte)(n &&& 0xff) ; (byte)((n >>> 8) &&& 0xff) ; (byte)((n >>> 16) &&& 0xff) ; (byte)((n >>> 24) &&& 0xff) |], 4

‎src/absil/ilwrite.fs

Lines changed: 327 additions & 327 deletions
Large diffs are not rendered by default.

‎src/fsharp/AugmentWithHashCompare.fs

Lines changed: 19 additions & 19 deletions
Original file line numberDiff line numberDiff line change
@@ -712,38 +712,38 @@ let CheckAugmentationAttribs isImplementation g amap (tycon: Tycon) =
712712
// THESE ARE THE LEGITIMATE CASES
713713

714714
// [< >] on anything
715-
| _, _ , None , None, None , None, None , None , None
715+
| _, _, None, None, None, None, None, None, None
716716

717717
// [<CustomEquality; CustomComparison>] on union/record/struct
718-
| true, _, None, Some(true), None , None , None , Some(true), None
718+
| true, _, None, Some(true), None, None, None, Some(true), None
719719

720720
// [<CustomEquality; NoComparison>] on union/record/struct
721-
| true, _, None, Some(true), None , None , Some(true), None , None ->
721+
| true, _, None, Some(true), None, None, Some(true), None, None ->
722722
()
723723

724724
// [<ReferenceEquality; NoComparison>] on union/record/struct
725-
| true, _, None, None , Some(true), None , Some(true), None , None
725+
| true, _, None, None, Some(true), None, Some(true), None, None
726726

727727
// [<ReferenceEquality>] on union/record/struct
728-
| true, _, None, None , Some(true), None , None , None , None ->
728+
| true, _, None, None, Some(true), None, None, None, None ->
729729
if isTrueFSharpStructTycon g tycon then
730730
errorR(Error(FSComp.SR.augNoRefEqualsOnStruct(), m))
731731
else ()
732732

733733
// [<StructuralEquality; StructuralComparison>] on union/record/struct
734-
| true, true, None, None , None , Some(true), None , None , Some(true)
734+
| true, true, None, None, None, Some(true), None, None, Some(true)
735735

736736
// [<StructuralEquality; NoComparison>]
737-
| true, _, None, None , None , Some(true), Some(true), None , None
737+
| true, _, None, None, None, Some(true), Some(true), None, None
738738

739739
// [<StructuralEquality; CustomComparison>]
740-
| true, _, None, None , None , Some(true), None , Some(true), None
740+
| true, _, None, None, None, Some(true), None, Some(true), None
741741

742742
// [<NoComparison>] on anything
743-
| _ , _, None, None , None , None , Some(true), None , None
743+
| _, _, None, None, None, None, Some(true), None, None
744744

745745
// [<NoEquality; NoComparison>] on anything
746-
| _ , _, Some(true), None, None , None , Some(true), None , None ->
746+
| _, _, Some(true), None, None, None, Some(true), None, None ->
747747

748748
()
749749

@@ -754,18 +754,18 @@ let CheckAugmentationAttribs isImplementation g amap (tycon: Tycon) =
754754
errorR(Error(FSComp.SR.augNoEqualityNeedsNoComparison(), m))
755755

756756
// [<StructuralComparison(_)>]
757-
| true, true, _, _, _ , None , _, _, Some(true) ->
757+
| true, true, _, _, _, None, _, _, Some(true) ->
758758
errorR(Error(FSComp.SR.augStructCompNeedsStructEquality(), m))
759759
// [<StructuralEquality(_)>]
760-
| true, _, _, _, _ , Some(true), None, _, None ->
760+
| true, _, _, _, _, Some(true), None, _, None ->
761761
errorR(Error(FSComp.SR.augStructEqNeedsNoCompOrStructComp(), m))
762762

763763
// [<StructuralEquality(_)>]
764-
| true, _, _, Some(true), _ , _, None, None, _ ->
764+
| true, _, _, Some(true), _, _, None, None, _ ->
765765
errorR(Error(FSComp.SR.augCustomEqNeedsNoCompOrCustomComp(), m))
766766

767767
// [<ReferenceEquality; StructuralEquality>]
768-
| true, _, _, _, Some(true) , Some(true) , _, _, _
768+
| true, _, _, _, Some(true), Some(true), _, _, _
769769

770770
// [<ReferenceEquality; StructuralComparison(_) >]
771771
| true, _, _, _, Some(true), _, _, _, Some(true) ->
@@ -774,9 +774,9 @@ let CheckAugmentationAttribs isImplementation g amap (tycon: Tycon) =
774774
// non augmented type, [<ReferenceEquality; ... >]
775775
// non augmented type, [<StructuralEquality; ... >]
776776
// non augmented type, [<StructuralComparison(_); ... >]
777-
| false, _, _, _, Some(true), _ , _ , _, _
778-
| false, _, _, _, _ , Some(true), _ , _, _
779-
| false, _, _, _, _ , _ , _ , _, Some(true) ->
777+
| false, _, _, _, Some(true), _, _, _, _
778+
| false, _, _, _, _, Some(true), _, _, _
779+
| false, _, _, _, _, _, _, _, Some(true) ->
780780
errorR(Error(FSComp.SR.augOnlyCertainTypesCanHaveAttrs(), m))
781781
// All other cases
782782
| _ ->
@@ -829,7 +829,7 @@ let TyconIsCandidateForAugmentationWithCompare (g: TcGlobals) (tycon: Tycon) =
829829
not (TyconRefHasAttribute g tycon.Range g.attrib_IsByRefLikeAttribute (mkLocalTyconRef tycon)) &&
830830
match getAugmentationAttribs g tycon with
831831
// [< >]
832-
| true, true, None, None, None, None , None, None, None
832+
| true, true, None, None, None, None, None, None, None
833833
// [<StructuralEquality; StructuralComparison>]
834834
| true, true, None, None, None, Some(true), None, None, Some(true)
835835
// [<StructuralComparison>]
@@ -845,7 +845,7 @@ let TyconIsCandidateForAugmentationWithEquals (g: TcGlobals) (tycon: Tycon) =
845845

846846
match getAugmentationAttribs g tycon with
847847
// [< >]
848-
| true, _, None, None, None, None , _, _, _
848+
| true, _, None, None, None, None, _, _, _
849849
// [<StructuralEquality; _ >]
850850
// [<StructuralEquality; StructuralComparison>]
851851
| true, _, None, None, None, Some(true), _, _, _ -> true

0 commit comments

Comments
 (0)