お試しタスクランナー (make, just, shake, ..)

$ # テスト実行
$ cabal test --enable-options

$ # 特定のテスト実行
$ cabal test --enable-options --test-options '-p /SegTree/'

$ # doctest の実行
$ cabal repl --with-ghc=doctest --repl-options='-w -Wdefault'

$ # などなど

#!/usr/bin/env -S bash -euE

IFS=$'\n\t'
_ME="$(basename "$0")"

_cmd_help() {
    cat <<EOS
${_ME} is a simple task runner

help       Shows this message
doctest    Generates Haddock document
test       Runs cabal test
EOS
}

_cmd_doctest() {
    cd "$(dirname "$0")"
    cabal repl --with-ghc=doctest --repl-options='-w -Wdefault' "$@"
}

_cmd_test() {
    cd "$(dirname "$0")"
    cabal test --enable-tests --test-options ''"$@"
}

_run() {
    if [ $# -eq 0 ] ; then
        _cmd_help "$@"
        return
    fi

    local _cmd="${1}"
    shift 1

    case "${_cmd}" in
        'h' | 'help' | '-h' | '--help')
            _cmd_help "$@" ;;
        'dt' | 'doctest')
            _cmd_doctest "$@" ;;
        't' | 'test')
            _cmd_test "$@" ;;
        *)
            echo "no such command ${_cmd}" ;;
    esac
}

_run "$@"

Listing 1: ヘルプ表示

$ ./x
x is a simple task runner

help       Shows this message
doctest    Generates Haddock document
test       Runs cabal test

Listing 2: doctest を実行

$ ./x dt

Listing 3: SegTree にマッチするテストを実行

$ ./x t '-p /SegTree/'

Listing 4: Makefile の主な文法

target: prerequisites
	command

(setopt show-trailing-whitespace t)
(setopt whitespace-style '(tabs  tab-mark))
(require 'whitespace)
(global-whitespace-mode 1)

(defun my-neotree-setup (&rest _)
  (display-line-numbers-mode -1)
  (whitespace-mode -1))

:hook (neo-after-create-hook . my-neotree-setup)

Listing 5: Makefile

.PHONY: help
help:	## Shows this help.
	@echo 'Makefile targets'
	@echo ''
	@sed -ne '/@sed/!s/## //p' $(MAKEFILE_LIST)

.PHONY: doctest
doc:	## Runs doctest.
	cabal repl --with-ghc=doctest --repl-options='-w -Wdefault'

.PHONY: test
test:		## Runs local test
	cabal test --enable-tests --test-options "$(p)"

$ make
Makefile targets

help:	Shows this help.
doc:	Runs doctest.
test:	Runs local test.

Listing 6: Makefile

.PHONY: t
t: test

$ make t

.PHONY: test
test:		## Runs local test
	cabal test --enable-tests --test-options "$(p)"

$ make test p='-p /SegTree'
cabal test --enable-tests --test-options "-p /SegTree"
Build profile: -w ghc-9.8.4 -O1
In order, the following will be built (use -v for more details):
 - ac-library-hs-1.1.0.0 (test:ac-library-hs-test) (file /home/tbm/dev/hs/ac-library-hs/dist-newstyle/build/x86_64-linux/ghc-9.8.4/ac-library-hs-1.1.0.0/cache/build changed)
 - ac-library-hs-1.1.0.0 (test:benchlib-test) (file /home/tbm/dev/hs/ac-library-hs/dist-newstyle/build/x86_64-linux/ghc-9.8.4/ac-library-hs-1.1.0.0/cache/build changed)

;; https://github.com/leon-barrett/just-mode.el/blob/main/just-mode.el
(leaf just-mode) ;; :ensure t

;; https://github.com/psibi/justl.el
(leaf justl)

Listing 7: config.fish

if command -sq just
    alias j just
end

Listing 8: Justfile

# shows this help message
help:
    @just -l

# runs the benchmark
bench:
    cabal bench --benchmark-options='--output a.html'

# generates Haddock document
doc:
    cabal haddock "$@"

[private]
alias d := doc

test opts='':
    cabal test --enable-tests --test-options '{{opts}}'

[private]
alias t := test

# 略

$ just t
$ just t '-p /SegTree/'
$ just dt

Listing 9: Taskfile.yml

version: '3'

tasks:
  doctest:
    aliases: [dt]
    cmds:
      - cabal repl --with-ghc=doctest --repl-options='-w -Wdefault'

  test:
    aliases: [t]
    cmds:
      - cabal test --enable-tests --test-options ''{{.CLI_ARGS}}

$ task t -- '-p /SegTree/'

$ makers
[cargo-make] INFO - cargo make 0.37.23
[cargo-make] INFO -
[cargo-make] INFO - Build File: Makefile.toml
[cargo-make] INFO - Task: default
[cargo-make] INFO - Profile: development
[cargo-make] INFO - Execute Command: "cargo" "fmt"
`cargo metadata` exited with an error: error: could not find `Cargo.toml` in `/home/tbm/dev/hs/ac-library-hs/verify` or any parent directory

This utility formats all bin and lib files of the current crate using rustfmt.

Usage: cargo fmt [OPTIONS] [-- <rustfmt_options>...]

Listing 10: Makefile.toml

[tasks.bench]
alias = "b"
command = "cabal"
args = ["bench", "--benchmark-options='--output a.html'"]

[tasks.doc]
command = "cabal"
args = ["haddock", "$@"]

[tasks.d]
alias = "doc"

[tasks.test]
command = "cabal"
args = ["test", "--enable-tests", "--test-options", "${@:}"]

[tasks.t]
alias = "test"

$ makers t
$ makers t '-p /SegTree/'

{- cabal:
build-depends: base, shake
-}

import Development.Shake
import Development.Shake.Command
import Development.Shake.FilePath
import Development.Shake.Util

main :: IO ()
main = shakeArgs shakeOptions {shakeFiles = "_build"} $ do
  phony "doc" $ do
    cmd_ ["cabal", "haddock"]

  phony "doctest" $ do
    cmd_ ["cabal", "repl", "--with-ghc=doctest", "--repl-options='-w -Wdefault'"]

  -- alias の代わり
  phony "dt" $ need ["doctest"]

  phony "test" $ do
    cmd_ ["cabal", "test", "--enable-tests"]

  phony "t" $ need ["test"]

$ cabal run Shakefile.hs -- t

$ cabal run Shakefile.hs -- --help
<略>
Targets:
  - doc
  - doctest
  - dt
  - test
  -