Ok, I pushed a patch with your implementation of NCONC to the repo. Does anyone else have runtime Parenscript libraries? It would be nice to provide links to them. The Parenscript front page already links to Suave, but doesn't explain about paren-util, that's something that needs to be fied.
Thanks, Vladimir 2010/3/3 Daniel Gackle <[email protected]>: > I needed a destructive append to a JS array, so I wrote this version of > NCONC for PS. It's primitive, but does what I need. > > (defun nconc (arr &rest arrs) > (when (and arr (> (length arr) 0)) > (loop :for other :in arrs :when (and other (> (length other) 0)) :do > ((@ arr :splice :apply) arr > (append (list (length arr) (length other)) other)))) > arr) > > I suppose this would naturally go in some kind of runtime library for PS. > (We have quite a few utility functions that might belong there, in fact.) > But I don't think there is one anymore. Should there be? > > Daniel > > _______________________________________________ > parenscript-devel mailing list > [email protected] > http://common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel > > _______________________________________________ parenscript-devel mailing list [email protected] http://common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel
