From 57759415caecdbd7378ee5555e4336daec6fb579 Mon Sep 17 00:00:00 2001 From: Marek Paśnikowski Date: Sun, 21 Jul 2024 20:45:46 +0200 Subject: feature: implement the minimal generic system configuration --- suweren/system.scm | 11 +++++++++++ 1 file changed, 11 insertions(+) create mode 100644 suweren/system.scm diff --git a/suweren/system.scm b/suweren/system.scm new file mode 100644 index 0000000..5eabc3c --- /dev/null +++ b/suweren/system.scm @@ -0,0 +1,11 @@ +(define-module (suweren system) + #:use-module (gnu system) ; operating-system + ) + +;; string -> record operating-system +(define-public (%suweren-operating-system bootloader-configuration* + host-name* + file-systems*) + (operating-system (bootloader bootloader-configuration*) + (host-name host-name*) + (file-systems file-systems*))) -- cgit v1.2.3