Using the re-arrangement code:
took 214,214,000 microseconds (214.214000 seconds) to run.
18,728,831 microseconds ( 18.728832 seconds, 8.74%) of which was spent in GC.
Without:
took 217,601,000 microseconds (217.601000 seconds) to run.
17,750,023 microseconds ( 17.750025 seconds, 8.16%) of which was spent in GC.
This is about a 1.6% speed up---I only tried the test once.
Maxima version: "branch_5_27_base_132_g50ac673_dirty"
Maxima build date: "2012-08-03 23:09:28"
Host type: "i686-pc-cygwin"
Lisp implementation type: "Clozure Common Lisp"
Lisp implementation version: "Version 1.8-r15286M (WindowsX8664)"
--bw
________________________________________
From: maxima-bounces at math.utexas.edu [maxima-bounces at math.utexas.edu] on behalf of Richard Fateman [fateman at eecs.berkeley.edu]
Sent: Sunday, August 05, 2012 17:30
To: Maxima - list
Subject: property lisp hack
(defun putops1(sym) ;;put operators property at front of plist
(let ((val (get sym 'operators)))
(when val (remprop sym 'operators)(setf (get sym 'operators) val))))
;; here is what should be executed before dumping the lisp.
(do-symbols (s (find-package :maxima)) (putops1 s))
_______________________________________________
Maxima mailing list
Maxima at math.utexas.edu
http://www.math.utexas.edu/mailman/listinfo/maxima