pike.git
/
src
/
docode.c
version
»
Context lines:
10
20
40
80
file
none
3
pike.git/src/docode.c:1:
/*\ ||| This file a part of Pike, and is copyright by Fredrik Hubinette ||| Pike is distributed as GPL (General Public License) ||| See the files COPYING and DISCLAIMER for more information. \*/ /**/ #include "global.h"
-
RCSID("$Id: docode.c,v 1.
82
2000/09/
11
18
:
42
:
25
grubba
Exp $");
+
RCSID("$Id: docode.c,v 1.
83
2000/09/
26
22
:
19
:
02
hubbe
Exp $");
#include "las.h" #include "program.h" #include "pike_types.h" #include "stralloc.h" #include "interpret.h" #include "constants.h" #include "array.h" #include "pike_macros.h" #include "error.h" #include "pike_memory.h"
pike.git/src/docode.c:1021:
if(!current_switch_jumptable) { yyerror("Case outside switch."); }else{ node *lower=CAR(n); if(!lower) lower=CDR(n); if(!is_const(lower)) yyerror("Case label isn't constant.");
-
if (lower && lower->type) {
+
if (lower && lower->type
&& !TEST_COMPAT(0,6
)
)
{
if (!pike_types_le(lower->type, current_switch_type)) { if (!match_types(lower->type, current_switch_type)) { yytype_error("Type mismatch in case.", current_switch_type, lower->type, 0); } else if (lex.pragmas & ID_STRICT_TYPES) { yytype_error("Type mismatch in case.", current_switch_type, lower->type, YYTE_IS_WARNING); } } }