[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
09/11: gnu: Add ceres-solver-benchmarks.
From: |
guix-commits |
Subject: |
09/11: gnu: Add ceres-solver-benchmarks. |
Date: |
Tue, 7 Dec 2021 04:10:32 -0500 (EST) |
civodul pushed a commit to branch wip-cpu-tuning
in repository guix.
commit 9e68399283b6be70f7e5a84d4948c54821357e32
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Fri Dec 3 23:29:39 2021 +0100
gnu: Add ceres-solver-benchmarks.
* gnu/packages/maths.scm (ceres-solver-benchmarks): New variable.
---
gnu/packages/maths.scm | 44 ++++++++++++++++++++++++++++++++++++++++++++
1 file changed, 44 insertions(+)
diff --git a/gnu/packages/maths.scm b/gnu/packages/maths.scm
index 19dab59..06bdb8e 100644
--- a/gnu/packages/maths.scm
+++ b/gnu/packages/maths.scm
@@ -2401,6 +2401,50 @@ can solve two kinds of problems:
;; Mark as tunable to take advantage of SIMD code in Eigen.
(properties `((tunable? . #t)))))
+(define-public ceres-solver-benchmarks
+ (package
+ (inherit ceres)
+ (name "ceres-solver-benchmarks")
+ (arguments
+ '(#:modules ((ice-9 popen)
+ (ice-9 rdelim)
+ (guix build utils)
+ (guix build cmake-build-system))
+
+ #:phases (modify-phases %standard-phases
+ (delete 'configure)
+ (replace 'build
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let* ((out (assoc-ref outputs "out"))
+ (bin (string-append out "/bin")))
+ (define flags
+ (string-tokenize
+ (read-line (open-pipe* OPEN_READ
+ "pkg-config" "eigen3"
+ "--cflags"))))
+
+ (define (compile-file file)
+ (let ((source (string-append file ".cc")))
+ (format #t "building '~a'...~%" file)
+ (apply invoke "c++" "-fopenmp" "-O2" "-g"
"-DNDEBUG"
+ source "-lceres" "-lbenchmark" "-lglog"
+ "-pthread"
+ "-o" (string-append bin "/" file)
+ "-I" ".." flags)))
+
+ (mkdir-p bin)
+ (with-directory-excursion "internal/ceres"
+ (for-each compile-file
+ '("small_blas_gemm_benchmark"
+ "small_blas_gemv_benchmark"
+ "autodiff_cost_function_benchmark"))))))
+ (delete 'check)
+ (delete 'install))))
+ (inputs `(("googlebenchmark" ,googlebenchmark)
+ ("ceres-solver" ,ceres)
+ ,@(package-inputs ceres)))
+ (synopsis "Benchmarks of the Ceres optimization problem solver")))
+
;; For a fully featured Octave, users are strongly recommended also to install
;; the following packages: less, ghostscript, gnuplot.
(define-public octave-cli
- branch wip-cpu-tuning created (now e8d7890), guix-commits, 2021/12/07
- 03/11: transformations: Add '--tune'., guix-commits, 2021/12/07
- 11/11: gnu: prusa-slicer: Mark as tunable., guix-commits, 2021/12/07
- 07/11: gnu: Add xtensor-benchmark., guix-commits, 2021/12/07
- 09/11: gnu: Add ceres-solver-benchmarks.,
guix-commits <=
- 02/11: Add (guix cpu)., guix-commits, 2021/12/07
- 05/11: gnu: Add eigen-benchmarks., guix-commits, 2021/12/07
- 04/11: ci: Add extra jobs for tunable packages., guix-commits, 2021/12/07
- 10/11: gnu: libfive: Mark as tunable., guix-commits, 2021/12/07
- 08/11: gnu: ceres-solver: Mark as tunable., guix-commits, 2021/12/07
- 01/11: gnu: ocaml4.07-ppx-let: Make 'properties' an alist., guix-commits, 2021/12/07
- 06/11: gnu: Add xsimd-benchmark., guix-commits, 2021/12/07