rpms/gnu-smalltalk/devel gst-retcode-tests.patch, NONE, 1.1 gnu-smalltalk.spec, 1.44, 1.45
Jochen Schmitt
s4504kr at fedoraproject.org
Tue Mar 3 18:43:43 UTC 2009
Author: s4504kr
Update of /cvs/extras/rpms/gnu-smalltalk/devel
In directory cvs1.fedora.phx.redhat.com:/tmp/cvs-serv29786
Modified Files:
gnu-smalltalk.spec
Added Files:
gst-retcode-tests.patch
Log Message:
Fix retcode source issue
gst-retcode-tests.patch:
--- NEW FILE gst-retcode-tests.patch ---
diff --git a/tests/local.at b/tests/local.at
index babc8c6..2dc1dee 100755
--- a/tests/local.at
+++ b/tests/local.at
@@ -25,8 +25,8 @@ m4_define([AT_CHECK_GST], [
*) image_path="m4_ifval([$2], [-I $2])" ;;
esac
- echo "{ (cd m4_ifval([$3], [$3], [$abs_top_builddir]) && gst $image_path $1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode"
- AT_CHECK([{ (cd m4_ifval([$3], [$3], [$abs_top_builddir]) && gst $image_path $1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode], 0, [$4], [$5])
+ echo "{ (cd m4_ifval([$3], [$3], [$abs_top_builddir]) && gst $image_path $1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode"
+ AT_CHECK([{ (cd m4_ifval([$3], [$3], [$abs_top_builddir]) && gst $image_path $1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode], 0, [$4], [$5])
])
dnl AT_DIFF_TEST([FILE], [XFAILS])
diff --git a/tests/testsuite b/tests/testsuite
index 2cf3968..58455f1 100755
--- a/tests/testsuite
+++ b/tests/testsuite
@@ -1352,14 +1352,14 @@ _ATEOF
*) image_path="" ;;
esac
- echo "{ (cd $abs_srcdir && gst $image_path -r arrays.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode"
+ echo "{ (cd $abs_srcdir && gst $image_path -r arrays.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode"
$at_traceoff
-echo "$at_srcdir/testsuite.at:27: { (cd \$abs_srcdir && gst \$image_path -r arrays.st 2>&1); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . retcode"
+echo "$at_srcdir/testsuite.at:27: { (cd \$abs_srcdir && gst \$image_path -r arrays.st 2>&1); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode"
echo testsuite.at:27 >"$at_check_line_file"
at_trace_this=
if test -n "$at_traceon"; then
- case "{ (cd $abs_srcdir && gst $image_path -r arrays.st 2>&1); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . retcode" in
+ case "{ (cd $abs_srcdir && gst $image_path -r arrays.st 2>&1); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode" in
*'
'*) echo 'Not enabling shell tracing (command contains an embedded newline)' ;;
*) at_trace_this=yes ;;
@@ -1367,12 +1367,12 @@ if test -n "$at_traceon"; then
fi
if test -n "$at_trace_this"; then
- ( $at_traceon; { (cd $abs_srcdir && gst $image_path -r arrays.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stder1"
+ ( $at_traceon; { (cd $abs_srcdir && gst $image_path -r arrays.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stder1"
at_status=$?
grep '^ *+' "$at_stder1" >&2
grep -v '^ *+' "$at_stder1" >"$at_stderr"
else
- ( :; { (cd $abs_srcdir && gst $image_path -r arrays.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stderr"
+ ( :; { (cd $abs_srcdir && gst $image_path -r arrays.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stderr"
at_status=$?
fi
@@ -1420,14 +1420,14 @@ $at_traceon
*) image_path="" ;;
esac
- echo "{ (cd $abs_srcdir && gst $image_path -r classes.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode"
+ echo "{ (cd $abs_srcdir && gst $image_path -r classes.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode"
$at_traceoff
-echo "$at_srcdir/testsuite.at:28: { (cd \$abs_srcdir && gst \$image_path -r classes.st 2>&1); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . retcode"
+echo "$at_srcdir/testsuite.at:28: { (cd \$abs_srcdir && gst \$image_path -r classes.st 2>&1); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode"
echo testsuite.at:28 >"$at_check_line_file"
at_trace_this=
if test -n "$at_traceon"; then
- case "{ (cd $abs_srcdir && gst $image_path -r classes.st 2>&1); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . retcode" in
+ case "{ (cd $abs_srcdir && gst $image_path -r classes.st 2>&1); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode" in
*'
'*) echo 'Not enabling shell tracing (command contains an embedded newline)' ;;
*) at_trace_this=yes ;;
@@ -1435,12 +1435,12 @@ if test -n "$at_traceon"; then
fi
if test -n "$at_trace_this"; then
- ( $at_traceon; { (cd $abs_srcdir && gst $image_path -r classes.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stder1"
+ ( $at_traceon; { (cd $abs_srcdir && gst $image_path -r classes.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stder1"
at_status=$?
grep '^ *+' "$at_stder1" >&2
grep -v '^ *+' "$at_stder1" >"$at_stderr"
else
- ( :; { (cd $abs_srcdir && gst $image_path -r classes.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stderr"
+ ( :; { (cd $abs_srcdir && gst $image_path -r classes.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stderr"
at_status=$?
fi
@@ -1488,14 +1488,14 @@ $at_traceon
*) image_path="" ;;
esac
- echo "{ (cd $abs_srcdir && gst $image_path -r blocks.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode"
+ echo "{ (cd $abs_srcdir && gst $image_path -r blocks.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode"
$at_traceoff
-echo "$at_srcdir/testsuite.at:29: { (cd \$abs_srcdir && gst \$image_path -r blocks.st 2>&1); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . retcode"
+echo "$at_srcdir/testsuite.at:29: { (cd \$abs_srcdir && gst \$image_path -r blocks.st 2>&1); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode"
echo testsuite.at:29 >"$at_check_line_file"
at_trace_this=
if test -n "$at_traceon"; then
- case "{ (cd $abs_srcdir && gst $image_path -r blocks.st 2>&1); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . retcode" in
+ case "{ (cd $abs_srcdir && gst $image_path -r blocks.st 2>&1); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode" in
*'
'*) echo 'Not enabling shell tracing (command contains an embedded newline)' ;;
*) at_trace_this=yes ;;
@@ -1503,12 +1503,12 @@ if test -n "$at_traceon"; then
fi
if test -n "$at_trace_this"; then
- ( $at_traceon; { (cd $abs_srcdir && gst $image_path -r blocks.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stder1"
+ ( $at_traceon; { (cd $abs_srcdir && gst $image_path -r blocks.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stder1"
at_status=$?
grep '^ *+' "$at_stder1" >&2
grep -v '^ *+' "$at_stder1" >"$at_stderr"
else
- ( :; { (cd $abs_srcdir && gst $image_path -r blocks.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stderr"
+ ( :; { (cd $abs_srcdir && gst $image_path -r blocks.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stderr"
at_status=$?
fi
@@ -1556,14 +1556,14 @@ $at_traceon
*) image_path="" ;;
esac
- echo "{ (cd $abs_srcdir && gst $image_path -r sets.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode"
+ echo "{ (cd $abs_srcdir && gst $image_path -r sets.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode"
$at_traceoff
-echo "$at_srcdir/testsuite.at:30: { (cd \$abs_srcdir && gst \$image_path -r sets.st 2>&1); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . retcode"
+echo "$at_srcdir/testsuite.at:30: { (cd \$abs_srcdir && gst \$image_path -r sets.st 2>&1); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode"
echo testsuite.at:30 >"$at_check_line_file"
at_trace_this=
if test -n "$at_traceon"; then
- case "{ (cd $abs_srcdir && gst $image_path -r sets.st 2>&1); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . retcode" in
+ case "{ (cd $abs_srcdir && gst $image_path -r sets.st 2>&1); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode" in
*'
'*) echo 'Not enabling shell tracing (command contains an embedded newline)' ;;
*) at_trace_this=yes ;;
@@ -1571,12 +1571,12 @@ if test -n "$at_traceon"; then
fi
if test -n "$at_trace_this"; then
- ( $at_traceon; { (cd $abs_srcdir && gst $image_path -r sets.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stder1"
+ ( $at_traceon; { (cd $abs_srcdir && gst $image_path -r sets.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stder1"
at_status=$?
grep '^ *+' "$at_stder1" >&2
grep -v '^ *+' "$at_stder1" >"$at_stderr"
else
- ( :; { (cd $abs_srcdir && gst $image_path -r sets.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stderr"
+ ( :; { (cd $abs_srcdir && gst $image_path -r sets.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stderr"
at_status=$?
fi
@@ -1624,14 +1624,14 @@ $at_traceon
*) image_path="" ;;
esac
- echo "{ (cd $abs_srcdir && gst $image_path -r processes.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode"
+ echo "{ (cd $abs_srcdir && gst $image_path -r processes.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode"
$at_traceoff
-echo "$at_srcdir/testsuite.at:31: { (cd \$abs_srcdir && gst \$image_path -r processes.st 2>&1); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . retcode"
+echo "$at_srcdir/testsuite.at:31: { (cd \$abs_srcdir && gst \$image_path -r processes.st 2>&1); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode"
echo testsuite.at:31 >"$at_check_line_file"
at_trace_this=
if test -n "$at_traceon"; then
- case "{ (cd $abs_srcdir && gst $image_path -r processes.st 2>&1); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . retcode" in
+ case "{ (cd $abs_srcdir && gst $image_path -r processes.st 2>&1); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode" in
*'
'*) echo 'Not enabling shell tracing (command contains an embedded newline)' ;;
*) at_trace_this=yes ;;
@@ -1639,12 +1639,12 @@ if test -n "$at_traceon"; then
fi
if test -n "$at_trace_this"; then
- ( $at_traceon; { (cd $abs_srcdir && gst $image_path -r processes.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stder1"
+ ( $at_traceon; { (cd $abs_srcdir && gst $image_path -r processes.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stder1"
at_status=$?
grep '^ *+' "$at_stder1" >&2
grep -v '^ *+' "$at_stder1" >"$at_stderr"
else
- ( :; { (cd $abs_srcdir && gst $image_path -r processes.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stderr"
+ ( :; { (cd $abs_srcdir && gst $image_path -r processes.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stderr"
at_status=$?
fi
@@ -1692,14 +1692,14 @@ $at_traceon
*) image_path="" ;;
esac
- echo "{ (cd $abs_srcdir && gst $image_path -r exceptions.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode"
+ echo "{ (cd $abs_srcdir && gst $image_path -r exceptions.st 2>&1); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode"
$at_traceoff
-echo "$at_srcdir/testsuite.at:32: { (cd \$abs_srcdir && gst \$image_path -r exceptions.st 2>&1); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . retcode"
+echo "$at_srcdir/testsuite.at:32: { (cd \$abs_srcdir && gst \$image_path -r exceptions.st 2>&1); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode"
echo testsuite.at:32 >"$at_check_line_file"
at_trace_this=
if test -n "$at_traceon"; then
- case "{ (cd $abs_srcdir && gst $image_path -r exceptions.st 2>&1); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . retcode" in
+ case "{ (cd $abs_srcdir && gst $image_path -r exceptions.st 2>&1); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode" in
[...3689 lines suppressed...]
esac
- echo "{ (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Magritte); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode"
+ echo "{ (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Magritte); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode"
$at_traceoff
-echo "$at_srcdir/testsuite.at:156: { (cd \$abs_top_builddir && gst \$image_path -f \$abs_top_srcdir/scripts/Test.st --verbose -p Magritte); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . retcode"
+echo "$at_srcdir/testsuite.at:156: { (cd \$abs_top_builddir && gst \$image_path -f \$abs_top_srcdir/scripts/Test.st --verbose -p Magritte); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode"
echo testsuite.at:156 >"$at_check_line_file"
at_trace_this=
if test -n "$at_traceon"; then
- case "{ (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Magritte); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . retcode" in
+ case "{ (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Magritte); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode" in
*'
'*) echo 'Not enabling shell tracing (command contains an embedded newline)' ;;
*) at_trace_this=yes ;;
@@ -9387,12 +9387,12 @@ if test -n "$at_traceon"; then
fi
if test -n "$at_trace_this"; then
- ( $at_traceon; { (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Magritte); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stder1"
+ ( $at_traceon; { (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Magritte); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stder1"
at_status=$?
grep '^ *+' "$at_stder1" >&2
grep -v '^ *+' "$at_stder1" >"$at_stderr"
else
- ( :; { (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Magritte); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stderr"
+ ( :; { (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Magritte); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stderr"
at_status=$?
fi
@@ -9445,14 +9445,14 @@ $at_traceon
case $ret in
2) exit 77 ;;
0|1) exit $ret ;;
- esac); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode"
+ esac); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode"
$at_traceoff
echo "$at_srcdir/testsuite.at:157: { (cd \$abs_top_builddir && gst \$image_path -f \$abs_top_srcdir/scripts/Test.st --verbose -p ROE
ret=\$?
case \$ret in
2) exit 77 ;;
0|1) exit \$ret ;;
- esac); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . retcode"
+ esac); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode"
echo testsuite.at:157 >"$at_check_line_file"
at_trace_this=
@@ -9466,7 +9466,7 @@ if test -n "$at_trace_this"; then
case $ret in
2) exit 77 ;;
0|1) exit $ret ;;
- esac); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stder1"
+ esac); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stder1"
at_status=$?
grep '^ *+' "$at_stder1" >&2
grep -v '^ *+' "$at_stder1" >"$at_stderr"
@@ -9476,7 +9476,7 @@ else
case $ret in
2) exit 77 ;;
0|1) exit $ret ;;
- esac); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stderr"
+ esac); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stderr"
at_status=$?
fi
@@ -9524,14 +9524,14 @@ $at_traceon
*) image_path="" ;;
esac
- echo "{ (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Seaside-Core); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode"
+ echo "{ (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Seaside-Core); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode"
$at_traceoff
-echo "$at_srcdir/testsuite.at:158: { (cd \$abs_top_builddir && gst \$image_path -f \$abs_top_srcdir/scripts/Test.st --verbose -p Seaside-Core); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . retcode"
+echo "$at_srcdir/testsuite.at:158: { (cd \$abs_top_builddir && gst \$image_path -f \$abs_top_srcdir/scripts/Test.st --verbose -p Seaside-Core); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode"
echo testsuite.at:158 >"$at_check_line_file"
at_trace_this=
if test -n "$at_traceon"; then
- case "{ (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Seaside-Core); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . retcode" in
+ case "{ (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Seaside-Core); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode" in
*'
'*) echo 'Not enabling shell tracing (command contains an embedded newline)' ;;
*) at_trace_this=yes ;;
@@ -9539,12 +9539,12 @@ if test -n "$at_traceon"; then
fi
if test -n "$at_trace_this"; then
- ( $at_traceon; { (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Seaside-Core); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stder1"
+ ( $at_traceon; { (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Seaside-Core); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stder1"
at_status=$?
grep '^ *+' "$at_stder1" >&2
grep -v '^ *+' "$at_stder1" >"$at_stderr"
else
- ( :; { (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Seaside-Core); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stderr"
+ ( :; { (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Seaside-Core); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stderr"
at_status=$?
fi
@@ -9592,14 +9592,14 @@ $at_traceon
*) image_path="" ;;
esac
- echo "{ (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Sport); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode"
+ echo "{ (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Sport); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode"
$at_traceoff
-echo "$at_srcdir/testsuite.at:159: { (cd \$abs_top_builddir && gst \$image_path -f \$abs_top_srcdir/scripts/Test.st --verbose -p Sport); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . retcode"
+echo "$at_srcdir/testsuite.at:159: { (cd \$abs_top_builddir && gst \$image_path -f \$abs_top_srcdir/scripts/Test.st --verbose -p Sport); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode"
echo testsuite.at:159 >"$at_check_line_file"
at_trace_this=
if test -n "$at_traceon"; then
- case "{ (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Sport); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . retcode" in
+ case "{ (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Sport); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode" in
*'
'*) echo 'Not enabling shell tracing (command contains an embedded newline)' ;;
*) at_trace_this=yes ;;
@@ -9607,12 +9607,12 @@ if test -n "$at_traceon"; then
fi
if test -n "$at_trace_this"; then
- ( $at_traceon; { (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Sport); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stder1"
+ ( $at_traceon; { (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Sport); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stder1"
at_status=$?
grep '^ *+' "$at_stder1" >&2
grep -v '^ *+' "$at_stder1" >"$at_stderr"
else
- ( :; { (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Sport); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stderr"
+ ( :; { (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Sport); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stderr"
at_status=$?
fi
@@ -9660,14 +9660,14 @@ $at_traceon
*) image_path="" ;;
esac
- echo "{ (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Swazoo); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode"
+ echo "{ (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Swazoo); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode"
$at_traceoff
-echo "$at_srcdir/testsuite.at:160: { (cd \$abs_top_builddir && gst \$image_path -f \$abs_top_srcdir/scripts/Test.st --verbose -p Swazoo); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . retcode"
+echo "$at_srcdir/testsuite.at:160: { (cd \$abs_top_builddir && gst \$image_path -f \$abs_top_srcdir/scripts/Test.st --verbose -p Swazoo); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode"
echo testsuite.at:160 >"$at_check_line_file"
at_trace_this=
if test -n "$at_traceon"; then
- case "{ (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Swazoo); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . retcode" in
+ case "{ (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Swazoo); echo exit $? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode" in
*'
'*) echo 'Not enabling shell tracing (command contains an embedded newline)' ;;
*) at_trace_this=yes ;;
@@ -9675,12 +9675,12 @@ if test -n "$at_traceon"; then
fi
if test -n "$at_trace_this"; then
- ( $at_traceon; { (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Swazoo); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stder1"
+ ( $at_traceon; { (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Swazoo); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stder1"
at_status=$?
grep '^ *+' "$at_stder1" >&2
grep -v '^ *+' "$at_stder1" >"$at_stderr"
else
- ( :; { (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Swazoo); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stderr"
+ ( :; { (cd $abs_top_builddir && gst $image_path -f $abs_top_srcdir/scripts/Test.st --verbose -p Swazoo); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stderr"
at_status=$?
fi
@@ -9733,14 +9733,14 @@ $at_traceon
case $ret in
2) exit 77 ;;
0|1) exit $ret ;;
- esac); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode"
+ esac); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode"
$at_traceoff
echo "$at_srcdir/testsuite.at:161: { (cd \$abs_top_builddir && gst \$image_path -f \$abs_top_srcdir/scripts/Test.st --verbose -p ZLib
ret=\$?
case \$ret in
2) exit 77 ;;
0|1) exit \$ret ;;
- esac); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . retcode"
+ esac); echo exit \$? > retcode; } | tr -d '\\r' | tee stdout; . ./retcode"
echo testsuite.at:161 >"$at_check_line_file"
at_trace_this=
@@ -9754,7 +9754,7 @@ if test -n "$at_trace_this"; then
case $ret in
2) exit 77 ;;
0|1) exit $ret ;;
- esac); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stder1"
+ esac); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stder1"
at_status=$?
grep '^ *+' "$at_stder1" >&2
grep -v '^ *+' "$at_stder1" >"$at_stderr"
@@ -9764,7 +9764,7 @@ else
case $ret in
2) exit 77 ;;
0|1) exit $ret ;;
- esac); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . retcode ) >"$at_stdout" 2>"$at_stderr"
+ esac); echo exit $? > retcode; } | tr -d '\r' | tee stdout; . ./retcode ) >"$at_stdout" 2>"$at_stderr"
at_status=$?
fi
Index: gnu-smalltalk.spec
===================================================================
RCS file: /cvs/extras/rpms/gnu-smalltalk/devel/gnu-smalltalk.spec,v
retrieving revision 1.44
retrieving revision 1.45
diff -u -r1.44 -r1.45
--- gnu-smalltalk.spec 24 Feb 2009 23:54:55 -0000 1.44
+++ gnu-smalltalk.spec 3 Mar 2009 18:43:12 -0000 1.45
@@ -1,10 +1,11 @@
Summary: GNU Smalltalk
Name: gnu-smalltalk
Version: 3.1
-Release: 2%{?dist}
+Release: 3%{?dist}
Source: ftp://ftp.gnu.org/gnu/smalltalk/smalltalk-%{version}.tar.gz
Patch1: gst-3.1-am.patch
Patch2: gst-3.1-tst.patch
+Patch3: gst-retcode-tests.patch
License: GPLv2
Group: Development/Languages
URL: http://www.gnu.org/software/smalltalk/smalltalk.html
@@ -73,6 +74,7 @@
%setup -q -n smalltalk-%{version}
%patch1 -p1 -b .auto
%patch2 -p1 -b .tst
+%patch3 -p1
%build
autoreconf
@@ -178,7 +180,10 @@
%{_datadir}/emacs/site-lisp/*
%changelog
-* Tue Feb 24 2009 Fedora Release Engineering <rel-eng at lists.fedoraproject.org> - 3.1-2
+* Tue Mar 3 2009 Jochen Schmitt <Jochen herr-schmitt de> 3.1-3
+- Fix retcode source issue
+
+* Tue Feb 24 2009 Fedora Release Engineering <rel-eng at lists.fedoraproject.org> 3.1-2
- Rebuilt for https://fedoraproject.org/wiki/Fedora_11_Mass_Rebuild
* Sun Oct 19 2008 Jochen Schmitt <Jochen herr-schmitt de> 3.1-1
More information about the fedora-extras-commits
mailing list