Merge branch 'davazp-js-ffi' into js-ffi

Conflicts:
	ecmalisp.lisp

diff --cc ecmalisp.lisp
index 1984aaa,16e54c8..85ca88d
--- 1/ecmalisp.lisp
--- 2/ecmalisp.lisp
+++ b/ecmalisp.lisp
@@@ -2738,6 -2765,12 +2765,12 @@@
                             (cdr sexp))))
           (join (remove-if #'null-or-empty-p subs))))
        (t
+        (when *compile-print-toplevels*
+          (let ((form-string (prin1-to-string sexp)))
+            (write-string "Compiling ")
+            (write-string (truncate-string form-string))
+            (write-line "...")))
 -       
++
         (let ((code (ls-compile sexp multiple-value-p)))
           (code (join-trailing (get-toplevel-compilations)
                                (code ";" *newline*))