[Ecls-list] Too many arguments for generic function CLOSE

[Stelian Ionescu]

Compiling a use of WITH-OPEN-FILE yields the warning "Too many arguments
for generic function CLOSE"

Test case:

CL-USER> (handler-bind ((c:compiler-warning
                         (lambda (err) (describe err))))
           (compile 'nil '(lambda ()
                           (with-open-file (f "/tmp/fookoo")))))
;;; OPTIMIZE levels: Safety=2, Space=0, Speed=3, Debug=0

#<a COMPILER-WARNING> is an instance of class COMPILER-WARNING
it has the following instance slots
FORMAT-CONTROL:         Too many arguments for generic function ~A
FORMAT-ARGUMENTS:       (CLOSE)
PREFIX:                 Warning
FILE:                   NIL
POSITION:               NIL
FORM:                   (SET 'GAZONK #'(LAMBDA NIL (WITH-OPEN-FILE
(F /tmp/fookoo))))
;;; Warning: Too many arguments for generic function CLOSE
;;; End of Pass 1.
;;; Note: Emitting linking call for CLOSE
;;; Note: Invoking external command:
;;;   i686-pc-linux-gnu-gcc  -D_GNU_SOURCE -D_FILE_OFFSET_BITS=64 -O2 -g
-march=pentium-m -pipe -g -O0 -fPIC -D_THREAD_SAFE  -Dlinux -O
"-I/usr/include/" -w -c "/tmp/.private/hechee/ECL00BSOknIO.c" -o
"/tmp/.private/hechee/ECL00BSOknIO.o"
;;; Note: Invoking external command:
;;;   i686-pc-linux-gnu-gcc -o "/tmp/.private/hechee/ECL00BSOknIO.fas"
-L"/usr/lib/" "/tmp/.private/hechee/ECL00BSOknIO.o"  -shared
-Wl,-O1,--hash-style=gnu,--sort-common,--as-needed,--reduce-memory-overheads -Wl,-O1,--hash-style=gnu,--sort-common,--as-needed,--reduce-memory-overheads  -lecl -lpthread -ldl  -lm   -lgc -lgmp
#<compiled-function 094e1140>
T
NIL

is this to be expected ?

-- 
Stelian Ionescu a.k.a. fe[nl]ix
Quidquid latine dictum sit, altum videtur.

-------------- next part --------------
A non-text attachment was scrubbed...
Name: signature.asc
Type: application/pgp-signature
Size: 197 bytes
Desc: This is a digitally signed message part
URL: <https://mailman.common-lisp.net/pipermail/ecl-devel/attachments/20081220/96a2d711/attachment.sig>