diff options
author | Arun Isaac | 2021-04-25 23:43:47 +0530 |
---|---|---|
committer | Arun Isaac | 2021-04-26 00:25:07 +0530 |
commit | d68dc8541cbcc3d04b43bdad8bed5718d18b4676 (patch) | |
tree | 2a84cee044bc44fa9472d913600d348b699cf907 /scripts/ccwl.in | |
parent | 95f771b096ad7e9728b16c619f3644b177cea4d3 (diff) | |
download | ccwl-d68dc8541cbcc3d04b43bdad8bed5718d18b4676.tar.gz ccwl-d68dc8541cbcc3d04b43bdad8bed5718d18b4676.tar.lz ccwl-d68dc8541cbcc3d04b43bdad8bed5718d18b4676.zip |
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.
Diffstat (limited to 'scripts/ccwl.in')
-rwxr-xr-x | scripts/ccwl.in | 40 |
1 files changed, 40 insertions, 0 deletions
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 <arunisaac@systemreboot.net> +;;; +;;; 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 <https://www.gnu.org/licenses/>. + +;;; 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))) |