From e324e317caab06fda232636c32e8a60d9e888a9c Mon Sep 17 00:00:00 2001 From: Gabor Greif Date: Tue, 17 Jan 2017 17:39:33 +0100 Subject: Typos in comments only [ci skip] --- compiler/stranal/DmdAnal.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'compiler/stranal') diff --git a/compiler/stranal/DmdAnal.hs b/compiler/stranal/DmdAnal.hs index e2a1dc4493..e7887b94db 100644 --- a/compiler/stranal/DmdAnal.hs +++ b/compiler/stranal/DmdAnal.hs @@ -1234,7 +1234,7 @@ binders the CPR property. Specifically | otherwise = x For $wf2 we are going to unbox the MkT *and*, since it is strict, the - first agument of the MkT; see Note [Add demands for strict constructors]. + first argument of the MkT; see Note [Add demands for strict constructors]. But then we don't want box it up again when returning it! We want 'f2' to have the CPR property, so we give 'x' the CPR property. -- cgit v1.2.1