[system] / trunk / pg / lib / Value.pm Repository:
ViewVC logotype

Diff of /trunk/pg/lib/Value.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 2646 Revision 2654
334sub promotePrecedence { 334sub promotePrecedence {
335 my $self = shift; my $other = shift; 335 my $self = shift; my $other = shift;
336 my $sprec = $$context->{precedence}{class($self)}; 336 my $sprec = $$context->{precedence}{class($self)};
337 my $oprec = $$context->{precedence}{class($other)}; 337 my $oprec = $$context->{precedence}{class($other)};
338 return (defined($oprec) && $sprec < $oprec) || 338 return (defined($oprec) && $sprec < $oprec) ||
339 $sprec >= $$context->{precedence}{special}; 339 ($sprec > $oprec && $sprec >= $$context->{precedence}{special});
340} 340}
341 341
342sub promote {shift} 342sub promote {shift}
343 343
344# 344#

Legend:
Removed from v.2646  
changed lines
  Added in v.2654

aubreyja at gmail dot com
ViewVC Help
Powered by ViewVC 1.0.9