gnu: libtocc: Return #t from all phases.
* gnu/packages/search.scm (libtocc)[arguments]: Substitute INVOKE for SYSTEM*. Return #t rather than undefined from phases. Re-indent.
This commit is contained in:
parent
642d2db55a
commit
9947dcd746
|
@ -126,24 +126,24 @@ rich set of boolean query operators.")
|
||||||
(inputs `(("unqlite" ,unqlite)))
|
(inputs `(("unqlite" ,unqlite)))
|
||||||
(arguments
|
(arguments
|
||||||
`(#:phases (modify-phases %standard-phases
|
`(#:phases (modify-phases %standard-phases
|
||||||
(add-before
|
(add-before 'configure 'chdir-source
|
||||||
'configure 'chdir-source
|
(lambda _
|
||||||
(lambda _ (chdir "libtocc/src")))
|
(chdir "libtocc/src")
|
||||||
(replace
|
#t))
|
||||||
'check
|
(replace 'check
|
||||||
(lambda _
|
(lambda _
|
||||||
(with-directory-excursion "../tests"
|
(with-directory-excursion "../tests"
|
||||||
(and (zero? (system* "./configure"
|
(invoke "./configure"
|
||||||
(string-append "CONFIG_SHELL="
|
(string-append "CONFIG_SHELL="
|
||||||
(which "sh"))
|
(which "sh"))
|
||||||
(string-append "SHELL="
|
(string-append "SHELL="
|
||||||
(which "sh"))
|
(which "sh"))
|
||||||
"CPPFLAGS=-I../src"
|
"CPPFLAGS=-I../src"
|
||||||
(string-append
|
(string-append
|
||||||
"LDFLAGS=-L../src/.libs "
|
"LDFLAGS=-L../src/.libs "
|
||||||
"-Wl,-rpath=../src/.libs")))
|
"-Wl,-rpath=../src/.libs"))
|
||||||
(zero? (system* "make"))
|
(invoke "make")
|
||||||
(zero? (system* "./libtocctests")))))))))
|
(invoke "./libtocctests")))))))
|
||||||
(home-page "https://t-o-c-c.com/")
|
(home-page "https://t-o-c-c.com/")
|
||||||
(synopsis "Tool for Obsessive Compulsive Classifiers")
|
(synopsis "Tool for Obsessive Compulsive Classifiers")
|
||||||
(description
|
(description
|
||||||
|
|
Loading…
Reference in New Issue