mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-30 00:40:20 +02:00
remove display-separated.
(build-link): cleanup. (build-compile): remove space between -I and path.
This commit is contained in:
parent
17b8540143
commit
23ac14c0c9
1 changed files with 8 additions and 3 deletions
|
@ -184,9 +184,14 @@
|
||||||
;; See gcc manual wrt fixincludes. Search for "Use of
|
;; See gcc manual wrt fixincludes. Search for "Use of
|
||||||
;; `-I/usr/include' may cause trouble." For now we hard-code this.
|
;; `-I/usr/include' may cause trouble." For now we hard-code this.
|
||||||
;; Later maybe we can do something more dynamic.
|
;; Later maybe we can do something more dynamic.
|
||||||
(if (not (string=? (get-build-info 'includedir) "/usr/include"))
|
(display
|
||||||
(display (string-append "-I" (get-build-info 'includedir))))
|
(string-join
|
||||||
(display-line (get-build-info 'CFLAGS)))
|
(if (not (string=? (get-build-info 'includedir) "/usr/include"))
|
||||||
|
(string-append "-I" (get-build-info 'includedir))
|
||||||
|
"")
|
||||||
|
(get-build-info 'CFLAGS)
|
||||||
|
"\n"
|
||||||
|
)))
|
||||||
|
|
||||||
(define (help-compile)
|
(define (help-compile)
|
||||||
(let ((dle display-line-error))
|
(let ((dle display-line-error))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue