From: SourceForge.net <no...@so...> - 2012-01-16 18:24:30
|
Bugs item #3474507, was opened at 2012-01-16 10:24 Message generated for change (Tracker Item Submitted) made by d3zd3z You can respond by visiting: https://sourceforge.net/tracker/?func=detail&atid=101355&aid=3474507&group_id=1355 Please note that this message will contain a full copy of the comment thread, including the initial issue submission, for this request, not just the latest update. Category: clisp Group: lisp error Status: Open Resolution: None Priority: 5 Private: No Submitted By: David Brown (d3zd3z) Assigned to: Bruno Haible (haible) Summary: RENAME-FILE :if-does-not-exist does not work Initial Comment: GNU CLISP 2.49 (2010-07-07) (built on hepworth.siccegge.de [10.70.1.67]) Software: GNU C 4.6.1 gcc -falign-functions=4 -W -Wswitch -Wcomment -Wpointer-arith -Wimplicit -Wreturn-type -Wmissing-declarations -Wno-sign-compare -Wno-format-nonliteral -O -falign-functions=4 -DENABLE_UNICODE -DDYNAMIC_FFI -DDYNAMIC_MODULES -I. /usr/lib/libreadline.so -lncurses -ldl /usr/lib/libavcall.so /usr/lib/libcallback.so -L/usr/lib -lsigsegv libgnu_cl.a SAFETY=0 TYPECODES WIDE_HARD GENERATIONAL_GC SPVW_BLOCKS SPVW_MIXED TRIVIALMAP_MEMORY libsigsegv 2.9 libreadline 5.2 libffcall 1.11 Features: (READLINE REGEXP SYSCALLS I18N LOOP COMPILER CLOS MOP CLISP ANSI-CL COMMON-LISP LISP=CL INTERPRETER SOCKETS GENERIC-STREAMS LOGICAL-PATHNAMES SCREEN FFI GETTEXT UNICODE BASE-CHAR=CHARACTER WORD-SIZE=64 PC386 UNIX) C Modules: (clisp i18n syscalls regexp readline) Installation directory: /usr/lib/clisp-2.49/ User language: ENGLISH Machine: X86_64 (X86_64) a64.davidb.org [76.88.79.245] (debian testing build) [1]> (with-open-file (stream "first.txt" :direction :output :if-does-not-exist :create)) NIL [2]> (with-open-file (stream "second.txt" :direction :output :if-does-not-exist :create)) NIL [3]> (rename-file "first.txt" "second.txt" :if-exists :overwrite) *** - EVAL/APPLY: Too many arguments (4 instead of at most 2) given to RENAME-FILE The following restarts are available: ABORT :R1 Abort main loop ---------------------------------------------------------------------- You can respond by visiting: https://sourceforge.net/tracker/?func=detail&atid=101355&aid=3474507&group_id=1355 |