false warnings when compiling with lexical-binding and cl-lib.

[Thierry Volpiatto]

Hi,
here a sample file containing a function using loop:

--8<---------------cut here---------------start------------->8---
;;; test.el --- test loop -*- lexical-binding: t -*-

(require 'cl-lib)

(defun test-with (l)
  (cl-loop with lst
           for i in l
           unless (member i lst)
           collect i into lst
           finally return lst))
--8<---------------cut here---------------end--------------->8---

When compiling this file I have a warning about unused arg `lst'.
Is this wanted ?

Thanks.

-- 
Thierry
Get my Gnupg key:
gpg --keyserver pgp.mit.edu --recv-keys 59F29997