me
/
guix
Archived
1
0
Fork 0

gnu: libx86emu: Format with 'guix style'.

* gnu/packages/virtualization.scm (libx86emu): Adjust package formatting
with 'guix style'.
Efraim Flashner 2023-07-09 12:24:43 +03:00
parent 7ba1626113
commit 8258e88878
No known key found for this signature in database
GPG Key ID: 41AAE7DCCA3D8351
1 changed files with 41 additions and 45 deletions

View File

@ -596,20 +596,16 @@ server and embedded PowerPC, and S390 guests.")
(name "libx86emu") (name "libx86emu")
(version "3.5") (version "3.5")
(home-page "https://github.com/wfeldt/libx86emu") (home-page "https://github.com/wfeldt/libx86emu")
(source (source (origin
(origin
(method git-fetch) (method git-fetch)
(uri (uri (git-reference
(git-reference
(url home-page) (url home-page)
(commit version))) (commit version)))
(file-name (git-file-name name version)) (file-name (git-file-name name version))
(sha256 (sha256
(base32 "11nj3y7maz9ch15b1c2b69gd8d7mpaha377zpdbvfsmg5w9zz93l")) (base32 "11nj3y7maz9ch15b1c2b69gd8d7mpaha377zpdbvfsmg5w9zz93l"))
(modules (modules '((guix build utils)))
'((guix build utils))) (snippet `(begin
(snippet
`(begin
;; Remove git2log program file. ;; Remove git2log program file.
(delete-file "git2log") (delete-file "git2log")
;; Remove variables that depends on git2log. ;; Remove variables that depends on git2log.
@ -623,8 +619,7 @@ server and embedded PowerPC, and S390 guests.")
;; sys/io.h is not present from glibc on non-x86 systems. ;; sys/io.h is not present from glibc on non-x86 systems.
#:tests? ,(and (target-x86?) #:tests? ,(and (target-x86?)
(not (%current-target-system))) (not (%current-target-system)))
#:phases #:phases (modify-phases %standard-phases
(modify-phases %standard-phases
(add-after 'unpack 'patch (add-after 'unpack 'patch
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))
@ -642,12 +637,13 @@ server and embedded PowerPC, and S390 guests.")
,(version-major version) "\n")) ,(version-major version) "\n"))
(("LIBDIR.*=.*$") (("LIBDIR.*=.*$")
(string-append "LIBDIR = " lib "\n")) (string-append "LIBDIR = " lib "\n"))
(("/usr/include") include))))) (("/usr/include")
(delete 'configure)))) ; no configure script include)))))
(native-inputs (delete 'configure)))) ;no configure script
(list nasm perl)) (native-inputs (list nasm perl))
(synopsis "Library for x86 emulation") (synopsis "Library for x86 emulation")
(description "Libx86emu is a small library to emulate x86 instructions. The (description
"Libx86emu is a small library to emulate x86 instructions. The
focus here is not a complete emulation but to cover enough for typical focus here is not a complete emulation but to cover enough for typical
firmware blobs. You can firmware blobs. You can
@enumerate @enumerate