From d68dc8541cbcc3d04b43bdad8bed5718d18b4676 Mon Sep 17 00:00:00 2001 From: Arun Isaac Date: Sun, 25 Apr 2021 23:43:47 +0530 Subject: Set path to guile in shebang from configure. * configure.ac: Generate scripts/ccwl. * scripts/ccwl: Rename to ... * scripts/ccwl.in: ... this. Set path to guile in shebang as an autoconf substitution. --- configure.ac | 1 + scripts/ccwl | 39 --------------------------------------- scripts/ccwl.in | 40 ++++++++++++++++++++++++++++++++++++++++ 3 files changed, 41 insertions(+), 39 deletions(-) delete mode 100755 scripts/ccwl create mode 100755 scripts/ccwl.in diff --git a/configure.ac b/configure.ac index 2e1f1fe..531b29c 100644 --- a/configure.ac +++ b/configure.ac @@ -26,4 +26,5 @@ GUILE_PROGS AC_CONFIG_FILES([Makefile]) AC_CONFIG_FILES([pre-inst-env], [chmod +x pre-inst-env]) +AC_CONFIG_FILES([scripts/ccwl], [chmod +x scripts/ccwl]) AC_OUTPUT diff --git a/scripts/ccwl b/scripts/ccwl deleted file mode 100755 index 2efdee1..0000000 --- a/scripts/ccwl +++ /dev/null @@ -1,39 +0,0 @@ -#! /run/current-system/profile/bin/guile -s -!# -;;; ccwl --- Concise Common Workflow Language -;;; Copyright © 2021 Arun Isaac -;;; -;;; This file is part of ccwl. -;;; -;;; ccwl is free software: you can redistribute it and/or modify it -;;; under the terms of the GNU General Public License as published by -;;; the Free Software Foundation, either version 3 of the License, or -;;; (at your option) any later version. -;;; -;;; ccwl is distributed in the hope that it will be useful, but -;;; WITHOUT ANY WARRANTY; without even the implied warranty of -;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU -;;; General Public License for more details. -;;; -;;; You should have received a copy of the GNU General Public License -;;; along with ccwl. If not, see . - -;;; Commentary: - -;; This script compiles a CCWL workflow to CWL. - -;;; Code: - -(use-modules (ice-9 match) - (ccwl ccwl) - (ccwl yaml)) - -(match (command-line) - ((_ "compile" input-file) - (scm->yaml (load (canonicalize-path input-file)) - (current-output-port))) - ((program _ ...) - (format (current-error-port) - "Usage: ~a compile input-file~%" - program) - (exit #f))) diff --git a/scripts/ccwl.in b/scripts/ccwl.in new file mode 100755 index 0000000..04fed02 --- /dev/null +++ b/scripts/ccwl.in @@ -0,0 +1,40 @@ +#! @GUILE@ -s +-*- scheme -*- +!# +;;; ccwl --- Concise Common Workflow Language +;;; Copyright © 2021 Arun Isaac +;;; +;;; This file is part of ccwl. +;;; +;;; ccwl is free software: you can redistribute it and/or modify it +;;; under the terms of the GNU General Public License as published by +;;; the Free Software Foundation, either version 3 of the License, or +;;; (at your option) any later version. +;;; +;;; ccwl is distributed in the hope that it will be useful, but +;;; WITHOUT ANY WARRANTY; without even the implied warranty of +;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU +;;; General Public License for more details. +;;; +;;; You should have received a copy of the GNU General Public License +;;; along with ccwl. If not, see . + +;;; Commentary: + +;; This script compiles a CCWL workflow to CWL. + +;;; Code: + +(use-modules (ice-9 match) + (ccwl ccwl) + (ccwl yaml)) + +(match (command-line) + ((_ "compile" input-file) + (scm->yaml (load (canonicalize-path input-file)) + (current-output-port))) + ((program _ ...) + (format (current-error-port) + "Usage: ~a compile input-file~%" + program) + (exit #f))) -- cgit v1.2.3