X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/a963e2b287c3184467a914de519fd48e84bc57b4..b2049988986b923fb3d9c76eeeb6307a1a0b062a:/cpan/Devel-PPPort/parts/inc/warn

diff --git a/cpan/Devel-PPPort/parts/inc/warn b/cpan/Devel-PPPort/parts/inc/warn
index 779239f..8f8f8ff 100644
--- a/cpan/Devel-PPPort/parts/inc/warn
+++ b/cpan/Devel-PPPort/parts/inc/warn
@@ -1,12 +1,6 @@
 ################################################################################
 ##
-##  $Revision: 8 $
-##  $Author: mhx $
-##  $Date: 2010/03/07 13:15:45 +0100 $
-##
-################################################################################
-##
-##  Version 3.x, Copyright (C) 2004-2010, Marcus Holland-Moritz.
+##  Version 3.x, Copyright (C) 2004-2013, Marcus Holland-Moritz.
 ##  Version 2.x, Copyright (C) 2001, Paul Marquess.
 ##  Version 1.x, Copyright (C) 1999, Kenneth Albanowski.
 ##
@@ -25,53 +19,53 @@ Perl_warner_nocontext
 
 =implementation
 
-__UNDEFINED__  WARN_ALL			0
-__UNDEFINED__  WARN_CLOSURE		1
-__UNDEFINED__  WARN_DEPRECATED		2
-__UNDEFINED__  WARN_EXITING		3
-__UNDEFINED__  WARN_GLOB		4
-__UNDEFINED__  WARN_IO			5
-__UNDEFINED__  WARN_CLOSED		6
-__UNDEFINED__  WARN_EXEC		7
-__UNDEFINED__  WARN_LAYER		8
-__UNDEFINED__  WARN_NEWLINE		9
-__UNDEFINED__  WARN_PIPE		10
-__UNDEFINED__  WARN_UNOPENED		11
-__UNDEFINED__  WARN_MISC		12
-__UNDEFINED__  WARN_NUMERIC		13
-__UNDEFINED__  WARN_ONCE		14
-__UNDEFINED__  WARN_OVERFLOW		15
-__UNDEFINED__  WARN_PACK		16
-__UNDEFINED__  WARN_PORTABLE		17
-__UNDEFINED__  WARN_RECURSION		18
-__UNDEFINED__  WARN_REDEFINE		19
-__UNDEFINED__  WARN_REGEXP		20
-__UNDEFINED__  WARN_SEVERE		21
-__UNDEFINED__  WARN_DEBUGGING		22
-__UNDEFINED__  WARN_INPLACE		23
-__UNDEFINED__  WARN_INTERNAL		24
-__UNDEFINED__  WARN_MALLOC		25
-__UNDEFINED__  WARN_SIGNAL		26
-__UNDEFINED__  WARN_SUBSTR		27
-__UNDEFINED__  WARN_SYNTAX		28
-__UNDEFINED__  WARN_AMBIGUOUS		29
-__UNDEFINED__  WARN_BAREWORD		30
-__UNDEFINED__  WARN_DIGIT		31
-__UNDEFINED__  WARN_PARENTHESIS		32
-__UNDEFINED__  WARN_PRECEDENCE		33
-__UNDEFINED__  WARN_PRINTF		34
-__UNDEFINED__  WARN_PROTOTYPE		35
-__UNDEFINED__  WARN_QW			36
-__UNDEFINED__  WARN_RESERVED		37
-__UNDEFINED__  WARN_SEMICOLON		38
-__UNDEFINED__  WARN_TAINT		39
-__UNDEFINED__  WARN_THREADS		40
-__UNDEFINED__  WARN_UNINITIALIZED	41
-__UNDEFINED__  WARN_UNPACK		42
-__UNDEFINED__  WARN_UNTIE		43
-__UNDEFINED__  WARN_UTF8		44
-__UNDEFINED__  WARN_VOID		45
-__UNDEFINED__  WARN_ASSERTIONS		46
+__UNDEFINED__  WARN_ALL                 0
+__UNDEFINED__  WARN_CLOSURE             1
+__UNDEFINED__  WARN_DEPRECATED          2
+__UNDEFINED__  WARN_EXITING             3
+__UNDEFINED__  WARN_GLOB                4
+__UNDEFINED__  WARN_IO                  5
+__UNDEFINED__  WARN_CLOSED              6
+__UNDEFINED__  WARN_EXEC                7
+__UNDEFINED__  WARN_LAYER               8
+__UNDEFINED__  WARN_NEWLINE             9
+__UNDEFINED__  WARN_PIPE                10
+__UNDEFINED__  WARN_UNOPENED            11
+__UNDEFINED__  WARN_MISC                12
+__UNDEFINED__  WARN_NUMERIC             13
+__UNDEFINED__  WARN_ONCE                14
+__UNDEFINED__  WARN_OVERFLOW            15
+__UNDEFINED__  WARN_PACK                16
+__UNDEFINED__  WARN_PORTABLE            17
+__UNDEFINED__  WARN_RECURSION           18
+__UNDEFINED__  WARN_REDEFINE            19
+__UNDEFINED__  WARN_REGEXP              20
+__UNDEFINED__  WARN_SEVERE              21
+__UNDEFINED__  WARN_DEBUGGING           22
+__UNDEFINED__  WARN_INPLACE             23
+__UNDEFINED__  WARN_INTERNAL            24
+__UNDEFINED__  WARN_MALLOC              25
+__UNDEFINED__  WARN_SIGNAL              26
+__UNDEFINED__  WARN_SUBSTR              27
+__UNDEFINED__  WARN_SYNTAX              28
+__UNDEFINED__  WARN_AMBIGUOUS           29
+__UNDEFINED__  WARN_BAREWORD            30
+__UNDEFINED__  WARN_DIGIT               31
+__UNDEFINED__  WARN_PARENTHESIS         32
+__UNDEFINED__  WARN_PRECEDENCE          33
+__UNDEFINED__  WARN_PRINTF              34
+__UNDEFINED__  WARN_PROTOTYPE           35
+__UNDEFINED__  WARN_QW                  36
+__UNDEFINED__  WARN_RESERVED            37
+__UNDEFINED__  WARN_SEMICOLON           38
+__UNDEFINED__  WARN_TAINT               39
+__UNDEFINED__  WARN_THREADS             40
+__UNDEFINED__  WARN_UNINITIALIZED       41
+__UNDEFINED__  WARN_UNPACK              42
+__UNDEFINED__  WARN_UNTIE               43
+__UNDEFINED__  WARN_UTF8                44
+__UNDEFINED__  WARN_VOID                45
+__UNDEFINED__  WARN_ASSERTIONS          46
 
 __UNDEFINED__  packWARN(a)              (a)
 
