# $FreeBSD$
# Read global symbols from object file.
BEGIN {
while ("${NM:='nm'} -g " ARGV[1] | getline) {
if (match($0, /^[^[:space:]]+ [^AU] (.*)$/)) {
syms[$3] = $2
}
delete ARGV[1]
# De-list symbols from the export list.
{
delete syms[$0]
# Strip commons, make everything else local.
END {
for (member in syms) {
if (syms[member] == "C")
print "-N" member
else
print "-L" member