Menu
▾
▴
clisp-cvs Digest, Vol 17, Issue 23
|
From: <cli...@li...> - 2007-09-30 18:47:17
|
Send clisp-cvs mailing list submissions to cli...@li... To subscribe or unsubscribe via the World Wide Web, visit https://lists.sourceforge.net/lists/listinfo/clisp-cvs or, via email, send a message with subject or body 'help' to cli...@li... You can reach the person managing the list at cli...@li... When replying, please edit your Subject line so it is more specific than "Re: Contents of clisp-cvs digest..." CLISP CVS commits for today Today's Topics: 1. clisp/modules/zlib test.tst,1.4,1.5 (Sam Steingold) 2. clisp/src ChangeLog,1.5585,1.5586 init.lisp,1.266,1.267 (Sam Steingold) 3. clisp/src makemake.in,1.672,1.673 (Sam Steingold) 4. clisp/emacs lisp.vim,NONE,1.1 (Sam Steingold) 5. clisp/emacs d.vim,1.1,1.2 (Sam Steingold) 6. clisp/emacs lisp.vim,1.1,1.2 (Sam Steingold) 7. clisp/src ChangeLog,1.5586,1.5587 (Sam Steingold) 8. clisp/modules/libsvm test.tst,1.7,1.8 (Sam Steingold) 9. clisp/utils fix-perms.sh,1.3,1.4 (Sam Steingold) 10. clisp/src ChangeLog,1.5587,1.5588 (Sam Steingold) 11. clisp/emacs lisp.vim,1.2,1.3 (Sam Steingold) ---------------------------------------------------------------------- Message: 1 Date: Sun, 30 Sep 2007 05:32:44 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/modules/zlib test.tst,1.4,1.5 To: cli...@li... Message-ID: <E1I...@ma...> Update of /cvsroot/clisp/clisp/modules/zlib In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv27018/modules/zlib Modified Files: test.tst Log Message: -*- Lisp -*- ==> vim:filetype=lisp Index: test.tst =================================================================== RCS file: /cvsroot/clisp/clisp/modules/zlib/test.tst,v retrieving revision 1.4 retrieving revision 1.5 diff -u -d -r1.4 -r1.5 --- test.tst 9 Nov 2005 14:29:26 -0000 1.4 +++ test.tst 30 Sep 2007 05:32:42 -0000 1.5 @@ -1,4 +1,4 @@ -;; -*- Lisp -*- +;; -*- Lisp -*- vim:filetype=lisp ;; some tests for ZLIB ;; clisp -K full -E 1:1 -q -norc -i ../tests/tests -x '(run-test "zlib/test")' ------------------------------ Message: 2 Date: Sun, 30 Sep 2007 05:48:24 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/src ChangeLog,1.5585,1.5586 init.lisp,1.266,1.267 To: cli...@li... Message-ID: <E1I...@ma...> Update of /cvsroot/clisp/clisp/src In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv805/src Modified Files: ChangeLog init.lisp Log Message: load complete after macros3 because of WITH-COLLECT Index: init.lisp =================================================================== RCS file: /cvsroot/clisp/clisp/src/init.lisp,v retrieving revision 1.266 retrieving revision 1.267 diff -u -d -r1.266 -r1.267 --- init.lisp 24 Aug 2007 20:15:21 -0000 1.266 +++ init.lisp 30 Sep 2007 05:48:22 -0000 1.267 @@ -2261,8 +2261,6 @@ (LOAD "dribble") ; dribble -(LOAD "complete") ; completion - (load "pprint") ; pretty printer (LOAD "describe") ; apropos, describe @@ -2277,6 +2275,8 @@ (LOAD "macros3") ; more macros, optional +(LOAD "complete") ; gnu readline completion (requires macros3) + (LOAD "case-sensitive") ; case-sensitive packages #+FFI ; when (find-package "FFI") Index: ChangeLog =================================================================== RCS file: /cvsroot/clisp/clisp/src/ChangeLog,v retrieving revision 1.5585 retrieving revision 1.5586 diff -u -d -r1.5585 -r1.5586 --- ChangeLog 30 Sep 2007 04:41:11 -0000 1.5585 +++ ChangeLog 30 Sep 2007 05:48:21 -0000 1.5586 @@ -20,6 +20,7 @@ * complete.lisp (completion): when no symbols are found and no package separator #\: has been entered, search for completion among packages + * init.lisp: load complete after macros3 because of WITH-COLLECT 2007-09-26 Sam Steingold <sd...@gn...> ------------------------------ Message: 3 Date: Sun, 30 Sep 2007 16:16:51 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/src makemake.in,1.672,1.673 To: cli...@li... Message-ID: <E1I...@ma...> Update of /cvsroot/clisp/clisp/src In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv10283/src Modified Files: makemake.in Log Message: install CLISP extensions for VIM Lisp syntax Index: makemake.in =================================================================== RCS file: /cvsroot/clisp/clisp/src/makemake.in,v retrieving revision 1.672 retrieving revision 1.673 diff -u -d -r1.672 -r1.673 --- makemake.in 19 Sep 2007 01:24:52 -0000 1.672 +++ makemake.in 30 Sep 2007 16:16:49 -0000 1.673 @@ -49,6 +49,7 @@ documentation in PDF format --elispdir=DIR sets the installation directory for Emacs Lisp files + --vimdir=DIR sets the installation directory for VIM files --hyperspec=URL the path to the Common Lisp HyperSpec (the default is ${HSDEFAULT} or the value of the environment variable CLHSROOT, if set). @@ -184,8 +185,9 @@ dvidir='' psdir='' pdfdir='' -elispdir='' MODULES='' +elispdir='' +vimdir='' module_configure_flags='' CP='cp -p' LN_S='ln -s' @@ -428,6 +430,14 @@ shift fi ;; + -vimdir* | --vimdir*) + vimdir=`echol "$1" | sed 's/-*vimdir=*//'` + shift + if test -z "$vimdir" ; then + vimdir=$1 + shift + fi + ;; --win32gcc) HSYS="win32gcc"; shift; ;; --hyperspec=*) arg=`echol "$1" | sed 's/-*hyperspec=//'` @@ -887,6 +897,13 @@ elispdir="\$(datadir)/emacs/site-lisp" ELISPDIR="$elispdir" fi +if [ $HOS = unix ] ; then + test -n "$vimdir" || vimdir='${datadir}/vim/vimfiles/after' + VIMDIR=`echo "$vimdir" | sed -e "$brace_to_paren"` +else + vimdir="\$(datadir)/vim/vimfiles/after" + VIMDIR="$vimdir" +fi if [ $H_DOS = "true" ] ; then # Replace '/' with '\': @@ -1927,6 +1944,7 @@ echol "localedir = ${LOCALEDIR}" fi echol "elispdir = ${ELISPDIR}" +echol "vimdir = ${VIMDIR}" echol "# The value of following variable is prepended to all the paths for" echol "# installation. This is useful when preparing a binary distribution." echol "DESTDIR =" @@ -3492,6 +3510,7 @@ echol done EMACS_FILES="clhs.el clisp-coding.el clisp-indent.el clisp-indent.lisp clisp-ffi.el" +VIM_FILES="lisp.vim" # On Unix, clisp.dvi, clisp.ps, clisp.pdf must be built by "make all", # because "make install" needs it and "make install" must not create files in @@ -3666,6 +3685,7 @@ fi echotab_mkdir_maybe "\$(DESTDIR)\$(datadir)" echotab_mkdir_maybe "\$(DESTDIR)\$(elispdir)" + echotab_mkdir_maybe "\$(DESTDIR)\$(vimdir)" echotab_mkdir_maybe "\$(DESTDIR)\$(mandir)" echotab_mkdir_maybe "\$(DESTDIR)\$(mandir)/man1" case "$fsstnd" in @@ -3723,6 +3743,10 @@ for f in ${EMACS_FILES}; do echotab "\$(INSTALL_DATA) ${SRCTOPDIR}emacs/$f \$(DESTDIR)\$(elispdir)/$f" done + echotab_mkdir_maybe "\$(DESTDIR)\$(vimdir)" + for f in ${VIM_FILES}; do + echotab "\$(INSTALL_DATA) ${SRCTOPDIR}emacs/$f \$(DESTDIR)\$(vimdir)/$f" + done echol echol "install-man : clisp.1 ${manual_dvi} clisp.html force" echotab_mkdir_maybe "\$(DESTDIR)\$(prefix)" @@ -3805,6 +3829,9 @@ for f in ${EMACS_FILES}; do echotab "\$(RMRF) \$(DESTDIR)\$(elispdir)/$f*" done + for f in ${VIM_FILES}; do + echotab "\$(RMRF) \$(DESTDIR)\$(vimdir)/$f*" + done echol echol fi @@ -3943,7 +3970,7 @@ echotab "mkdir \$(TOPDIR)/doc" echotab "${HLN} clisp.1 clisp.man ${manual_dvi} clisp.html \$(TXTFILES) \$(IMPNOTES) \$(TOPDIR)/doc" echotab "mkdir \$(TOPDIR)/emacs" -for f in ${EMACS_FILES}; do +for f in ${EMACS_FILES} ${VIM_FILES}; do echotab "${HLN} ${SRCTOPDIR}emacs/${f} \$(TOPDIR)/emacs/${f}" done echotab "mkdir \$(TOPDIR)/src" @@ -4018,7 +4045,7 @@ echotab " if test -f \$\$f ; then cp -p \$\$f \$\$distdir/doc/\$\$f ; else cp -p \`echo \$\$f | tr '[A-Z]' '[a-z]'\` \$\$distdir/doc/\$\$f ; fi ; \\" echotab "done ; \\" echotab "mkdir \$\$distdir/emacs; \\" - for f in ${EMACS_FILES}; do + for f in ${EMACS_FILES} ${VIM_FILES}; do echotab "cp -p ${SRCTOPDIR}emacs/${f} \$\$distdir/emacs/${f} ; \\" done echotab "mkdir \$\$distdir/src ; \\" ------------------------------ Message: 4 Date: Sun, 30 Sep 2007 16:16:52 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/emacs lisp.vim,NONE,1.1 To: cli...@li... Message-ID: <E1I...@ma...> Update of /cvsroot/clisp/clisp/emacs In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv10283/emacs Added Files: lisp.vim Log Message: install CLISP extensions for VIM Lisp syntax --- NEW FILE: lisp.vim --- " Vim syntax file " Language: Lisp (with extensions for CLISP) " FFI syn keyword lispFunc def-c-var def-c-const def-c-enum def-c-type syn keyword lispFunc def-call-out def-call-in syn keyword lispFunc c-function " Macros syn keyword lispFunc with-collect letf letf* ------------------------------ Message: 5 Date: Sun, 30 Sep 2007 16:18:19 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/emacs d.vim,1.1,1.2 To: cli...@li... Message-ID: <E1I...@ma...> Update of /cvsroot/clisp/clisp/emacs In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv11181/emacs Modified Files: d.vim Log Message: more highlighting Index: d.vim =================================================================== RCS file: /cvsroot/clisp/clisp/emacs/d.vim,v retrieving revision 1.1 retrieving revision 1.2 diff -u -d -r1.1 -r1.2 --- d.vim 23 Sep 2007 19:43:12 -0000 1.1 +++ d.vim 30 Sep 2007 16:18:16 -0000 1.2 @@ -7,15 +7,19 @@ syn keyword dType local global maygc var inline object syn match dType "[us]int[LW]" +syn match dType "[a-zA-Z0-9_]*_t" syn keyword dOperator popSTACK pushSTACK skipSTACK skipSTACKop STACKop loop syn match dOperator "dotimesp?[CLW]" syn keyword dObject true false NIL T nullobj -syn keyword dOperator nonreturning_function return_Values LISPFUN DEFUN +syn keyword dOperator nonreturning_function return_Values DEFUN O S +syn match dOperator "LISPFUN[NR]*" +syn match dOperator "VALUES[0-9]" syn keyword dOperator SstringDispatch SstringCase -syntax region dCommentL start="# " skip="\\$" end="$" keepend contains=@cCommentGroup,cComment2String,cCharacter,cNumbersCom,cSpaceError,@Spell +syn region dCommentL start="# " skip="\\$" end="$" keepend contains=@cCommentGroup,cComment2String,cCharacter,cNumbersCom,cSpaceError,@Spell hi def link dType Type hi def link dOperator Operator hi def link dCommentL Comment +hi def link dObject Boolean let b:current_syntax = "d" ------------------------------ Message: 6 Date: Sun, 30 Sep 2007 17:55:06 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/emacs lisp.vim,1.1,1.2 To: cli...@li... Message-ID: <E1I...@ma...> Update of /cvsroot/clisp/clisp/emacs In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv21973/emacs Modified Files: lisp.vim Log Message: expanded vim.lisp Index: lisp.vim =================================================================== RCS file: /cvsroot/clisp/clisp/emacs/lisp.vim,v retrieving revision 1.1 retrieving revision 1.2 diff -u -d -r1.1 -r1.2 --- lisp.vim 30 Sep 2007 16:16:49 -0000 1.1 +++ lisp.vim 30 Sep 2007 17:55:04 -0000 1.2 @@ -2,9 +2,24 @@ " Language: Lisp (with extensions for CLISP) " FFI -syn keyword lispFunc def-c-var def-c-const def-c-enum def-c-type -syn keyword lispFunc def-call-out def-call-in -syn keyword lispFunc c-function +syn keyword lispDecl def-c-var def-c-const def-c-enum def-c-type +syn keyword lispDecl def-call-out def-call-in +syn keyword lispDecl c-function c-struct c-pointer c-ptr c-array c-array-ptr c-string +syn keyword lispFunc with-c-place with-c-var +syn keyword lispFunc with-foreign-object with-foreign-string +syn keyword lispFunc default-foreign-language default-foreign-library +syn keyword lispFunc element deref cast slot validp set-foreign-pointer +syn keyword lispFunc allocate-deep allocate-shallow foreign-free +syn keyword lispFunc int +syn keyword lispKey :arguments :return-type :library :full -" Macros +" loop +syn keyword lispKey :while :until :for :do :if :then :else :when :unless :in +syn keyword lispKey :across :finally :collect :nconc :maximize :minimize :sum + +" Macros et al syn keyword lispFunc with-collect letf letf* +syn keyword lispFunc finalize + +" general +syn match lispSpecial "\+[a-zA-Z_][a-zA-Z_0-9-]*\+" ------------------------------ Message: 7 Date: Sun, 30 Sep 2007 17:55:07 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/src ChangeLog,1.5586,1.5587 To: cli...@li... Message-ID: <E1I...@ma...> Update of /cvsroot/clisp/clisp/src In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv21973/src Modified Files: ChangeLog Log Message: expanded vim.lisp Index: ChangeLog =================================================================== RCS file: /cvsroot/clisp/clisp/src/ChangeLog,v retrieving revision 1.5586 retrieving revision 1.5587 diff -u -d -r1.5586 -r1.5587 --- ChangeLog 30 Sep 2007 05:48:21 -0000 1.5586 +++ ChangeLog 30 Sep 2007 17:55:04 -0000 1.5587 @@ -1,5 +1,10 @@ 2007-09-30 Sam Steingold <sd...@gn...> + * makemake.in: accept --vimdir and install the new file lisp.vim + there (defaults to ${datadir}/vim/vimfiles/after) + +2007-09-30 Sam Steingold <sd...@gn...> + * .gdbinit (full): also break in xlib_error_handler * modules/clx/new-clx/demos/bball.lisp: * modules/clx/new-clx/demos/bwindow.lisp: ------------------------------ Message: 8 Date: Sun, 30 Sep 2007 17:55:38 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/modules/libsvm test.tst,1.7,1.8 To: cli...@li... Message-ID: <E1I...@ma...> Update of /cvsroot/clisp/clisp/modules/libsvm In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv22378/modules/libsvm Modified Files: test.tst Log Message: more SHOW calls Index: test.tst =================================================================== RCS file: /cvsroot/clisp/clisp/modules/libsvm/test.tst,v retrieving revision 1.7 retrieving revision 1.8 diff -u -d -r1.7 -r1.8 --- test.tst 30 Sep 2007 05:32:42 -0000 1.7 +++ test.tst 30 Sep 2007 17:55:36 -0000 1.8 @@ -5,7 +5,7 @@ (defparameter f-parameter (libsvm:make-parameter)) F-PARAMETER -(defparameter v-parameter (ffi:foreign-value f-parameter)) +(defparameter v-parameter (show (ffi:foreign-value f-parameter))) V-PARAMETER (ffi:validp f-parameter) T @@ -46,6 +46,7 @@ (ffi:slot p-parameter 'libsvm::C) 1d0 (ffi:slot p-parameter 'libsvm::kernel_type) libsvm::LINEAR)) (setf v-parameter (ffi:foreign-value f-parameter)) + (show (libsvm:parameter-alist f-parameter) :pretty t) (list (= maxindex (floor (log (1- 1000) 7))) (equalp (ffi:foreign-value p) (ffi:foreign-value f-problem-2-7)))) (T T) @@ -85,7 +86,7 @@ (setf f-parameter (libsvm:make-parameter :v v-parameter 'LIBSVM::nu 5d-1 'LIBSVM::svm_type libsvm:NU_SVC 'LIBSVM::probability 1) - v-parameter (ffi:foreign-value f-parameter)) + v-parameter (show (ffi:foreign-value f-parameter))) (show (libsvm:parameter-alist f-parameter) :pretty t) (= (ffi:slot (ffi:foreign-value f-parameter) 'LIBSVM::svm_type) libsvm:NU_SVC)) ------------------------------ Message: 9 Date: Sun, 30 Sep 2007 18:12:17 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/utils fix-perms.sh,1.3,1.4 To: cli...@li... Message-ID: <E1I...@ma...> Update of /cvsroot/clisp/clisp/utils In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv29563/utils Modified Files: fix-perms.sh Log Message: report what is been done; make link.sh not executable Index: fix-perms.sh =================================================================== RCS file: /cvsroot/clisp/clisp/utils/fix-perms.sh,v retrieving revision 1.3 retrieving revision 1.4 diff -u -d -r1.3 -r1.4 --- fix-perms.sh 21 Jul 2005 17:11:49 -0000 1.3 +++ fix-perms.sh 30 Sep 2007 18:12:15 -0000 1.4 @@ -16,10 +16,11 @@ -o -name '*.lisp' \ -o -name '*.tst' \ -o -name '*.bat' \ + -o -name 'link.sh' \ -o -name '.cvsignore' \ -o -name 'Makefile' \ -o -name 'README' \ ')' \ - -exec chmod a-x '{}' ';' + -exec chmod -c a-x '{}' ';' -find . -name configure -exec chmod +x '{}' ';' +find . -name configure -exec chmod -c +x '{}' ';' ------------------------------ Message: 10 Date: Sun, 30 Sep 2007 18:12:17 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/src ChangeLog,1.5587,1.5588 To: cli...@li... Message-ID: <E1I...@ma...> Update of /cvsroot/clisp/clisp/src In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv29563/src Modified Files: ChangeLog Log Message: report what is been done; make link.sh not executable Index: ChangeLog =================================================================== RCS file: /cvsroot/clisp/clisp/src/ChangeLog,v retrieving revision 1.5587 retrieving revision 1.5588 diff -u -d -r1.5587 -r1.5588 --- ChangeLog 30 Sep 2007 17:55:04 -0000 1.5587 +++ ChangeLog 30 Sep 2007 18:12:15 -0000 1.5588 @@ -1,5 +1,10 @@ 2007-09-30 Sam Steingold <sd...@gn...> + * utils/fix-perms.sh: report what is been done; + make link.sh not executable + +2007-09-30 Sam Steingold <sd...@gn...> + * makemake.in: accept --vimdir and install the new file lisp.vim there (defaults to ${datadir}/vim/vimfiles/after) ------------------------------ Message: 11 Date: Sun, 30 Sep 2007 18:46:28 +0000 From: Sam Steingold <sd...@us...> Subject: clisp/emacs lisp.vim,1.2,1.3 To: cli...@li... Message-ID: <E1I...@ma...> Update of /cvsroot/clisp/clisp/emacs In directory sc8-pr-cvs4.sourceforge.net:/tmp/cvs-serv10433/emacs Modified Files: lisp.vim Log Message: fix const regexp; add more FFI keywords Index: lisp.vim =================================================================== RCS file: /cvsroot/clisp/clisp/emacs/lisp.vim,v retrieving revision 1.2 retrieving revision 1.3 diff -u -d -r1.2 -r1.3 --- lisp.vim 30 Sep 2007 17:55:04 -0000 1.2 +++ lisp.vim 30 Sep 2007 18:46:25 -0000 1.3 @@ -2,16 +2,19 @@ " Language: Lisp (with extensions for CLISP) " FFI -syn keyword lispDecl def-c-var def-c-const def-c-enum def-c-type +syn keyword lispDecl def-c-var def-c-const def-c-enum def-c-type def-c-struct syn keyword lispDecl def-call-out def-call-in -syn keyword lispDecl c-function c-struct c-pointer c-ptr c-array c-array-ptr c-string +syn keyword lispDecl c-function c-struct c-pointer c-ptr c-ptr-null +syn keyword lispDecl c-array c-array-ptr c-array-max c-string +syn keyword lispDecl int short long uint ushort ulong size_t off_t time_t syn keyword lispFunc with-c-place with-c-var syn keyword lispFunc with-foreign-object with-foreign-string syn keyword lispFunc default-foreign-language default-foreign-library syn keyword lispFunc element deref cast slot validp set-foreign-pointer syn keyword lispFunc allocate-deep allocate-shallow foreign-free -syn keyword lispFunc int +syn keyword lispFunc c-lines foreign-value syn keyword lispKey :arguments :return-type :library :full +syn keyword lispKey :none :alloca :in :out :in-out " loop syn keyword lispKey :while :until :for :do :if :then :else :when :unless :in @@ -22,4 +25,5 @@ syn keyword lispFunc finalize " general -syn match lispSpecial "\+[a-zA-Z_][a-zA-Z_0-9-]*\+" +syn match lispSpecial "+[a-zA-Z_][a-zA-Z_0-9-]*+" +syn keyword lispKey :documentation ------------------------------ ------------------------------------------------------------------------- This SF.net email is sponsored by: Microsoft Defy all challenges. Microsoft(R) Visual Studio 2005. http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/ ------------------------------ _______________________________________________ clisp-cvs mailing list cli...@li... https://lists.sourceforge.net/lists/listinfo/clisp-cvs End of clisp-cvs Digest, Vol 17, Issue 23 ***************************************** |