1324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverpackage ANTLR::Runtime::Exception; 2324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 3324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruveruse Exception::Class; 4324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 5324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruveruse Moose; 6324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 7324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverextends 'Moose::Object', 'Exception::Class::Base'; 8324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 9324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruversub BUILD { 10324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver my ($self, $args) = @_; 11324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 12324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver my %exception_args; 13324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver if (exists $args->{message}) { 14324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver $exception_args{message} = $args->{message}; 15324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver } 16324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 17324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver $self->_initialize(%exception_args); 18324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver return; 19324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver} 20324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver 21324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruverno Moose; 22324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver__PACKAGE__->meta->make_immutable(); 23324c4644fee44b9898524c09511bd33c3f12e2dfBen Gruver1; 24