me/guix
Archived
1
0
Fork 0
Code Activity

gnu: clingo: Use G-Expressions.

Browse source 
* gnu/packages/maths.scm (clingo)[arguments]: Convert to list of G-Expressions.
This commit is contained in:
Liliana Marie Prikler 2022-12-08 09:47:52 +01:00
parent 188269f062
commit 25e3e0c6ec
No known key found for this signature in database
GPG key ID: 442A84B8C70E2F87
1 changed files with 38 additions and 37 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

75
gnu/packages/maths.scm
View file

@ -2644,43 +2644,44 @@ satisfiability checking (SAT).")
"19s59ndcm2yj0kxlikfxnx2bmp6b7n31wq1zvwc7hyk37rqarwys")))) "19s59ndcm2yj0kxlikfxnx2bmp6b7n31wq1zvwc7hyk37rqarwys"))))
(build-system cmake-build-system) (build-system cmake-build-system)
(arguments (arguments
`(#:configure-flags `("-DCLINGO_BUILD_TESTS=on" (list
"-DCLINGO_INSTALL_LIB=on" #:configure-flags #~`("-DCLINGO_BUILD_TESTS=on"
"-DCLINGO_BUILD_STATIC=off" "-DCLINGO_INSTALL_LIB=on"
"-DCLINGO_BUILD_SHARED=on" "-DCLINGO_BUILD_STATIC=off"
"-DCLINGO_USE_LOCAL_CLASP=off" "-DCLINGO_BUILD_SHARED=on"
"-DCLINGO_USE_LOCAL_CATCH=off") "-DCLINGO_USE_LOCAL_CLASP=off"
#:phases "-DCLINGO_USE_LOCAL_CATCH=off")
(modify-phases %standard-phases #:phases
(add-after 'unpack 'patch-cmake #~(modify-phases %standard-phases
(lambda _ (add-after 'unpack 'patch-cmake
(substitute* "CMakeLists.txt" (lambda _
(("add_subdirectory\\(clasp\\)") (substitute* "CMakeLists.txt"
"find_package(clasp REQUIRED)")) (("add_subdirectory\\(clasp\\)")
(substitute* "libclingo/CMakeLists.txt" "find_package(clasp REQUIRED)"))
(("\"cmake/Clingo\"") "\"cmake/clingo\"") (substitute* "libclingo/CMakeLists.txt"
(("ClingoConfig\\.cmake") "clingo-config.cmake") (("\"cmake/Clingo\"") "\"cmake/clingo\"")
(("ClingoConfigVersion\\.cmake") (("ClingoConfig\\.cmake") "clingo-config.cmake")
"clingo-config-version.cmake")) (("ClingoConfigVersion\\.cmake")
(substitute* "cmake/ClingoConfig.cmake.in" "clingo-config-version.cmake"))
(("find_package\\(Clasp") "find_package(clasp")) (substitute* "cmake/ClingoConfig.cmake.in"
(rename-file "cmake/ClingoConfig.cmake.in" (("find_package\\(Clasp") "find_package(clasp"))
"cmake/clingo-config.cmake.in"))) (rename-file "cmake/ClingoConfig.cmake.in"
(add-after 'unpack 'skip-failing-tests "cmake/clingo-config.cmake.in")))
(lambda _ (add-after 'unpack 'skip-failing-tests
(with-directory-excursion "libclingo/tests" (lambda _
(substitute* "CMakeLists.txt" (with-directory-excursion "libclingo/tests"
(("COMMAND test_clingo" all) (substitute* "CMakeLists.txt"
(string-append all (("COMMAND test_clingo" all)
" -f " (string-append all
"\"${CMAKE_CURRENT_SOURCE_DIR}/good.txt\""))) " -f "
(call-with-output-file "good.txt" "\"${CMAKE_CURRENT_SOURCE_DIR}/good.txt\"")))
(lambda (port) (call-with-output-file "good.txt"
(for-each (lambda (test) (format port "~s~%" test)) (lambda (port)
'("parse-ast-v2" "add-ast-v2" "build-ast-v2" (for-each (lambda (test) (format port "~s~%" test))
"unpool-ast-v2" "parse_term" '("parse-ast-v2" "add-ast-v2" "build-ast-v2"
"propagator" "propgator-sequence-mining" "unpool-ast-v2" "parse_term"
"symbol" "visitor")))))))))) "propagator" "propgator-sequence-mining"
"symbol" "visitor"))))))))))
(inputs (list catch2-3.1 clasp libpotassco)) (inputs (list catch2-3.1 clasp libpotassco))
(native-inputs (list pkg-config)) (native-inputs (list pkg-config))
(home-page "https://potassco.org/") (home-page "https://potassco.org/")