(Arne Babenhauserheide)
2017-10-17: fix some example headers fix some example headers
diff --git a/examples/advent-2016-day-7.w b/examples/advent-2016-day-7.w --- a/examples/advent-2016-day-7.w +++ b/examples/advent-2016-day-7.w @@ -1,5 +1,6 @@ #!/usr/bin/env sh # -*- wisp -*- +guile -L $(dirname $(dirname $(realpath "$0"))) -c '(import (language wisp spec))' exec guile -L $(dirname $(dirname $(realpath "$0"))) --language=wisp -s "$0" ; !# diff --git a/examples/argparse.w b/examples/argparse.w --- a/examples/argparse.w +++ b/examples/argparse.w @@ -1,6 +1,6 @@ #!/usr/bin/env sh # -*- wisp -*- -guile -L $(dirname $(dirname $(realpath "$0"))) -c '(import (wisp-scheme) (language wisp spec))' +guile -L $(dirname $(dirname $(realpath "$0"))) -c '(import (language wisp spec))' exec guile -L $(dirname $(dirname $(realpath "$0"))) --language=wisp -e '(@@ (examples argparse) main)' -s "$0" "$@" ; !# diff --git a/examples/benchmark.w b/examples/benchmark.w --- a/examples/benchmark.w +++ b/examples/benchmark.w @@ -1,5 +1,6 @@ #!/usr/bin/env sh # -*- wisp -*- +guile -L $(dirname $(dirname $(realpath "$0"))) -c '(import (language wisp spec))' exec guile -L $(dirname $(dirname $(realpath "$0"))) --language=wisp -e '(@@ (examples benchmark) main)' -l $(dirname $(realpath "$0"))/cholesky.w -l $(dirname $(realpath "$0"))/ensemble-estimation.w -s "$0" "$@" ; !# diff --git a/examples/cartesian-sets.w b/examples/cartesian-sets.w --- a/examples/cartesian-sets.w +++ b/examples/cartesian-sets.w @@ -1,5 +1,6 @@ #!/usr/bin/env sh # -*- wisp -*- +guile -L $(dirname $(dirname $(realpath "$0"))) -c '(import (language wisp spec))' exec guile -L $(dirname $(dirname $(realpath "$0"))) --language=wisp -e '(@@ (examples cartesian-sets) main)' -s "$0" "$@" ; !# ;; Implementation of the cartesian product over a list of lists, building on http://stackoverflow.com/a/20591545/7666 diff --git a/examples/cholesky.w b/examples/cholesky.w --- a/examples/cholesky.w +++ b/examples/cholesky.w @@ -1,5 +1,6 @@ #!/usr/bin/env sh # -*- wisp -*- +guile -L $(dirname $(dirname $(realpath "$0"))) -c '(import (language wisp spec))' exec guile -L $(dirname $(dirname $(realpath "$0"))) --language=wisp -e '(@@ (examples cholesky) main)' -s "$0" "$@" ; !# diff --git a/examples/cli.w b/examples/cli.w --- a/examples/cli.w +++ b/examples/cli.w @@ -1,5 +1,6 @@ #!/usr/bin/env sh # -*- wisp -*- +guile -L $(dirname $(dirname $(realpath "$0"))) -c '(import (language wisp spec))' exec guile -L $(dirname $(dirname $(realpath "$0"))) --language=wisp -e '(@@ (examples cli) main)' -s "$0" "$@" ; !# diff --git a/examples/closure.w b/examples/closure.w --- a/examples/closure.w +++ b/examples/closure.w @@ -1,5 +1,6 @@ #!/usr/bin/env sh # -*- wisp -*- +guile -L $(dirname $(dirname $(realpath "$0"))) -c '(import (language wisp spec))' exec guile -L $(dirname $(dirname $(realpath "$0"))) --language=wisp -e '(@@ (examples closure) main)' -s "$0" "$@" ; !# diff --git a/examples/commandline-handling.w b/examples/commandline-handling.w --- a/examples/commandline-handling.w +++ b/examples/commandline-handling.w @@ -1,6 +1,6 @@ #!/usr/bin/env sh # -*- wisp -*- -guile-2.0 -L $(dirname $(dirname $(realpath "$0"))) -c '(import (wisp-scheme) (language wisp spec))' +guile-2.0 -L $(dirname $(dirname $(realpath "$0"))) -c '(import (language wisp spec))' exec guile-2.0 -L $(dirname $(dirname $(realpath "$0"))) --language=wisp -e '(examples commandline-handling)' -s "$0" "$@" ; !# diff --git a/examples/comment-server.w b/examples/comment-server.w --- a/examples/comment-server.w +++ b/examples/comment-server.w @@ -1,4 +1,6 @@ #!./wisp-multiline.sh +guile -L $(dirname $(dirname $(realpath "$0"))) -c '(import (language wisp spec))' + ; !# use-modules diff --git a/examples/d20world.w b/examples/d20world.w --- a/examples/d20world.w +++ b/examples/d20world.w @@ -1,5 +1,6 @@ #!/usr/bin/env sh # -*- wisp -*- +guile -L $(dirname $(dirname $(realpath "$0"))) -c '(import (language wisp spec))' exec guile -L $(dirname $(dirname $(realpath "$0"))) --language=wisp -e '(@@ (examples d20world) main)' -s "$0" "$@" ; !# diff --git a/examples/d6.w b/examples/d6.w --- a/examples/d6.w +++ b/examples/d6.w @@ -1,5 +1,6 @@ #!/usr/bin/env sh # -*- wisp -*- +guile -L $(dirname $(dirname $(realpath "$0"))) -c '(import (language wisp spec))' exec guile -L $(dirname $(dirname $(realpath "$0"))) --language=wisp -e '(@@ (examples d6) main)' -s "$0" "$@" ; !# diff --git a/examples/duel.w b/examples/duel.w --- a/examples/duel.w +++ b/examples/duel.w @@ -2,7 +2,7 @@ # -*- wisp -*- D="$(dirname $(realpath "$0"))" W="$(dirname $(dirname $(realpath "$0")))" -guile -L "$W" -c '(import (wisp-scheme) (language wisp spec))' +guile -L "$W" -c '(import (language wisp spec))' exec guile -L "$W" --language=wisp -l "$D/enter-three-witches.w" -s "$0" "$@" ; !# diff --git a/examples/ensemble-estimation.w b/examples/ensemble-estimation.w --- a/examples/ensemble-estimation.w +++ b/examples/ensemble-estimation.w @@ -1,6 +1,6 @@ #!/usr/bin/env sh # -*- wisp -*- -guile -L $(dirname $(dirname $(realpath "$0"))) -c '(import (wisp-scheme) (language wisp spec))' +guile -L $(dirname $(dirname $(realpath "$0"))) -c '(import (language wisp spec))' exec guile -L $(dirname $(dirname $(realpath "$0"))) --language=wisp -e '(@@ (examples ensemble-estimation) main)' -l $(dirname $(realpath "$0"))/cholesky.w -s "$0" "$@" ; !# diff --git a/examples/enter-three-witches.w b/examples/enter-three-witches.w --- a/examples/enter-three-witches.w +++ b/examples/enter-three-witches.w @@ -1,6 +1,6 @@ #!/usr/bin/env sh # -*- wisp -*- -guile -L $(dirname $(dirname $(realpath "$0"))) -c '(import (wisp-scheme) (language wisp spec))' +guile -L $(dirname $(dirname $(realpath "$0"))) -c '(import (language wisp spec))' exec guile -L $(dirname $(dirname $(realpath "$0"))) --language=wisp -e '(@@ (examples enter-three-witches) main)' -s "$0" "$@" ; !# diff --git a/examples/evaluate-r7rs-benchmark.w b/examples/evaluate-r7rs-benchmark.w --- a/examples/evaluate-r7rs-benchmark.w +++ b/examples/evaluate-r7rs-benchmark.w @@ -1,5 +1,6 @@ #!/bin/sh # -*- wisp -*- +guile -L $(dirname $(dirname $(realpath "$0"))) -c '(import (language wisp spec))' exec guile -L ~/wisp --language=wisp -s $0 "$@" !# diff --git a/examples/evolve.w b/examples/evolve.w --- a/examples/evolve.w +++ b/examples/evolve.w @@ -1,5 +1,6 @@ #!/usr/bin/env sh # -*- wisp -*- +guile -L $(dirname $(dirname $(realpath "$0"))) -c '(import (language wisp spec))' exec guile -L $(dirname $(dirname $(realpath "$0"))) --language=wisp -e '(@@ (examples evolve) main)' -s "$0" "$@" ; !# diff --git a/examples/factorial.w b/examples/factorial.w --- a/examples/factorial.w +++ b/examples/factorial.w @@ -1,4 +1,5 @@ #!/usr/bin/env sh +guile -L $(dirname $(dirname $(realpath "$0"))) -c '(import (language wisp spec))' exec guile -L $(dirname $(dirname $(realpath "$0"))) --language=wisp -e '(@@ (examples factorial) main)' -s "$0" "$@" ; !#