cirno/plan9port
1
0
Fork 0
mirror of https://github.com/9fans/plan9port.git synced 2025-01-12 11:10:07 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

9l: refactor the warning-silencing mechanics to match that of 9c

Browse source
This commit is contained in:
Igor Burago 2023-12-18 15:12:48 +08:00 committed by Dan Cross
parent 984c2824e3
commit 0bc1ff0fa0
2 changed files with 26 additions and 21 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
bin/9c
View file

@ -1,6 +1,6 @@
#!/bin/sh
test -f $PLAN9/config && . $PLAN9/config
test -f "$PLAN9/config" && . "$PLAN9/config"
usegcc()
{
cc=${CC9:-gcc}
@ -52,7 +52,7 @@ quiet()
ignore=$ignore'|warn_unused_result'
ignore=$ignore'|expanded from macro'
grep -v '__p9l_autolib_' $1 |
grep -v '__p9l_autolib_' "$1" |
egrep -v "$ignore" |
sed 's/ .first use in this function.$//; s/\"\([^\"][^\"]*\)\", line \([0-9][0-9]*\)/\1:\2/g' |
$(which uniq) 1>&2 # avoid built-in uniq on SunOS
@ -143,10 +143,10 @@ case "$tag" in
exit 1
esac
# N.B. Must use temp file to avoid pipe; pipe loses status.
# Must use temp file to avoid pipe; pipe loses status.
xtmp=${TMPDIR-/tmp}/9c.$$.$USER.out
$cc -DPLAN9PORT -I$PLAN9/include $cflags "$@" 2>$xtmp
$cc -DPLAN9PORT -I"$PLAN9/include" $cflags "$@" 2>"$xtmp"
status=$?
quiet $xtmp
rm -f $xtmp
quiet "$xtmp"
rm -f "$xtmp"
exit $status

35
bin/9l
View file

@ -2,7 +2,7 @@
[ "$1" = "" ] && exit 1
test -f $PLAN9/config && . $PLAN9/config
test -f "$PLAN9/config" && . "$PLAN9/config"
libsl=""
frameworks=""
doautolib=true
@ -324,23 +324,28 @@ esac
if $verbose
then
echo $ld -L$PLAN9/lib "$@" $libsl $extralibs $frameworks
echo $ld -L"$PLAN9/lib" "$@" $libsl $extralibs $frameworks
fi
xtmp="${TMPDIR-/tmp}/9l.$$.$USER.out"
xxout() {
sed 's/.*: In function `[^:]*: *//' $xtmp | egrep . |
egrep -v 'is (often|almost always) misused|is dangerous, better use|text-based stub'
rm -f $xtmp
quiet()
{
ignore='^$'
ignore=$ignore'|is (often|almost always) misused'
ignore=$ignore'|is dangerous, better use'
ignore=$ignore'|text-based stub'
sed 's/.*: In function `[^:]*: *//' "$1" |
egrep -v "$ignore"
}
if $ld -L$PLAN9/lib "$@" $libsl $extralibs $frameworks >$xtmp 2>&1
# Must use temp file to avoid pipe; pipe loses status.
xtmp=${TMPDIR-/tmp}/9l.$$.$USER.out
$ld -L"$PLAN9/lib" "$@" $libsl $extralibs $frameworks >"$xtmp" 2>&1
status=$?
quiet "$xtmp"
rm -f "$xtmp"
if [ "$status" -ne 0 ]
then
xxout
exit 0
else
xxout
rm -f $target
exit 1
rm -f "$target"
fi
exit $status