[parenscript-devel] A PS version of NCONC

[Vladimir Sedach]

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 <danielgackle at gmail.com>:
> 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
> parenscript-devel at common-lisp.net
> http://common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel
>
>