1 ##############################################################################
2 # $URL: http://perlcritic.tigris.org/svn/perlcritic/trunk/Perl-Critic/lib/Perl/Critic/Exception/Fatal/Internal.pm $
3 # $Date: 2008-07-03 10:19:10 -0500 (Thu, 03 Jul 2008) $
6 ##############################################################################
8 package Perl::Critic::Exception::Fatal::Internal;
16 our $VERSION = '1.088';
18 #-----------------------------------------------------------------------------
20 use Exception::Class (
21 'Perl::Critic::Exception::Fatal::Internal' => {
22 isa => 'Perl::Critic::Exception::Fatal',
23 description => 'A problem with the Perl::Critic code was found, a.k.a. a bug.',
24 alias => 'throw_internal',
28 #-----------------------------------------------------------------------------
30 Readonly::Array our @EXPORT_OK => qw< throw_internal >;
32 #-----------------------------------------------------------------------------
39 #-----------------------------------------------------------------------------
47 Perl::Critic::Exception::Fatal::Internal - A problem with the L<Perl::Critic> implementation, i.e. a bug.
51 A representation of a bug found in the code of L<Perl::Critic>.
61 Elliot Shank <perl@galumph.com>
65 Copyright (c) 2007-2008 Elliot Shank. All rights reserved.
67 This program is free software; you can redistribute it and/or modify
68 it under the same terms as Perl itself. The full text of this license
69 can be found in the LICENSE file included with this module.
75 # cperl-indent-level: 4
77 # indent-tabs-mode: nil
78 # c-indentation-style: bsd
80 # ex: set ts=8 sts=4 sw=4 tw=78 ft=perl expandtab shiftround :