[fetter-devel] Verrazano Speedup

Daniel Herring dherring at tentpost.com
Tue Jan 23 05:48:05 UTC 2007


In file, frontent/utility.lisp:47, change

(defmacro push-end (value lst)
   `(setf ,lst (append ,lst (list ,value))))

to
(defmacro push-end (value lst)
   `(nconc ,lst (list ,value)))

for a massive speedup (on my machine, parsing Qt/QtCore dropped from 90s 
to 9s).

- Daniel



More information about the fetter-devel mailing list