From 670b0b68602288b44ad459230be4f701140bca66 Mon Sep 17 00:00:00 2001 From: Arun Isaac Date: Mon, 10 Jan 2022 16:36:09 +0530 Subject: Migrate to hand-written Makefiles. The autotools are really overkill for a simple Guile project like ccwl. * .gitignore: Delete autotool generated files. Add Makefile.include. * Makefile.am, Makefile, build-aux/distcheck.scm, configure, configure.ac, configure.scm: New files. * NEWS: Rename to NEWS.org. Remove Emacs file-local variable to use org mode. * bootstrap.sh: Delete file. * build-aux/generate-cwl-output.sh.in: Rename to ... * build-aux/generate-cwl-output.sh: ... this. Replace autoconf variables for cwltool and sed. * build-aux/test-driver.scm.in: Rename to ... * build-aux/test-driver.scm: ... this. Do not import (ice-9 getopt-long). (%options): Delete variable. (my-gnu-runner): Do not write to log or trs ports. Accept test files as command-line arguments. Update invocation of my-gnu-runner. Print summary of results. * guix.scm (ccwl)[native-inputs]: Remove autoconf and automake. * pre-inst-env.in: Rename to ... * pre-inst-env: ... this. Replace autoconf variables for guile, abs_top_builddir and abs_top_srcdir. * scripts/ccwl.in: Rename to ... * scripts/ccwl: ... this. Replace autoconf variable for guile. --- pre-inst-env | 38 ++++++++++++++++++++++++++++++++++++++ 1 file changed, 38 insertions(+) create mode 100755 pre-inst-env (limited to 'pre-inst-env') diff --git a/pre-inst-env b/pre-inst-env new file mode 100755 index 0000000..c1ed5d7 --- /dev/null +++ b/pre-inst-env @@ -0,0 +1,38 @@ +#! /usr/bin/env guile +!# +;;; 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 . + +(import (ice-9 match)) + +(define (prepend-path-env! name . values) + (setenv name (string-join (append values + (if (getenv name) + (string-split (getenv name) #\:) + '())) + ":"))) + +(define %source-dir (dirname (current-filename))) + +(prepend-path-env! "GUILE_LOAD_PATH" %source-dir) +(prepend-path-env! "GUILE_LOAD_COMPILED_PATH" %source-dir) +(prepend-path-env! "PATH" (string-append %source-dir "/scripts")) + +(match (command-line) + ((_ command args ...) + (apply execlp command command args))) -- cgit v1.2.3