1 files changed, 29 insertions(+), 0 deletions(-)

A modules/ruther/packages/utilities.scm

@@ 0,0 1,29 @@
+(define-module (ruther packages utilities)
+  #:use-module (guix gexp)
+  #:use-module (guix packages)
+  #:use-module (guix build-system trivial)
+  #:use-module (gnu packages base))
+
+(define-public ldd
+  (package
+    (inherit glibc)
+    (name "ldd")
+    (source #f)
+    (build-system trivial-build-system)
+    (outputs '("out"))
+    (arguments
+     (list
+      #:modules '((guix build utils))
+      #:builder
+      #~(begin
+          (use-modules (guix build utils))
+          (let ((bin-dir (string-append #$output "/bin")))
+            (mkdir-p bin-dir)
+            (symlink (string-append #$(this-package-input "glibc") "/bin/ldd")
+                     (string-append bin-dir "/ldd"))))))
+    (inputs
+     (list glibc))
+    (search-paths '())
+    (native-search-paths '())
+    (synopsis "ldd from glibc.")
+    (description "Only ldd obtained from glibc package.")))