summaryrefslogtreecommitdiff
path: root/gnuradio-core/src/guile/gr-run-waveform-script.in
diff options
context:
space:
mode:
Diffstat (limited to 'gnuradio-core/src/guile/gr-run-waveform-script.in')
-rw-r--r--gnuradio-core/src/guile/gr-run-waveform-script.in51
1 files changed, 0 insertions, 51 deletions
diff --git a/gnuradio-core/src/guile/gr-run-waveform-script.in b/gnuradio-core/src/guile/gr-run-waveform-script.in
deleted file mode 100644
index 651b387e9..000000000
--- a/gnuradio-core/src/guile/gr-run-waveform-script.in
+++ /dev/null
@@ -1,51 +0,0 @@
-#!/bin/sh
-
-# usage: prepend <path-varname> <dir>
-prepend() {
- if [ $# -ne 2 ]
- then
- echo "$0: prepend needs 2 args" 1>&2
- exit 1
- fi
- local path="$1" dir="$2" contents=""
- eval "contents=\$$path"
- if [ "$dir" != "" ]
- then
- if [ "$contents" = "" ]
- then
- eval "$path=\"$dir\""
- else
- eval "$path=\"$dir:$contents\""
- fi
- fi
- #echo end-of-prepend: $path=${!path}
-}
-
-prefix="@prefix@"
-exec_prefix="@exec_prefix@"
-
-prepend GUILE_LOAD_PATH "${prefix}/share/guile/site"
-prepend LTDL_LIBRARY_PATH "@libdir@"
-prepend DYLD_LIBRARY_PATH "@libdir@"
-
-export GUILE_LOAD_PATH LTDL_LIBRARY_PATH DYLD_LIBRARY_PATH
-
-export GUILE_WARN_DEPRECATED="no"
-
-exec @GUILE@ -e main -s $0 "$@"
-!#
-
-;;; Load and run a waveform defined with define-waveform
-;;;
-;;; usage: gr-run-waveform filename.wfd [args...]
-
-(load-from-path "gnuradio/run-waveform")
-
-(define (main args)
- (if (not (>= (length args) 2))
- (let ((port (current-error-port)))
- (display "usage: " port)
- (display (car args) port)
- (display " filename.wfd [args...]\n" port)
- (exit 1)))
- (apply run-waveform (cdr args)))