diff options
| author | Steffen Mueller <smueller@cpan.org> | 2009-09-02 18:32:53 +0200 |
|---|---|---|
| committer | Steffen Mueller <smueller@cpan.org> | 2009-09-02 18:33:09 +0200 |
| commit | d94ee62ee1674ba7636ee5caeec4bf662f171012 (patch) | |
| tree | 23867850aa55fa7e993dab5347221c017530c09d /lib | |
| parent | 8670a613094bda0371216c408e705ef051cfbf10 (diff) | |
| download | perl-d94ee62ee1674ba7636ee5caeec4bf662f171012.tar.gz | |
Deprecate assert.pl with a warning
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/assert.pl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/assert.pl b/lib/assert.pl index 4c9ebf20a0..768ae49570 100644 --- a/lib/assert.pl +++ b/lib/assert.pl @@ -11,6 +11,9 @@ # be printed out by &panic, which is just the stack-backtrace # routine shamelessly borrowed from the perl debugger. +warn( "The 'assert.pl' legacy library is deprecated and will be" + . " removed in the next major release of perl." ); + sub assert { &panic("ASSERTION BOTCHED: $_[$[]",$@) unless eval $_[$[]; } |