Commit72b8421

Vasily Kirichenko

authored and

Vasily Kirichenko

committed

add logging

1 parentb946161 commit72b8421Copy full SHA for 72b8421

File tree

+11

-1

lines changed

+11

-1

lines changed

Lines changed: 11 additions & 1 deletion

Original file line number	Diff line number	Diff line change
`@@ -443,12 +443,22 @@ module internal Extensions =`
`443`	`443`	`letparseAndCheckFile=`
`444`	`444`	`async{`
`445`	`445`	`let!parseResults,checkFileAnswer= this.ParseAndCheckFileInProject(filePath, textVersionHash, sourceText, options)`
`446`		`-return`
	`446`	`+letres=`
`447`	`447`	`match checkFileAnswerwith`
`448`	`448`	`\| FSharpCheckFileAnswer.Aborted->`
`449`	`449`	`None`
`450`	`450`	`\| FSharpCheckFileAnswer.Succeeded(checkFileResults)->`
`451`	`451`	`Some(parseResults, checkFileResults)`
	`452`	`+`
	`453`	`+ Logging.Logging.logInfof`
	`454`	`+"ParseAndCheckDocument (\nfile =%s,\ntextVersionHash =%d,\nsourceText =%s,\nallowStaleResults =%b,\nerrors =%+A)"`
	`455`	`+(Path.GetFileName filePath)`
	`456`	`+ textVersionHash`
	`457`	`+ sourceText`
	`458`	`+ allowStaleResults`
	`459`	`+(res\|> Option.map(fun(_,r)-> r.Errors))`
	`460`	`+`
	`461`	`+return res`
`452`	`462`	`}`
`453`	`463`
`454`	`464`	`lettryGetFreshResultsWithTimeout():Async<CheckResults>=`

Comments

(0)