tanelorn: (rust-crates.scm) New file.

1 files changed, 43 insertions, 0 deletions

diff --git a/modules/tanelorn/packages/rust-crates.scm b/modules/tanelorn/packages/rust-crates.scm
new file mode 100644
index 0000000..901d008
--- /dev/null
+++ b/modules/tanelorn/packages/rust-crates.scm
@@ -0,0 +1,43 @@
+;;; Copyright © 2025 bdunahu <bdunahu@operationnull.com>
+;;;
+;;; SPDX-License-Identifier: GPL-3.0-or-later
+
+(define-module (tanelorn packages rust-crates)
+  #:use-module (guix gexp)
+  #:use-module (guix packages)
+  #:use-module (guix download)
+  #:use-module (guix git-download)
+  #:use-module (guix build-system cargo)
+  #:use-module (gnu packages rust-sources)
+  #:export (lookup-cargo-inputs
+            tanelorn-cargo-inputs))
+
+;;;
+;;; This file is managed by ‘guix import’.  Do NOT add definitions manually.
+;;;
+
+(define* (tanelorn-cargo-inputs name
+				#:key (module '(tanelorn packages rust-crates)))
+  "Lookup Cargo inputs for NAME defined in MODULE, return an empty list if
+unavailable."
+  (let ((lookup (module-ref (resolve-interface module) 'lookup-cargo-inputs)))
+    (or (lookup name)
+        (begin
+          (warning (G_ "no Cargo inputs available for '~a'~%") name)
+          '()))))
+
+;;;
+;;; Rust libraries fetched from crates.io and non-workspace development
+;;; snapshots.
+;;;
+
+(define qqqq-separator 'begin-of-crates)
+
+(define ssss-separator 'end-of-crates)
+
+
+;;;
+;;; Cargo inputs.
+;;;
+
+(define-cargo-inputs lookup-cargo-inputs)