(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*)))