6aec014eb591
Fix the docstring
author | Steve Losh <steve@stevelosh.com> |
---|---|
date | Mon, 19 Sep 2016 23:57:56 +0000 |
parents | 147d800c551e |
children | 66e02df8c0b3 |
branches/tags | (none) |
files | losh.lisp |
Changes
--- a/losh.lisp Mon Sep 19 23:55:12 2016 +0000 +++ b/losh.lisp Mon Sep 19 23:57:56 2016 +0000 @@ -1120,9 +1120,9 @@ (macroexpand-iterate '(averaging (+ x 10) :into avg)) => (PROGN - (FOR #:COUNT665 :FROM 0) - (FOR AVG :FIRST (+ X 10) :THEN - (/ (+ (* AVG #:COUNT665) (+ X 10)) (1+ #:COUNT665)))) + (FOR #:COUNT630 :FROM 1) + (SUM (+ X 10) :INTO #:TOTAL631) + (FOR AVG = (/ #:TOTAL631 #:COUNT630))) " ;; Given a clause like (for foo in-whatever bar) we need to: