• Home
  • Raw
  • Download

Lines Matching refs:Cname

19 	($Cname,$mynum) = split;
20 $Cname =~ s/^X//;
23 if (defined($nid{$Cname}))
24 …{ die "$ARGV[1]:$o:There's already an object with name ",$Cname," on line ",$order{$nid{$Cname}},"…
25 $nid{$Cname} = $mynum;
26 $nidn{$mynum} = $Cname;
33 $Cname="";
48 { $Cname = $1; }
51 $Cname = $module.$1;
54 $Cname =~ s/-/_/g;
55 $ordern{$o} = $Cname;
56 $order{$Cname} = $o;
57 $obj{$Cname} = $myoid;
59 $Cname = "";
76 if ($Cname eq "" && !($myln =~ / /))
78 $Cname = $myln;
79 $Cname =~ s/\./_/g;
80 $Cname =~ s/-/_/g;
81 if ($Cname ne "" && defined($ln{$module.$Cname}))
82 …There's already an object with long name ",$ln{$module.$Cname}," on line ",$order{$module.$Cname},…
84 if ($Cname eq "")
86 $Cname = $mysn;
87 $Cname =~ s/-/_/g;
88 if ($Cname ne "" && defined($sn{$module.$Cname}))
89 …here's already an object with short name ",$sn{$module.$Cname}," on line ",$order{$module.$Cname},…
91 if ($Cname eq "")
93 $Cname = $myln;
94 $Cname =~ s/-/_/g;
95 $Cname =~ s/\./_/g;
96 $Cname =~ s/ /_/g;
97 if ($Cname ne "" && defined($ln{$module.$Cname}))
98 …There's already an object with long name ",$ln{$module.$Cname}," on line ",$order{$module.$Cname},…
100 $Cname =~ s/\./_/g;
101 $Cname =~ s/-/_/g;
102 $Cname = $module.$Cname;
103 $ordern{$o} = $Cname;
104 $order{$Cname} = $o;
105 $sn{$Cname} = $mysn;
106 $ln{$Cname} = $myln;
107 $obj{$Cname} = $myoid;
108 if (!defined($nid{$Cname}))
111 $nid{$Cname} = $max_nid;
112 $nidn{$max_nid} = $Cname;
113 print STDERR "Added OID $Cname\n";
115 $Cname="";
198 $Cname=$ordern{$_};
199 print OUT "#define SN_",$Cname,"\t\t\"",$sn{$Cname},"\"\n" if $sn{$Cname} ne "";
200 print OUT "#define LN_",$Cname,"\t\t\"",$ln{$Cname},"\"\n" if $ln{$Cname} ne "";
201 print OUT "#define NID_",$Cname,"\t\t",$nid{$Cname},"\n" if $nid{$Cname} ne "";
202 print OUT "#define OBJ_",$Cname,"\t\t",$obj{$Cname},"\n" if $obj{$Cname} ne "";