175 |
;; Display the flags, separated by spaces. |
;; Display the flags, separated by spaces. |
176 |
(if (or (string=? libdir "/usr/lib") |
(if (or (string=? libdir "/usr/lib") |
177 |
(string=? libdir "/usr/lib/")) |
(string=? libdir "/usr/lib/")) |
178 |
(display-separated (cons "-lguile" other-flags)) |
(display-separated (cons "-lguile -lguile-ltdl" other-flags)) |
179 |
(display-separated (cons |
(display-separated (cons |
180 |
(string-append "-L" (get-build-info 'libdir)) |
(string-append "-L" (get-build-info 'libdir)) |
181 |
(cons "-lguile" other-flags)))) |
(cons "-lguile -lguile-ltdl" other-flags)))) |
182 |
(newline))) |
(newline))) |
183 |
|
|
184 |
(define (help-link) |
(define (help-link) |