futurile/guix-play
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

gnu: antlr3-3.1: Use invoke.

Browse Source 
* gnu/packages/java.scm (antlr3-3.1)[arguments]: Use invoke.
This commit is contained in:
Ricardo Wurmus 2018-02-27 20:56:02 +01:00
parent e85c1bf6cd
commit 13f38d31a4
No known key found for this signature in database
GPG Key ID: 197A5888235FACAC
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
gnu/packages/java.scm
View File

@ -5709,12 +5709,13 @@ import org.antlr.grammar.v2.ANTLRTreePrinter;"))
(for-each (lambda (file) (for-each (lambda (file)
(display file) (display file)
(newline) (newline)
(system* "antlr" "-o" dir (string-append dir file))) (invoke "antlr" "-o" dir (string-append dir file)))
'("antlr.g" "antlr.print.g" "assign.types.g" '("antlr.g" "antlr.print.g" "assign.types.g"
"buildnfa.g" "define.g"))) "buildnfa.g" "define.g")))
(format #t "codegen.g\n") (format #t "codegen.g\n")
(system* "antlr" "-o" "src/org/antlr/codegen" (invoke "antlr" "-o" "src/org/antlr/codegen"
"src/org/antlr/codegen/codegen.g"))) "src/org/antlr/codegen/codegen.g")
#t))
(add-before 'build 'fix-build-xml (add-before 'build 'fix-build-xml
(lambda _ (lambda _
(substitute* "build.xml" (substitute* "build.xml"