OK, he asked a question that no one else was answering, I gave him an answer that works. If you don't like it, instead of knocking it why don't you dazzle us with your 42616E6E656400[/b]ing brilliance and show him a better way.
No need to go hexipostal. I was just demonstrating the optional argument you can pass the load statement so it returns something more illuminating or desirable than --
[0.43] (VL-BT)
[1.39] (*ERROR* "LOAD failed: \"lispname.lsp\"")
[2.34] (_call-err-hook #<SUBR @0312b078 *ERROR*> "LOAD failed:
\"lispname.lsp\"")
[3.28] (sys-error "LOAD failed: \"lispname.lsp\"")
:ERROR-BREAK.23 nil
[4.20] (LOAD "lispname.lsp")
[5.15] (#<SUBR @03288be0 -rts_top->)
[6.12] (#<SUBR @02a22334 veval-str-body> "(load \"lispname.lsp\")" T #<FILE
internal>)
:CALLBACK-ENTRY.6 (:CALLBACK-ENTRY)
:ARQ-SUBR-CALLBACK.3 (nil 0)