ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-12-24 21:38:07 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: american-fuzzy-lop: Unconditionally return #T from build phases.

Browse source 
* gnu/packages/debug.scm (american-fuzzy-lop)[arguments]: Use INVOKE and
unconditionally return #T from build phases.
This commit is contained in:
Ricardo Wurmus 2019-01-26 22:32:44 +01:00
parent e5855e6f6b
commit 75ac5e20bc
No known key found for this signature in database
GPG key ID: 197A5888235FACAC
1 changed files with 8 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
gnu/packages/debug.scm
View file

@ -194,10 +194,8 @@ (define-public american-fuzzy-lop
(patch-dir
(string-append afl-dir
"/qemu_mode/patches")))
(unless (zero?
(system* "tar" "xf"
(assoc-ref inputs "afl-src")))
(error "tar failed to unpack afl-src"))
(invoke "tar" "xf"
(assoc-ref inputs "afl-src"))
(install-file (string-append patch-dir
"/afl-qemu-cpu-inl.h")
".")
@ -210,11 +208,12 @@ (define-public american-fuzzy-lop
(substitute* (string-append patch-dir
"/cpu-exec.diff")
(("\\.\\./patches/") ""))
(every (lambda (patch-file)
(zero? (system* "patch" "--force" "-p1"
"--input" patch-file)))
(find-files patch-dir
"\\.diff$"))))))))))))))
(for-each (lambda (patch-file)
(invoke "patch" "--force" "-p1"
"--input" patch-file))
(find-files patch-dir
"\\.diff$"))
#t))))))))))))
(arguments
`(#:make-flags (list (string-append "PREFIX=" (assoc-ref %outputs "out"))
"CC=gcc")