Lines Matching refs:ln
49 my %ln;
77 $ln{$1} = $d;
119 my $ln = defined $ln{$nid{$i}} ? "$ln{$nid{$i}}" : "NULL";
121 $sn = $ln;
122 $sn{$nid{$i}} = $ln;
124 if ($ln eq "NULL") {
125 $ln = $sn;
126 $ln{$nid{$i}} = $sn;
129 my $out = " {\"$sn\", \"$ln\", NID_$nid{$i}";
193 @a = grep(defined $ln{$nid{$_}}, 0 .. $n);
197 foreach (sort { $ln{$nid{$a}} cmp $ln{$nid{$b}} } @a) {
198 printf " %4d, /* \"$ln{$nid{$_}}\" */\n", $_;