[oct-scm] [oct-git]OCT: A portable Lisp implementation for quad-double precision floats branch cvs-ids created. 4c22d173b3945fa8817b0ecb6fcef69d162c3d8d

This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "OCT: A portable Lisp implementation for quad-double precision floats". The branch, cvs-ids has been created at 4c22d173b3945fa8817b0ecb6fcef69d162c3d8d (commit) - Log ----------------------------------------------------------------- commit 4c22d173b3945fa8817b0ecb6fcef69d162c3d8d Author: Raymond Toy <toy.raymond@gmail.com> Date: Fri Mar 11 16:53:49 2011 -0500 Add kwexpand and kwunexpand scripts. diff --git a/kwunexpand b/kwunexpand new file mode 100755 index 0000000..4bfd86b --- /dev/null +++ b/kwunexpand @@ -0,0 +1,5 @@ +#! /bin/sh + +# Could combine this into one regex, but not all seds support () and | +# (or is that \(\) and \|)? +sed -e 's/\$Date:[^$]*\$/$Date$/' -e 's/\$Revision:[^$]*\$/$Revision$/' -e 's/\$Id:[^$]*\$/$Id$/' commit fafb5863a52f842bf40ca7b2af9a0ec68b2e6010 Author: Raymond Toy <toy.raymond@gmail.com> Date: Fri Mar 11 16:53:34 2011 -0500 Add kwexpand and kwunexpand scripts. diff --git a/kwexpand b/kwexpand new file mode 100755 index 0000000..2c06251 --- /dev/null +++ b/kwexpand @@ -0,0 +1,6 @@ +#! /bin/sh + +lastdate=`git log --pretty=format:"%ai" -1` +lastid=`git log --pretty=format:"%h %ai %ae" -1` +lastrev=`git log --pretty=format:"%h" -1` +sed -e "s/\\\$Date\\\$/\$Date: $lastdate \$/g" -e "s/\\\$Revision\\\$/\$Revision: $lastrev \$/g" -e "s/\\\$Id\\\$/\$Id: $lastid \$/g" commit 6195784bc3604d1f7d530d91db79bc92cd6bd7a3 Author: Raymond Toy <toy.raymond@gmail.com> Date: Fri Mar 11 14:58:56 2011 -0500 Add some blank lines to change file. diff --git a/qd.lisp b/qd.lisp index 83cd65c..2f3f550 100644 --- a/qd.lisp +++ b/qd.lisp @@ -1364,3 +1364,5 @@ is a fixnum." (values (scale-float-qd q (- exp)) exp (make-qd-d sign)))) + + commit 3a8139772ad7204e257e22f86e3afaa228a2d2cd Author: Raymond Toy <toy.raymond@gmail.com> Date: Fri Mar 11 14:56:22 2011 -0500 Test cvs keyword expansion .gitattributes: o Add filter for cvskeywords qd-rep.lisp: qd.lisp: o Add $Id$ to test expansion diff --git a/.gitattributes b/.gitattributes index 3015fc3..d9eafe8 100644 --- a/.gitattributes +++ b/.gitattributes @@ -1 +1,3 @@ -*.lisp ident +*.lisp filter=cvskeywords + + diff --git a/qd-rep.lisp b/qd-rep.lisp index 4ee4dea..b3342ce 100644 --- a/qd-rep.lisp +++ b/qd-rep.lisp @@ -35,6 +35,7 @@ ;;; return all four values at once. (defparameter *oct-rep-version* "$Id$") +(defvar *id-qd-rep* "qd-rep.lisp $Id$") ;; All of the following functions should be inline to reduce consing. #+(and cmu (not oct-array)) diff --git a/qd.lisp b/qd.lisp index fb3e4e1..83cd65c 100644 --- a/qd.lisp +++ b/qd.lisp @@ -38,6 +38,8 @@ (in-package #:octi) +(defvar *qd-id* "qd.lisp $Id$") + #+cmu (eval-when (:compile-toplevel) (setf ext:*inline-expansion-limit* 1600)) ----------------------------------------------------------------------- hooks/post-receive -- OCT: A portable Lisp implementation for quad-double precision floats
participants (1)
-
Raymond Toy