Lines Matching refs:lhs
98 my $lhs;
122 $lhs = $1;
127 die "$name:$line: property \"$lhs\" incomplete\n"
139 $props{$lhs} = $rhs;
140 print "property \"$lhs\" value \"$rhs\"\n" if $opt_v;
176 $lhs = $1;
180 my $elhs = join(' ', sort split(/\s/, $lhs));
183 unless $elhs eq $lhs;
188 foreach my $e (split(/\s/, $lhs)) {
199 if defined($keys2val{$lhs});
202 $keys2val{$lhs} = $rhs;
203 $val2keys{$rhs} = $lhs;
210 print "code: $code keys: $lhs\n" if $opt_v;
217 # keys: $lhs