summaryrefslogtreecommitdiff
path: root/gnu/packages/ld-wrapper.in
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/packages/ld-wrapper.in')
-rw-r--r--gnu/packages/ld-wrapper.in12
1 files changed, 6 insertions, 6 deletions
diff --git a/gnu/packages/ld-wrapper.in b/gnu/packages/ld-wrapper.in
index c9bb235bca5..61d65b262d9 100644
--- a/gnu/packages/ld-wrapper.in
+++ b/gnu/packages/ld-wrapper.in
@@ -39,12 +39,6 @@ exec @GUILE@ -c "(load-compiled \"@SELF@.go\") ($main (command-line))" "$@"
39;;; You should have received a copy of the GNU General Public License 39;;; You should have received a copy of the GNU General Public License
40;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>. 40;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
41 41
42(define-module (gnu build-support ld-wrapper)
43 #:use-module (srfi srfi-1)
44 #:use-module (ice-9 match)
45 #:autoload (ice-9 rdelim) (read-delimited)
46 #:export (ld-wrapper))
47
48;;; Commentary: 42;;; Commentary:
49;;; 43;;;
50;;; This is a wrapper for the linker. Its purpose is to inspect the -L and 44;;; This is a wrapper for the linker. Its purpose is to inspect the -L and
@@ -70,6 +64,12 @@ exec @GUILE@ -c "(load-compiled \"@SELF@.go\") ($main (command-line))" "$@"
70;;; 64;;;
71;;; Code: 65;;; Code:
72 66
67(define-module (gnu build-support ld-wrapper)
68 #:use-module (srfi srfi-1)
69 #:use-module (ice-9 match)
70 #:autoload (ice-9 rdelim) (read-delimited)
71 #:export (ld-wrapper))
72
73(define %real-ld 73(define %real-ld
74 ;; Name of the linker that we wrap. 74 ;; Name of the linker that we wrap.
75 "@LD@") 75 "@LD@")