17460Smckusick# Copyright (c) 1982 Regents of the University of California 27460Smckusick# 3*7599Smckusick# @(#)pcexterns.awk 4.2 (Berkeley) 07/29/82 47460Smckusick# 57460SmckusickNR == 1 { 67460Smckusick name = substr($1, 1, index($1, ":") - 1); 77460Smckusick printf " .stabs \"%s\",0x30,0,0x1,0\n", name; 87460Smckusick} 97460Smckusick 107460SmckusickNF == 3 && $2 == "T" { 11*7599Smckusick printf " .stabs \"%s\",0x30,0,0xc,0x%d\n", substr($3, 2), NR; 127460Smckusick} 137460Smckusick 147460SmckusickNF == 3 && $2 ~ /[ABD]/ { 15*7599Smckusick printf " .stabs \"%s\",0x30,0,0xb,0x%d\n", substr($3, 2), NR; 167460Smckusick} 17