compile-file adds #:to-disk? #t to opts

* module/system/base/compile.scm (compile-file): Pass #:to-disk? as an
  option to indicate that the result will be being loaded from disk.
  Perhaps a linker might want to page-align in that case.

* module/language/elisp/compile-tree-il.scm (process-options!): Accept
  and ignore the #:to-file compiler option.

module/language/elisp/compile-tree-il.scm

@@ -792,7 +792,7 @@
           (let ((key (car opt))
                 (value (cadr opt)))
             (case key
-              ((#:warnings)             ; ignore
+              ((#:warnings #:to-file?)  ; ignore
                #f)
               (else (report-error #f
                                   "Invalid compiler option"

module/system/base/compile.scm

@@ -150,7 +150,8 @@
       (call-with-output-file/atomic comp
         (lambda (port)
           ((language-printer (ensure-language to))
-           (read-and-compile in #:env env #:from from #:to to #:opts opts)
+           (read-and-compile in #:env env #:from from #:to to #:opts
+                             (cons* #:to-file? #t opts))
            port))
         file)
       comp)))