mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-29 19:30:36 +02:00
Code Activity

remove stale env script, clean up gdb-pre-inst-guile

Browse source 
* env: Removed (a vestige of the guile-vm merge).

* gdb-pre-inst-guile.in: Make a bit more robust (using libtool
  --mode=execute).
This commit is contained in:
Andy Wingo 2008-11-01 12:53:37 +01:00
parent 00d0489205
commit b1368a4166
2 changed files with 8 additions and 26 deletions
Download patch file Download diff file Expand all files Collapse all files

5
env
View file

@ -1,5 +0,0 @@
#!/bin/bash
thisdir=$(cd $(dirname $0) && pwd)
export GUILE_LOAD_PATH=$thisdir/module${GUILE_LOAD_PATH:+:$GUILE_LOAD_PATH}
export LD_LIBRARY_PATH=$thisdir/src${LD_LIBRARY_PATH:+:$LD_LIBRARY_PATH}
exec "$@"

29
gdb-pre-inst-guile.in
View file

@ -21,31 +21,18 @@
# Commentary:
# Usage: pre-inst-guile [ARGS]
# Usage: gdb-pre-inst-guile [ARGS]
#
# This script arranges for the environment to support, and eventaully execs,
# the uninstalled binary guile executable located somewhere under libguile/,
# passing ARGS to it. In the process, env var GUILE is clobbered, and the
# following env vars are modified (but not clobbered):
# GUILE_LOAD_PATH
# LTDL_LIBRARY_PATH
# This script runs Guile from the build tree under GDB. See
# ./pre-inst-guile for more information.
#
# This script can be used as a drop-in replacement for $bindir/guile;
# if there is a discrepency in behavior, that's a bug.
# In addition to running ./gdb-pre-inst-guile, sometimes it's useful to
# run e.g. ./check-guile -i ./gdb-pre-inst-guile foo.test.
# Code:
set -e
# env (set by configure)
top_builddir="@top_builddir_absolute@"
# set GUILE (clobber)
GUILE=${top_builddir}/libguile/.libs/lt-guile
export GUILE
# do it
exec ${top_builddir}/pre-inst-guile-env gdb --args $GUILE "$@"
# never reached
exit 1
# pre-inst-guile ends here
exec ${top_builddir}/pre-inst-guile-env libtool --mode=execute \
gdb --args ${top_builddir}/libguile/guile "$@"