#!/bin/sh
# for lib4th 6/2000 by h-peter recktenwald <phpr@snafu.de>
# filter redundant nasm listing content

b () { echo -en ""; }

m=
[ "${1}" == "-" ]&&{ shift;m="-"; }
for i in ${*}
do
    [ -r ${i}.lis ]||break
    n=
    o=${i}.lst
    $(dirname ${0})/lis2lis.as ${m} <${i}.lis >${i}.lst
    test -s ./${i}.lst && mv ./${i}.lst ./${i}.lis||rm ./${i}.lst
done
b;sleep 1;b
