Commitf1e781c

authored and

committed

shortcut singleton list in append (dotnet#4445)

1 parentb7c2099 commitf1e781cCopy full SHA for f1e781c

File tree

-5

lines changed

-5

lines changed

Lines changed: 8 additions & 5 deletions

Original file line number	Diff line number	Diff line change
`@@ -3646,11 +3646,14 @@ namespace Microsoft.FSharp.Core`
`3646`	`3646`	`\|(h::t)->`
`3647`	`3647`	`matchlist2with`
`3648`	`3648`	`\|[]->list1`
`3649`		`-\|_->`
`3650`		`-letres=[h]`
`3651`		`-letlastCons=PrivateListHelpers.appendToFreshConsTailrest`
`3652`		`-PrivateListHelpers.setFreshConsTaillastConslist2`
`3653`		`-res`
	`3649`	`+\|_->`
	`3650`	`+matchtwith`
	`3651`	`+\|[]->h::list2`
	`3652`	`+\|_->`
	`3653`	`+letres=[h]`
	`3654`	`+letlastCons=PrivateListHelpers.appendToFreshConsTailrest`
	`3655`	`+PrivateListHelpers.setFreshConsTaillastConslist2`
	`3656`	`+res`
`3654`	`3657`
`3655`	`3658`	`[<CompiledName("Increment")>]`
`3656`	`3659`	`letincrcell=cell.contents<- cell.contents+ 1`

Comments

(0)