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

Diff of /trunk/pg/lib/Parser/List.pm

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

Revision 2624 Revision 2625
216 $perl = $self->type.'('.join(',',@p).')'; 216 $perl = $self->type.'('.join(',',@p).')';
217 $perl = '('.$perl.')' if $parens; 217 $perl = '('.$perl.')' if $parens;
218 return $perl; 218 return $perl;
219} 219}
220 220
221sub makeUnion {
222 my $self = shift;
223 $self = bless $self->copy, 'Parser::List::Interval';
224 $self->typeRef->{name} = $self->{equation}{context}{parens}{interval}{type};
225 return $self;
226}
227
228######################################################################### 221#########################################################################
229# 222#
230# Load the subclasses. 223# Load the subclasses.
231# 224#
232 225

Legend:
Removed from v.2624  
changed lines
  Added in v.2625

aubreyja at gmail dot com
ViewVC Help
Powered by ViewVC 1.0.9