[Openmcl-devel] Compiler warnings

[Taoufik Dachraoui]

I run the following test:

taoufik-dachraouis-imac:cl-cairo2 taoufik$ ccl
Welcome to Clozure Common Lisp Version 1.3-r11936  (DarwinX8632)!
? (setf a 5)
5
? (the number a)
;Compiler warnings :
;   In an anonymous lambda form: Undeclared free variable A
5
? (defvar a 5)
A
? (the number a)
5
?

THE expects a defined variable. how to fix this?

Taoufik

On Oct 16, 2009, at 8:12 PM, Taoufik Dachraoui wrote:

> I tried the following and I got a compiler warning, is this normal?  
> if not what is the problem
>
> PS: my .ccl-init.lisp is empty
>
> taoufik-dachraouis-imac:cl-cairo2 taoufik$ ccl
> Welcome to Clozure Common Lisp Version 1.3-r11936  (DarwinX8632)!
> ? (setf x '(a b c))
> (A B C)
> ? (pop x)
> ;Compiler warnings :
> ;   In an anonymous lambda form: Undeclared free variable X (3  
> references)
> A
> ? (pprint (macroexpand-1 '(pop x)))
>
> (PROG1 (CAR X) (SETQ X (CDR (THE LIST X))))
> ? (PROG1 (CAR X) (SETQ X (CDR (THE LIST X))))
> ;Compiler warnings :
> ;   In an anonymous lambda form: Undeclared free variable X (3  
> references)
> B
> ? x
> (C)
> ?
>
> Taoufik