derivations: Make the "grafting..." message directly visible.

* guix/derivations.scm (graft-derivation)[build]: Add call to
  'force-output'.

guix/derivations.scm

@@ -1095,6 +1095,7 @@ (define build
        (let ((mapping ',mapping))
          (for-each (lambda (input output)
                      (format #t "grafting '~a' -> '~a'...~%" input output)
+                     (force-output)
                      (rewrite-directory input output
                                         `((,input . ,output)
                                           ,@mapping)))