summaryrefslogtreecommitdiff
path: root/gnu/packages/ld-wrapper.in
diff options
context:
space:
mode:
authorThéo Tyburn <theo.tyburn@posteo.net>2026-06-03 10:56:10 +0200
committerNguyễn Gia Phong <cnx@loang.net>2026-08-31 11:00:19 +0900
commitc62ebcd02c2eb190ab5dc157475ef4a93a1c7581 (patch)
treef178f262874978ac0be45e5499db5cc2d63248fe /gnu/packages/ld-wrapper.in
parent30cb1f541eb99b0fbbec1f8f29796151103c5f2b (diff)
doc: Move Commentary above module definition.
Merges: https://codeberg.org/guix/guix/pulls/9052 Reviewed-by: Ludovic Courtès <ludo@gnu.org> Reviewed-by: Maxim Cournoyer <maxim@guixotic.coop> Signed-off-by: Nguyễn Gia Phong <cnx@loang.net>
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@")