1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-28 07:50:20 +02:00

remove display-separated.

(build-link): cleanup.
(build-compile): remove space between -I and path.
This commit is contained in:
Han-Wen Nienhuys 2004-10-08 10:03:14 +00:00
parent 17b8540143
commit 23ac14c0c9

View file

@ -184,9 +184,14 @@
;; See gcc manual wrt fixincludes. Search for "Use of
;; `-I/usr/include' may cause trouble." For now we hard-code this.
;; Later maybe we can do something more dynamic.
(if (not (string=? (get-build-info 'includedir) "/usr/include"))
(display (string-append "-I" (get-build-info 'includedir))))
(display-line (get-build-info 'CFLAGS)))
(display
(string-join
(if (not (string=? (get-build-info 'includedir) "/usr/include"))
(string-append "-I" (get-build-info 'includedir))
"")
(get-build-info 'CFLAGS)
"\n"
)))
(define (help-compile)
(let ((dle display-line-error))