me
/
guix
Archived
1
0
Fork 0
Code

gnu: squeak-vm: Enter build directory once. 

* gnu/packages/smalltalk.scm (squeak-vm)[arguments]: Use CHDIR instead of
pseudofunctional WITH-DIRECTORY-EXCURSIONs.  Drop the custom ‘build’ phase.
master
Tobias Geerinckx-Rice 2020-07-25 13:53:23 +02:00
parent b3c1dac11b
commit 30d6eb85da
No known key found for this signature in database
GPG Key ID: 0DB0FF884F556D79
1 changed files with 7 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
gnu/packages/smalltalk.scm
View File

@ -124,23 +124,18 @@ such as ones for networking and GUI programming.")
"unix/cmake/squeak.sh.in") "unix/cmake/squeak.sh.in")
(("^PATH=.*") "")) (("^PATH=.*") ""))
#t)) #t))
(add-after 'unpack 'create-build-dir (add-before 'configure 'enter-build-directory
(lambda _ (lambda _
(mkdir "bld") (mkdir "build")
(chdir "build")
#t)) #t))
(replace 'configure (replace 'configure
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out"))) (let ((out (assoc-ref outputs "out")))
(with-directory-excursion "bld" (invoke "../unix/cmake/configure"
(invoke "../unix/cmake/configure" (string-append "--prefix=" out)
(string-append "--prefix=" out) "--without-quartz")
"--without-quartz") #t))))))
#t))))
(replace 'build
(lambda _
(with-directory-excursion "bld"
(invoke "make"))
#t)))))
(synopsis "Smalltalk programming language and environment") (synopsis "Smalltalk programming language and environment")
(description "Squeak is a full-featured implementation of the Smalltalk (description "Squeak is a full-featured implementation of the Smalltalk
programming language and environment based on (and largely compatible with) programming language and environment based on (and largely compatible with)