LispForum

Look at your ((listp (car x)) (cons NIL (lin (car x)))) That line means means 'if the first element of your list is a list itself, you call lin on it and attach nil to the front.' What you really want to be doing is appending the linearization of (car x) to the linearization of the remainder of x.

Glad it helped. I suspect that the garbage collector is not tuned for parallelism and large memory sizes; I think that increasing the (bytes-consed-between-gcs) is a good idea on any machine with a large amount of memory. In fact, SBCL has some other issues with the address space; last I checked, it...

When I was doing matrix operations in SBCL which I thought should be completely parallelized, I was getting about a 2.5x speedup on a 4 core machine. I suspect that memory issues were the reason -- each core has cache contention issues and also, the memory bandwidth may be limited. If you have a lar...

Alternatively, lets say you are working on a matrix library. (defun m* (matrix-1 matrix-2 &optional target) (if (null target) (setf target (make-matrix-of-right-size)) ; blas call to multiply matrix-1 by matrix-2 and save to target ) (defun m+ (matrix-1 matrix-2 &optional target) (if (null t...

I'm currently at UAI and there is a really interesting paper which uses the code-as-data aspect of lisp to create a language in which you can describe an arbitrary probabilistic model, and do inference on it.

http://uai2008.cs.helsinki.fi/UAI_camer ... oodman.pdf