@@ -116,31 +110,31 @@ warner(U32 err, const char *pat, ...)
 
 void
 warner()
-	CODE:
+        CODE:
 #if { VERSION >= 5.004 }
-		warner(packWARN(WARN_MISC), "warner %s:%d", "bar", 42);
+                warner(packWARN(WARN_MISC), "warner %s:%d", "bar", 42);
 #endif
 
 void
 Perl_warner()
-	CODE:
+        CODE:
 #if { VERSION >= 5.004 }
-		Perl_warner(aTHX_ packWARN(WARN_MISC), "Perl_warner %s:%d", "bar", 42);
+                Perl_warner(aTHX_ packWARN(WARN_MISC), "Perl_warner %s:%d", "bar", 42);
 #endif
 
 void
 Perl_warner_nocontext()
-	CODE:
+        CODE:
 #if { VERSION >= 5.004 }
-		Perl_warner_nocontext(packWARN(WARN_MISC), "Perl_warner_nocontext %s:%d", "bar", 42);
+                Perl_warner_nocontext(packWARN(WARN_MISC), "Perl_warner_nocontext %s:%d", "bar", 42);
 #endif
 
 void
 ckWARN()
-	CODE:
+        CODE:
 #if { VERSION >= 5.004 }
-		if (ckWARN(WARN_MISC))
-		  Perl_warner_nocontext(packWARN(WARN_MISC), "ckWARN %s:%d", "bar", 42);
+                if (ckWARN(WARN_MISC))
+                  Perl_warner_nocontext(packWARN(WARN_MISC), "ckWARN %s:%d", "bar", 42);
 #endif
 
 =tests plan => 5
@@ -172,4 +166,3 @@ $^W = 1;
 $warning = '';
 Devel::PPPort::ckWARN();
 ok($] >= 5.004 ? $warning =~ /^ckWARN bar:42/ : $warning eq '');
-