me
/
guix
Archived
1
0
Fork 0
Code

gnu: dlib: Return #t from all phases. 

* gnu/packages/machine-learning.scm (dlib)[arguments]: Substitute INVOKE
for SYSTEM*. Return #t rather than undefined from phases.
master
Tobias Geerinckx-Rice 2018-06-26 19:39:29 +02:00
parent 3929f46c99
commit 8448e6bfcf
No known key found for this signature in database
GPG Key ID: 0DB0FF884F556D79
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gnu/packages/machine-learning.scm
View File

@ -668,8 +668,9 @@ and a QP solver.")
;; No test target, so we build and run the unit tests here.
(let ((test-dir (string-append "../dlib-" ,version "/dlib/test")))
(with-directory-excursion test-dir
(and (zero? (system* "make" "-j" (number->string (parallel-job-count))))
(zero? (system* "./dtest" "--runall")))))))
(invoke "make" "-j" (number->string (parallel-job-count)))
(invoke "./dtest" "--runall"))
#t)))
(add-after 'install 'delete-static-library
(lambda* (#:key outputs #:allow-other-keys)
(delete-file (string-append (assoc-ref outputs "out")