git.gag.com Git - debian/cc1111/blob - sim/ucsim/s51.src/lst2ls

   1 FNAME=$1
   2
   3 awk -v FNAME=$FNAME 'BEGIN {
   4   cfname= FNAME ".c";
   5   i= 1;
   6   while (getline csrc[i] <cfname)
   7     i++;
   8 }
   9
  10 $2 == ";" &&
  11 $3 ^ cfname &&
  12 NF == 4 {
  13   print;
  14   print csrc[$4];
  15   next;
  16 }
  17
  18 {
  19   print;
  20 }' ${FNAME}.lst >${FNAME}.ls
  21
  22 # End of lst2ls
  23