Archived
1
0
Fork 0

gnu: cpuid: Use G-expressions.

* gnu/packages/linux.scm (cpuid)[arguments]:
Rewrite as G-expressions.
This commit is contained in:
Tobias Geerinckx-Rice 2022-07-17 02:00:01 +02:00
parent ce2635852f
commit 85e859baa6
No known key found for this signature in database
GPG key ID: 0DB0FF884F556D79

View file

@ -7817,16 +7817,17 @@ available in the kernel Linux.")
"06nb69vlv1szdzq1dp784pgbr9z2py050v1hlrn4rr56jp0a2nci")))) "06nb69vlv1szdzq1dp784pgbr9z2py050v1hlrn4rr56jp0a2nci"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
`(#:make-flags (list #:make-flags
(list (string-append "CC=" ,(cc-for-target))) #~(list (string-append "CC=" #$(cc-for-target)))
#:tests? #f ; no tests #:tests? #f ; no tests
#:phases (modify-phases %standard-phases #:phases
(delete 'configure) ; no configure script #~(modify-phases %standard-phases
(add-before 'install 'fix-makefile (delete 'configure) ; no configure script
(lambda* (#:key outputs #:allow-other-keys) (add-before 'install 'fix-makefile
(substitute* "Makefile" (lambda* (#:key outputs #:allow-other-keys)
(("\\$\\(BUILDROOT\\)/usr") (substitute* "Makefile"
(assoc-ref outputs "out")))))))) (("\\$\\(BUILDROOT\\)/usr")
(assoc-ref outputs "out"))))))))
(inputs (list perl)) (inputs (list perl))
(supported-systems '("i686-linux" "x86_64-linux")) (supported-systems '("i686-linux" "x86_64-linux"))
(home-page "http://www.etallen.com/cpuid.html") (home-page "http://www.etallen.com/cpuid.html")