ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-26 20:49:29 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: javacc: Install binaries.

Browse source 
* gnu/packages/java.scm (javacc)[arguments]: Add install-bin phase.
This commit is contained in:
Julien Lepiller 2019-05-03 12:47:48 +02:00
parent a005c63a21
commit 16fdf2f55d
No known key found for this signature in database
GPG key ID: 43111F4520086A0C
1 changed files with 21 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

22
gnu/packages/java.scm
View file

@ -2394,7 +2394,27 @@ (define-public javacc
#:test-target "test" #:test-target "test"
#:phases #:phases
(modify-phases %standard-phases (modify-phases %standard-phases
(replace 'install (install-jars "target"))))) (replace 'install (install-jars "target"))
(add-after 'install 'install-bin
(lambda* (#:key outputs inputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out"))
(dir (string-append out "/share/java"))
(bin (string-append out "/bin"))
(javacc (string-append bin "/javacc")))
(mkdir-p bin)
(with-output-to-file javacc
(lambda _
(display
(string-append "#!/bin/sh\n"
(assoc-ref inputs "jdk") "/bin/java"
" -cp " dir "/javacc.jar" " `basename $0`" " $*"))))
(chmod javacc #o755)
;; symlink to different names to affect the first argument and
;; change the behavior of the jar file.
(symlink javacc (string-append bin "/jjdoc"))
(symlink javacc (string-append bin "/jjtree"))
#t))))))
(native-inputs (native-inputs
`(("javacc" ,javacc-4))))) `(("javacc" ,javacc-4)))))