Beginnings of write support.

[gedcom-parse.git] / t / src / test_prologue.sh

diff --git a/t/src/test_prologue.sh b/t/src/test_prologue.sh
index 979c2ae09a10f4067c497a07685401de496065a8..d548ea387d6075e8a870d9203b962ba2160d1f65 100644 (file)
--- a/t/src/test_prologue.sh
+++ b/t/src/test_prologue.sh
@@ -13,7 +13,7 @@ do
   shift
 done
 
-test_name=$1
+test_name=`echo $1 | sed "s:.*/::" | sed "s:.test::"`
 shift
 expected_result=$1
 shift
@@ -43,6 +43,13 @@ logfile=check.out
 reffile=$srcdir/output/$test_name.ref
 options="$options -o $outfile"
 
+if [ "$gedcom_out" ]
+then
+  gedfile=$test_name.ged
+  gedreffile=$srcdir/output/$test_name.ged
+  options="$options -w $gedfile"
+fi
+
 GCONV_PATH=.:$GCONV_PATH
 export GCONV_PATH
 LC_ALL=$GEDCOM_LANG