1 files changed, 0 insertions, 140 deletions
diff --git a/gr-howto-write-a-block/setup_guile_test_env.in b/gr-howto-write-a-block/setup_guile_test_env.in
deleted file mode 100644
index 3437fab44..000000000
--- a/gr-howto-write-a-block/setup_guile_test_env.in
+++ /dev/null
@@ -1,140 +0,0 @@
-#
-# Copyright 2010 Free Software Foundation, Inc.
-#
-# This file is part of GNU Radio
-#
-# GNU Radio 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, or (at your option)
-# any later version.
-#
-# GNU Radio 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 this program.  If not, see <http://www.gnu.org/licenses/>.
-#
-
-# This is sourced by run_guile_tests to establish the environment
-# variables required to run the tests in the build tree.
-
-# add_local_paths is the only "public" function in this file
-
-# 1st argument is absolute path to hand coded guile source directory
-# 2nd argument is absolute path to component C++ shared library build directory
-# 3nd argument is absolute path to component SWIG build directory
-
-add_local_paths() {
-  if [ $# -ne 3 ]
-  then
-    echo "$0: requires 3 args" 1>&2
-    exit 1
-  fi
-
-  # Add local dirs to the front
-  prepend_to_guile_load_path "$1"
-  prepend_to_libpath "$2/.libs"
-  [ "$2" != "$3" ] && prepend_to_libpath "$3/.libs"
-  prepend_to_guile_load_path "$3"
-}
-
-# ------------------------------------------------------------------------
-
-abs_top_srcdir=@abs_top_srcdir@
-abs_top_builddir=@abs_top_builddir@
-
-# 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}
-}
-
-# usage: append <path-varname> <dir>
-append() {
-  if [ $# -ne 2 ]
-  then
-    echo "$0: append 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=\"$contents:$dir\""
-    fi
-  fi
-  #echo end-of-append: $path=${!path}
-}
-
-prepend_to_guile_load_path() {
-    prepend GUILE_LOAD_PATH "$1"
-    export GUILE_LOAD_PATH
-}
-
-append_to_guile_load_path() {
-    append GUILE_LOAD_PATH "$1"
-    export GUILE_LOAD_PATH
-}
-
-prepend_to_libpath() {
-    prepend LTDL_LIBRARY_PATH "$1"
-    export LTDL_LIBRARY_PATH
-    case "@host_os@" in
-	darwin*)
-	    prepend DYLD_LIBRARY_PATH "$1"
-	    export DYLD_LIBRARY_PATH
-	    ;;
-	cygwin*|win*|mingw*)
-	    prepend PATH "$1"
-	    export PATH
-	    ;;
-    esac
-}
-
-append_to_libpath() {
-    append LTDL_LIBRARY_PATH "$1"
-    export LTDL_LIBRARY_PATH
-    case "@host_os@" in
-	darwin*)
-	    append DYLD_LIBRARY_PATH "$1"
-	    export DYLD_LIBRARY_PATH
-	    ;;
-	cygwin*|win*|mingw*)
-	    append PATH "$1"
-	    export PATH
-	    ;;
-    esac
-}
-
-# ------------------------------------------------------------------------
-# Start with gnuradio_core_LIBDIRPATH and gnuradio_core_GUILE_LOAD_PATH
-# ------------------------------------------------------------------------
-
-# Where to search for gnuradio-core shared libraries
-prepend_to_libpath @gnuradio_core_LIBDIRPATH@
-
-# Where to seach for gnuradio-core guile code
-prepend_to_guile_load_path @gnuradio_core_GUILE_LOAD_PATH@
-
-export GUILE_WARN_DEPRECATED=no