cells-cvs

cells-cvs@common-lisp.net

721 discussions

[cells-cvs] CVS cells/utils-kt
by fgoenninger 03 Dec '07

03 Dec '07

Update of /project/cells/cvsroot/cells/utils-kt In directory clnet:/tmp/cvs-serv3688 Modified Files: utils-kt.asd Log Message: Changed: 1. Version now reflects latest change date 2. ASDF dependencies now used instead of :serial t --- /project/cells/cvsroot/cells/utils-kt/utils-kt.asd 2007/12/02 18:31:59 1.3 +++ /project/cells/cvsroot/cells/utils-kt/utils-kt.asd 2007/12/03 12:24:41 1.4 @@ -11,21 +11,19 @@ (asdf:defsystem :utils-kt :name "utils-kt" :author "Kenny Tilton <ktilton(a)nyc.rr.com>" - :version "18-Oct-2004" + :version "2007-12-02" :maintainer "Kenny Tilton <ktilton(a)nyc.rr.com>" :licence "MIT Style" :description "Kenny's Utilities" :long-description "Low-level utilities used by all of Kenny's projects" - :serial t :components ((:file "defpackage") - (:file "core") - (:file "debug") - (:file "flow-control") - (:file "detritus") - (:file "quad") - (:file "strings") - (:file "datetime") - (:file "split-sequence"))) + (:file "core" :depends-on ("defpackage")) + (:file "debug" :depends-on ("core")) + (:file "flow-control" :depends-on ("core" "debug")) + (:file "detritus" :depends-on ("core" "debug")) + (:file "strings" :depends-on ("core" "debug")) + (:file "datetime" :depends-on ("core" "debug")) + (:file "split-sequence" :depends-on ("core" "debug")))) (defmethod perform ((o load-op) (c (eql (find-system :utils-kt)))) ; (pushnew "CELLS" *modules* :test #'string=)

1 0

[cells-cvs] CVS cells/utils-kt
by fgoenninger 03 Dec '07

03 Dec '07

Update of /project/cells/cvsroot/cells/utils-kt In directory clnet:/tmp/cvs-serv3505 Modified Files: detritus.lisp Log Message: Changed: Wrappred dependencies to AllegroCL and its IDE into #+ ... --- /project/cells/cvsroot/cells/utils-kt/detritus.lisp 2007/11/30 16:51:20 1.14 +++ /project/cells/cvsroot/cells/utils-kt/detritus.lisp 2007/12/03 12:22:41 1.15 @@ -59,6 +59,7 @@ (defun collect-if (test list) (remove-if-not test list)) +#+(and allegro ide) (defun test-setup () #-its-alive! (ide.base::find-new-prompt-command @@ -67,14 +68,17 @@ #+test (test-setup) +#+(and allegro ide) (defun test-prep () (test-setup)) + +#+(and allegro ide) (defun test-init () (test-setup)) +#+(and allegro ide) (export! test-setup test-prep test-init) - ;;; --- FIFO Queue ----------------------------- (defun make-fifo-queue (&rest init-data)

1 0

[cells-cvs] CVS cells/utils-kt
by fgoenninger 03 Dec '07

03 Dec '07

Update of /project/cells/cvsroot/cells/utils-kt In directory clnet:/tmp/cvs-serv3297 Modified Files: defpackage.lisp Log Message: Added: Export of with-counts --- /project/cells/cvsroot/cells/utils-kt/defpackage.lisp 2007/12/02 18:57:10 1.8 +++ /project/cells/cvsroot/cells/utils-kt/defpackage.lisp 2007/12/03 12:21:34 1.9 @@ -31,7 +31,7 @@ (:export #:export! #:utils-kt-reset - #:count-it #:count-of + #:count-it #:count-of #:with-counts #:wdbg #:maptimes #:bwhen #:bif #:xor #:with-dynamic-fn #:last1 #:packed-flat! #:with-metrics #:shortc

1 0

[cells-cvs] CVS cells/utils-kt
by fgoenninger 03 Dec '07

03 Dec '07

Update of /project/cells/cvsroot/cells/utils-kt In directory clnet:/tmp/cvs-serv2552 Modified Files: debug.lisp Log Message: Changed: Exporting of symbols now done in defpackage only. --- /project/cells/cvsroot/cells/utils-kt/debug.lisp 2007/11/30 16:51:20 1.15 +++ /project/cells/cvsroot/cells/utils-kt/debug.lisp 2007/12/03 12:21:01 1.16 @@ -34,12 +34,8 @@ (print "----------UTILSRESET----------------------------------")) - - ;------------- counting --------------------------- -(export! with-counts) - (defmacro with-counts ((onp &rest msg) &body body) `(if ,onp (let ((*counting* (cons t *counting*)))

1 0

[cells-cvs] CVS cells/utils-kt
by fgoenninger 02 Dec '07

02 Dec '07

Update of /project/cells/cvsroot/cells/utils-kt In directory clnet:/tmp/cvs-serv24366 Modified Files: defpackage.lisp Log Message: Added: export of symbol #:export! --- /project/cells/cvsroot/cells/utils-kt/defpackage.lisp 2007/11/30 16:51:20 1.7 +++ /project/cells/cvsroot/cells/utils-kt/defpackage.lisp 2007/12/02 18:57:10 1.8 @@ -28,8 +28,10 @@ #+sbcl #:sb-mop #+openmcl-partial-mop #:openmcl-mop #+(and mcl (not openmcl-partial-mop)) #:ccl) - (:export #:utils-kt-reset - #:count-it #:count-of + (:export + #:export! + #:utils-kt-reset + #:count-it #:count-of #:wdbg #:maptimes #:bwhen #:bif #:xor #:with-dynamic-fn #:last1 #:packed-flat! #:with-metrics #:shortc

1 0

[cells-cvs] CVS cells/cells-test
by fgoenninger 02 Dec '07

02 Dec '07

Update of /project/cells/cvsroot/cells/cells-test In directory clnet:/tmp/cvs-serv23072 Added Files: cells-test.asd Log Message: Changes: Preventing bit rod: * cells-test.asd moved to cells-test directory * asdf.lisp removed * load.lisp removed (was not maintained any more) In cells.asd: * file "variables.lisp" unused according to newest cells.lpr file. File itself kept for reference. --- /project/cells/cvsroot/cells/cells-test/cells-test.asd 2007/12/02 18:47:20 NONE +++ /project/cells/cvsroot/cells/cells-test/cells-test.asd 2007/12/02 18:47:20 1.1 ;;;; -*- Mode: Lisp; Syntax: ANSI-Common-Lisp; Base: 10 -*- (asdf:defsystem :cells-test :name "cells-test" :author "Kenny Tilton <ktilton(a)nyc.rr.com>" :maintainer "Kenny Tilton <ktilton(a)nyc.rr.com>" :licence "MIT Style" :description "Cells Regression Test/Documentation" :long-description "Informatively-commented regression tests for Cells" :serial t :depends-on (:cells) :components ((:module "cells-test" :serial t :components ((:file "test") (:file "hello-world") (:file "test-kid-slotting") (:file "test-lazy") (:file "person") (:file "df-interference") (:file "test-family") (:file "output-setf") (:file "test-cycle") (:file "test-ephemeral") (:file "test-synapse") (:file "deep-cells"))))) (defmethod perform :after ((op load-op) (system (eql (find-system :cells-test)))) (funcall (find-symbol "TEST-CELLS" "CELLS")))

1 0

[cells-cvs] CVS cells
by fgoenninger 02 Dec '07

02 Dec '07

Update of /project/cells/cvsroot/cells In directory clnet:/tmp/cvs-serv22969 Removed Files: cells-test.asd Log Message: Changes: Preventing bit rod: * cells-test.asd moved to cells-test directory * asdf.lisp removed * load.lisp removed (was not maintained any more) In cells.asd: * file "variables.lisp" unused according to newest cells.lpr file. File itself kept for reference.

1 0

[cells-cvs] CVS cells
by fgoenninger 02 Dec '07

02 Dec '07

Update of /project/cells/cvsroot/cells In directory clnet:/tmp/cvs-serv22593 Removed Files: load.lisp Log Message: Changes: Preventing bit rod: * cells-test.asd moved to cells-test directory * asdf.lisp removed * load.lisp removed (was not maintained any more) In cells.asd: * file "variables.lisp" unused according to newest cells.lpr file. File itself kept for reference.

1 0

[cells-cvs] CVS cells
by fgoenninger 02 Dec '07

02 Dec '07

Update of /project/cells/cvsroot/cells In directory clnet:/tmp/cvs-serv22555 Modified Files: cells.asd Log Message: Changes: Preventing bit rod: * cells-test.asd moved to cells-test directory * asdf.lisp removed * load.lisp removed (was not maintained any more) In cells.asd: * file "variables.lisp" unused according to newest cells.lpr file. File itself kept for reference. --- /project/cells/cvsroot/cells/cells.asd 2007/12/02 18:15:30 1.7 +++ /project/cells/cvsroot/cells/cells.asd 2007/12/02 18:44:18 1.8 @@ -5,12 +5,13 @@ (declaim (optimize (debug 3) (speed 3) (safety 1) (compilation-speed 0))) (asdf:defsystem :cells - :name "cells" + :name "cells" :author "Kenny Tilton <kentilton(a)gmail.com>" :maintainer "Kenny Tilton <kentilton(a)gmail.com>" :licence "Lisp LGPL" :description "Cells" :long-description "Cells: a dataflow extension to CLOS." + :version "3.0" :serial t :components ((:module "utils-kt" :serial t @@ -24,22 +25,21 @@ (:file "trc-eko") (:file "cells") (:file "integrity") - (:file "constructors") (:file "cell-types") - (:file "synapse") - (:file "synapse-types") + (:file "constructors") (:file "initialize") (:file "md-slot-value") (:file "slot-utilities") (:file "link") (:file "propagate") + (:file "synapse") + (:file "synapse-types") (:file "model-object") (:file "defmodel") (:file "md-utilities") (:file "family") (:file "fm-utilities") - (:file "family-values") - (:file "variables"))) + (:file "family-values"))) (defmethod perform ((o load-op) (c (eql (find-system :cells)))) (pushnew :cells *features*)) @@ -48,6 +48,4 @@ (oos 'load-op :cells-test)) (defmethod perform ((o test-op) (c (eql :cells))) - (oos 'load-op :cells-test)) - -) \ No newline at end of file + (oos 'load-op :cells-test)))

1 0

[cells-cvs] CVS cells
by fgoenninger 02 Dec '07

02 Dec '07

Update of /project/cells/cvsroot/cells In directory clnet:/tmp/cvs-serv22429 Removed Files: asdf.lisp Log Message: Changes: Preventing bit rod: * cells-test.asd moved to cells-test directory * asdf.lisp removed * load.lisp removed (was not maintained any more) In cells.asd: * file "variables.lisp" unused according to newest cells.lpr file. File itself kept for reference.

1 0

← Newer
1
...
18
19
20
21
22
23
24
...
73
Older →

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

cells-cvs