[Gcl-devel] strange warning

[Andreas Eder]

Hi,

when compiling maxima, i found a strange warning concerning 'last'.

I can reproduce it with the following simple code:

GCL (GNU Common Lisp)  2.6.5 ANSI    Nov 26 2004 08:52:13
Source License: LGPL(gcl,gmp), GPL(unexec,bfd)
Binary License:  GPL due to GPL'ed components: (READLINE BFD UNEXEC)
Modifications of this banner must retain notice of a compatible license
Dedicated to the memory of W. Schelter

Use (help) to get some basic information on how to use GCL.

>(defun testit (l n) (last l n))

>(compile 'testit)

Compiling gazonk0.lsp.
End of Pass 1.  
; (DEFUN TESTIT) is being compiled.
;; Warning: Wrong number of args for LAST: 2 instead of 1.
End of Pass 2.  
OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3
Finished compiling gazonk0.lsp.
Loading gazonk0.o
start address -T 0x859c950 Finished loading gazonk0.o
#<compiled-function TESTIT>


The standard says, tha 'last' should accept 2 args and in fact it works!
>(testit '(1 2 3 4 5 6) 2)

(5 6)


So, I guess, this is a remnant of the time when gcl was not as
ansi-conformant as it is now.
Nevertheless it is uncomforting to see such a warning message.

I hope you can make sense out of this message.
Keep up the good work.

Andreas
-- 
Wherever I lay my .emacs, there's my $HOME.