Skip to content

F
fsharp

dotNET Platform / fsharp
12 个月 前同步成功

通知 0
Star 1
Fork 0
F
fsharp

体验新版 GitCode，发现更多精彩内容 >>

提交 b3409999 编写于 作者: J jackmott
浏览文件
操作

remove unecessary len vars

上级 9eb09756
隐藏空白更改
内联 并排
Showing with 7 addition and 12 deletion
src/fsharp/FSharp.Core/array.fs
浏览文件 @ b3409999
......@@ -277,8 +277,7 @@ namespace Microsoft.FSharp.Collections
checkNonNull "array1" array1
checkNonNull "array2" array2
let f = OptimizedClosures.FSharpFunc<_,_,_>.Adapt(f)
let len1 = array1.Length
if len1 <> array2.Length then invalidArg "array2" (SR.GetString(SR.arraysHadDifferentLengths));
if array1.Length <> array2.Length then invalidArg "array2" (SR.GetString(SR.arraysHadDifferentLengths));
for i = 0 to array1.Length-1 do
f.Invoke(array1.[i], array2.[i])
......@@ -300,9 +299,8 @@ namespace Microsoft.FSharp.Collections
checkNonNull "array1" array1
checkNonNull "array2" array2
let f = OptimizedClosures.FSharpFunc<_,_,_>.Adapt(f)
let len1 = array1.Length
if len1 <> array2.Length then invalidArg "array2" (SR.GetString(SR.arraysHadDifferentLengths));
let res = Array.zeroCreateUnchecked len1
if array1.Length <> array2.Length then invalidArg "array2" (SR.GetString(SR.arraysHadDifferentLengths));
let res = Array.zeroCreateUnchecked array1.Length
for i = 0 to res.Length-1 do
res.[i] <- f.Invoke(array1.[i], array2.[i])
res
......@@ -326,9 +324,8 @@ namespace Microsoft.FSharp.Collections
checkNonNull "array1" array1
checkNonNull "array2" array2
let f = OptimizedClosures.FSharpFunc<_,_,_,_>.Adapt(f)
let len1 = array1.Length
if len1 <> array2.Length then invalidArg "array2" (SR.GetString(SR.arraysHadDifferentLengths));
let res = Array.zeroCreateUnchecked len1
if array1.Length <> array2.Length then invalidArg "array2" (SR.GetString(SR.arraysHadDifferentLengths));
let res = Array.zeroCreateUnchecked array1.Length
for i = 0 to res.Length-1 do
res.[i] <- f.Invoke(i,array1.[i], array2.[i])
res
......@@ -345,8 +342,7 @@ namespace Microsoft.FSharp.Collections
checkNonNull "array1" array1
checkNonNull "array2" array2
let f = OptimizedClosures.FSharpFunc<_,_,_,_>.Adapt(f)
let len1 = array1.Length
if len1 <> array2.Length then invalidArg "array2" (SR.GetString(SR.arraysHadDifferentLengths));
if array1.Length <> array2.Length then invalidArg "array2" (SR.GetString(SR.arraysHadDifferentLengths));
for i = 0 to array1.Length-1 do
f.Invoke(i,array1.[i], array2.[i])
......@@ -754,8 +750,7 @@ namespace Microsoft.FSharp.Collections
checkNonNull "array2" array2
let f = OptimizedClosures.FSharpFunc<_,_,_,_>.Adapt(f)
let mutable state = acc
let len = array1.Length
if len <> array2.Length then invalidArg "array2" (SR.GetString(SR.arraysHadDifferentLengths))
if array1.Length <> array2.Length then invalidArg "array2" (SR.GetString(SR.arraysHadDifferentLengths))
for i = 0 to array1.Length-1 do
state <- f.Invoke(state,array1.[i],array2.[i])
state
......
Markdown is supported
0% 或 .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑！
想要评论请 注册 或