Skip to content

Commit 2bc8fed

Browse files
auduchinokbaronfel
authored andcommitted
Fix some typos (#7665)
1 parent b7bc2ca commit 2bc8fed

Some content is hidden

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

74 files changed

+1326
-546
lines changed

fcs/FSharp.Compiler.Service.sln.DotSettings

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

src/absil/bytes.fs

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -87,10 +87,10 @@ type internal ByteBuffer =
8787
let n = arr.Length
8888
let newSize = buf.bbCurrent + n
8989
buf.Ensure newSize
90-
let bbarr = buf.bbArray
91-
let bbbase = buf.bbCurrent
90+
let bbArr = buf.bbArray
91+
let bbBase = buf.bbCurrent
9292
for i = 0 to n - 1 do
93-
bbarr.[bbbase + i] <- byte arr.[i]
93+
bbArr.[bbBase + i] <- byte arr.[i]
9494
buf.bbCurrent <- newSize
9595

9696
member bb.FixupInt32 pos n =

src/absil/il.fs

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -2962,7 +2962,7 @@ let mkILNonGenericEmptyCtor tag superTy =
29622962
mkILCtor (ILMemberAccess.Public, [], mkMethodBody (false, [], 8, nonBranchingInstrsToCode ctor, tag))
29632963

29642964
// --------------------------------------------------------------------
2965-
// Make a static, top level monomophic method - very useful for
2965+
// Make a static, top level monomorphic method - very useful for
29662966
// creating helper ILMethodDefs for internal use.
29672967
// --------------------------------------------------------------------
29682968

@@ -3323,8 +3323,8 @@ let mkILSimpleModule assemblyName modname dll subsystemVersion useHighEntropyVA
33233323
//-----------------------------------------------------------------------
33243324
// [instructions_to_code] makes the basic block structure of code from
33253325
// a primitive array of instructions. We
3326-
// do this by iterating over the instructions, pushing new basic blocks
3327-
// everytime we encounter an address that has been recorded
3326+
// do this be iterating over the instructions, pushing new basic blocks
3327+
// every time we encounter an address that has been recorded
33283328
// [bbstartToCodeLabelMap].
33293329
//-----------------------------------------------------------------------
33303330

src/absil/ilascii.fs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -8,7 +8,7 @@ open FSharp.Compiler.AbstractIL.Internal.Library
88
open FSharp.Compiler.AbstractIL.IL
99

1010
// set to the proper value at CompileOps.fs (BuildFrameworkTcImports)
11-
// Only reelvant when compiling FSharp.Core.dll
11+
// Only relevant when compiling FSharp.Core.dll
1212
let parseILGlobals = ref EcmaMscorlibILGlobals
1313

1414
/// Table of parsing and pretty printing data for instructions.

src/absil/illib.fs

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -164,12 +164,12 @@ module Array =
164164
/// pass an array byref to reverse it in place
165165
let revInPlace (array: 'T []) =
166166
if Array.isEmpty array then () else
167-
let arrlen, revlen = array.Length-1, array.Length/2 - 1
168-
for idx in 0 .. revlen do
167+
let arrLen, revLen = array.Length-1, array.Length/2 - 1
168+
for idx in 0 .. revLen do
169169
let t1 = array.[idx]
170-
let t2 = array.[arrlen-idx]
170+
let t2 = array.[arrLen-idx]
171171
array.[idx] <- t2
172-
array.[arrlen-idx] <- t1
172+
array.[arrLen-idx] <- t1
173173

174174
/// Async implementation of Array.map.
175175
let mapAsync (mapping : 'T -> Async<'U>) (array : 'T[]) : Async<'U[]> =
@@ -624,7 +624,7 @@ type CompilationThreadToken() = interface ExecutionToken
624624
let RequireCompilationThread (_ctok: CompilationThreadToken) = ()
625625

626626
/// Represents a place in the compiler codebase where we are passed a CompilationThreadToken unnecessarily.
627-
/// This reprents code that may potentially not need to be executed on the compilation thread.
627+
/// This represents code that may potentially not need to be executed on the compilation thread.
628628
let DoesNotRequireCompilerThreadTokenAndCouldPossiblyBeMadeConcurrent (_ctok: CompilationThreadToken) = ()
629629

630630
/// Represents a place in the compiler codebase where we assume we are executing on a compilation thread

src/absil/ilmorph.fs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -50,7 +50,7 @@ let code_instr2instr_ty2ty (finstr,fty) (c:ILCode) =
5050
Exceptions = c.Exceptions |> List.map (fun e -> { e with Clause = e.Clause |> (function ILExceptionClause.TypeCatch (ilty, b) -> ILExceptionClause.TypeCatch (fty ilty, b) | cl -> cl) }) }
5151

5252
// --------------------------------------------------------------------
53-
// Standard morphisms - mapping tyes etc.
53+
// Standard morphisms - mapping types etc.
5454
// --------------------------------------------------------------------
5555

5656
let rec ty_tref2tref f x =

src/absil/ilreflect.fs

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1724,7 +1724,7 @@ let buildMethodImplsPass3 cenv _tref (typB: TypeBuilder) emEnv (mimpl: IL.ILMeth
17241724
// typeAttributesOf*
17251725
//----------------------------------------------------------------------------
17261726

1727-
let typeAttrbutesOfTypeDefKind x =
1727+
let typeAttributesOfTypeDefKind x =
17281728
match x with
17291729
// required for a TypeBuilder
17301730
| ILTypeDefKind.Class -> TypeAttributes.Class
@@ -1733,14 +1733,14 @@ let typeAttrbutesOfTypeDefKind x =
17331733
| ILTypeDefKind.Enum -> TypeAttributes.Class
17341734
| ILTypeDefKind.Delegate -> TypeAttributes.Class
17351735

1736-
let typeAttrbutesOfTypeAccess x =
1736+
let typeAttributesOfTypeAccess x =
17371737
match x with
17381738
| ILTypeDefAccess.Public -> TypeAttributes.Public
17391739
| ILTypeDefAccess.Private -> TypeAttributes.NotPublic
17401740
| ILTypeDefAccess.Nested macc ->
17411741
match macc with
17421742
| ILMemberAccess.Assembly -> TypeAttributes.NestedAssembly
1743-
| ILMemberAccess.CompilerControlled -> failwith "Nested compiler controled."
1743+
| ILMemberAccess.CompilerControlled -> failwith "Nested compiler controlled."
17441744
| ILMemberAccess.FamilyAndAssembly -> TypeAttributes.NestedFamANDAssem
17451745
| ILMemberAccess.FamilyOrAssembly -> TypeAttributes.NestedFamORAssem
17461746
| ILMemberAccess.Family -> TypeAttributes.NestedFamily
@@ -1929,7 +1929,7 @@ let rec getTypeRefsInType (allTypes: CollectTypes) ty acc =
19291929
| CollectTypes.ValueTypesOnly -> acc
19301930
| CollectTypes.All -> getTypeRefsInType allTypes eltType acc
19311931
| ILType.Value tspec ->
1932-
// We usee CollectTypes.All because the .NET type loader appears to always eagerly require all types
1932+
// We use CollectTypes.All because the .NET type loader appears to always eagerly require all types
19331933
// referred to in an instantiation of a generic value type
19341934
tspec.TypeRef :: List.foldBack (getTypeRefsInType CollectTypes.All) tspec.GenericArgs acc
19351935
| ILType.Boxed tspec ->

src/absil/ilsupp.fs

Lines changed: 11 additions & 11 deletions
Original file line numberDiff line numberDiff line change
@@ -744,7 +744,7 @@ type ISymUnmanagedWriter2 =
744744
abstract OpenScope: startOffset: int * pRetVal: int byref -> unit
745745
abstract CloseScope: endOffset: int -> unit
746746
abstract SetScopeRange: scopeID: int * startOffset: int * endOffset: int -> unit
747-
abstract DefineLocalVariable: [<MarshalAs(UnmanagedType.LPWStr)>] varname: string *
747+
abstract DefineLocalVariable: [<MarshalAs(UnmanagedType.LPWStr)>] varName: string *
748748
attributes: int *
749749
cSig: int *
750750
[<MarshalAs(UnmanagedType.LPArray, SizeParamIndex=2s)>]signature: byte[] *
@@ -754,23 +754,23 @@ type ISymUnmanagedWriter2 =
754754
addr3: int *
755755
startOffset: int *
756756
endOffset: int -> unit
757-
abstract DefineParameter: [<MarshalAs(UnmanagedType.LPWStr)>] paramname: string *
757+
abstract DefineParameter: [<MarshalAs(UnmanagedType.LPWStr)>] paramName: string *
758758
attributes: int *
759759
sequence: int *
760760
addressKind: int *
761761
addr1: int *
762762
addr2: int *
763763
addr3: int -> unit
764764
abstract DefineField: parent: int *
765-
[<MarshalAs(UnmanagedType.LPWStr)>] fieldname: string *
765+
[<MarshalAs(UnmanagedType.LPWStr)>] fieldName: string *
766766
attributes: int *
767767
cSig: int *
768768
[<MarshalAs(UnmanagedType.LPArray, SizeParamIndex=3s)>]signature: byte[] *
769769
addressKind: int *
770770
addr1: int *
771771
addr2: int *
772772
addr3: int -> unit
773-
abstract DefineGlobalVariable: [<MarshalAs(UnmanagedType.LPWStr)>] globalvarname: string *
773+
abstract DefineGlobalVariable: [<MarshalAs(UnmanagedType.LPWStr)>] globalVarName: string *
774774
attributes: int *
775775
cSig: int *
776776
[<MarshalAs(UnmanagedType.LPArray, SizeParamIndex=2s)>]signature: byte[] *
@@ -780,7 +780,7 @@ type ISymUnmanagedWriter2 =
780780
addr3: int -> unit
781781
abstract Close: unit -> unit
782782
abstract SetSymAttribute: parent: int *
783-
[<MarshalAs(UnmanagedType.LPWStr)>] attname: string *
783+
[<MarshalAs(UnmanagedType.LPWStr)>] attName: string *
784784
cData: int *
785785
[<MarshalAs(UnmanagedType.LPArray, SizeParamIndex=2s)>]data: byte[] -> unit
786786
abstract OpenNamespace: [<MarshalAs(UnmanagedType.LPWStr)>] nsname: string -> unit
@@ -809,16 +809,16 @@ type ISymUnmanagedWriter2 =
809809
[<MarshalAs(UnmanagedType.LPArray, SizeParamIndex=1s)>]endColumns: int [] -> unit
810810
abstract RemapToken: oldToken: int * newToken: int -> unit
811811
abstract Initialize2: emitter: nativeint *
812-
[<MarshalAs(UnmanagedType.LPWStr)>] tempfilename: string *
812+
[<MarshalAs(UnmanagedType.LPWStr)>] tempFileName: string *
813813
stream: IStream *
814814
fullBuild: bool *
815-
[<MarshalAs(UnmanagedType.LPWStr)>] finalfilename: string -> unit
816-
abstract DefineConstant: [<MarshalAs(UnmanagedType.LPWStr)>] constname: string *
815+
[<MarshalAs(UnmanagedType.LPWStr)>] finalFileName: string -> unit
816+
abstract DefineConstant: [<MarshalAs(UnmanagedType.LPWStr)>] constName: string *
817817
value: Object *
818818
cSig: int *
819819
[<MarshalAs(UnmanagedType.LPArray, SizeParamIndex=2s)>]signature: byte[] -> unit
820820
abstract Abort: unit -> unit
821-
abstract DefineLocalVariable2: [<MarshalAs(UnmanagedType.LPWStr)>] localvarname2: string *
821+
abstract DefineLocalVariable2: [<MarshalAs(UnmanagedType.LPWStr)>] localVarName2: string *
822822
attributes: int *
823823
sigToken: int *
824824
addressKind: int *
@@ -827,14 +827,14 @@ type ISymUnmanagedWriter2 =
827827
addr3: int *
828828
startOffset: int *
829829
endOffset: int -> unit
830-
abstract DefineGlobalVariable2: [<MarshalAs(UnmanagedType.LPWStr)>] globalvarname2: string *
830+
abstract DefineGlobalVariable2: [<MarshalAs(UnmanagedType.LPWStr)>] globalVarName2: string *
831831
attributes: int *
832832
sigToken: int *
833833
addressKind: int *
834834
addr1: int *
835835
addr2: int *
836836
addr3: int -> unit
837-
abstract DefineConstant2: [<MarshalAs(UnmanagedType.LPWStr)>] constantname2: string *
837+
abstract DefineConstant2: [<MarshalAs(UnmanagedType.LPWStr)>] constantName2: string *
838838
value: Object *
839839
sigToken: int -> unit
840840
abstract OpenMethod2: method2: int *

0 commit comments

Comments
 (0)