linux-initrd: Build /dev/loop* nodes.
* guix/build/linux-initrd.scm (make-essential-device-nodes): Build /dev/loop[0-7].
This commit is contained in:
parent
ca143f1379
commit
3035b50f28
|
@ -168,6 +168,14 @@ Return the value associated with OPTION, or #f on failure."
|
||||||
(symlink "/proc/self/fd/1" (scope "dev/stdout"))
|
(symlink "/proc/self/fd/1" (scope "dev/stdout"))
|
||||||
(symlink "/proc/self/fd/2" (scope "dev/stderr"))
|
(symlink "/proc/self/fd/2" (scope "dev/stderr"))
|
||||||
|
|
||||||
|
;; Loopback devices.
|
||||||
|
(let loop ((i 0))
|
||||||
|
(when (< i 8)
|
||||||
|
(mknod (scope (string-append "dev/loop" (number->string i)))
|
||||||
|
'block-special #o660
|
||||||
|
(device-number 7 i))
|
||||||
|
(loop (+ 1 i))))
|
||||||
|
|
||||||
;; File systems in user space (FUSE).
|
;; File systems in user space (FUSE).
|
||||||
(mknod (scope "dev/fuse") 'char-special #o666 (device-number 10 229)))
|
(mknod (scope "dev/fuse") 'char-special #o666 (device-number 10 229)))
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue