This check template is now upgraded for AutoGen5

From-SVN: r42632
This commit is contained in:
Bruce Korb 2001-05-26 16:17:46 +00:00
parent 4950f233fd
commit 8d75cd1fda
1 changed files with 35 additions and 37 deletions

View File

@ -25,53 +25,51 @@ export TARGET_MACHINE DESTDIR SRCDIR FIND_BASE VERBOSE INPUT ORIGDIR
rm -rf ${DESTDIR} ${SRCDIR} rm -rf ${DESTDIR} ${SRCDIR}
mkdir ${DESTDIR} ${SRCDIR} mkdir ${DESTDIR} ${SRCDIR}
(
( cd ${SRCDIR} [=
set +e (shellf
for f in [= "for f in %s
do case $f in
(shellf "echo ` */* ) echo $f | sed 's;/[^/]*$;;' ;;
esac
for f in %s done | sort -u | \
do case $f in while read g
*/* ) echo $f | sed 's;/[^/]*$;;' ;; do echo \" mkdir \\${SRCDIR}/$g || mkdir -p \\${SRCDIR}/$g || exit 1\"
esac done" (join " " (stack "fix.files")) ) =]
done | sort -u ) 2> /dev/null[= # suppress 'No such file or directory' messages =]
` " (join " " (stack "fix.files")) ) =]
do
mkdir $f || mkdir -p $f
done ) > /dev/null 2>&1
cd inc cd inc
[= [=
(define sfile "")
(define dfile "") =][=
FOR fix =][= FOR fix =][=
IF (> (count "test_text") 1) =] IF (> (count "test_text") 1) =][=
#
# [=hackname=] has [=(count "test_text")=] tests (set! sfile (if (exist? "files") (get "files[]") "testing.h"))
# (set! dfile (string-append
sfile=[= (if (*==* sfile "/")
IF (exist? "files") =][= (shellf "echo \"%s\"|sed 's,/[^/]*,/,'" sfile )
files[] =][= "" )
ELSE =]testing.h[= (string-tr! (get "hackname") "_A-Z" "-a-z")
ENDIF =][= ) ) =][=
FOR test_text FROM 1 =]
dfile=`dirname $sfile`/[=(string-tr! (get "hackname") "_A-Z" "-a-z") FOR test_text (for-from 1) =]
=]-[=(for-index)=].h cat >> [=(. sfile)=] <<_HACK_EOF_
cat >> $sfile <<_HACK_EOF_
#if defined( [=(string-upcase! (get "hackname"))=]_CHECK_[=(for-index)=] ) #if defined( [=(string-upcase! (get "hackname"))=]_CHECK_[=(for-index)=] )
[=test_text=] [=test_text=]
#endif /* [=(string-upcase! (get "hackname"))=]_CHECK_[=(for-index)=] */ #endif /* [=(string-upcase! (get "hackname"))=]_CHECK_[=(for-index)=] */
_HACK_EOF_ _HACK_EOF_
echo $sfile | ../../fixincl echo [=(. sfile)=] | ../../fixincl
mv -f $sfile $dfile mv -f [=(. sfile)=] [=(. dfile)=]-[=(for-index)=].h
[ -f ${DESTDIR}/$sfile ] && mv ${DESTDIR}/$sfile ${DESTDIR}/$dfile[= [ -f ${DESTDIR}/[=(. sfile)=] ] && [=#
=]mv ${DESTDIR}/[=(. sfile)=] ${DESTDIR}/[=(. dfile)=]-[=(for-index)=].h[=
ENDFOR test_text =][= ENDFOR test_text =][=
ENDIF =][=
ENDIF multi-test =][=
ENDFOR fix ENDFOR fix
@ -138,7 +136,7 @@ do
: :
else else
diff -c $f ${TESTBASE}/$f >&2 || : diff -u $f ${TESTBASE}/$f >&2 || :
exitok=false exitok=false
fi fi
done done