As written, it doesn't do anything other than append itself to all the
*.lisp files in the current directory; if any of them are later loaded (or
compiled and the resulting binary loaded) they'll do the same.  It's a
simple virus propagation wrapper; it's a simple matter to modify it to do
something (harmful or not) in addition to propagating itself.