pike.git/
src/
las.c
Branch:
Tag:
Non-build tags
All tags
No tags
2005-02-15
2005-02-15 18:17:35 by Henrik Grubbström (Grubba) <grubba@grubba.org>
57fa29ab4536ce83d0353cbaa8986e07941ef10d (
14
lines) (+
9
/-
5
)
[
Show
|
Annotate
]
Branch:
7.9
Fixed code to work as documented.
Fixes [bug
3789 (#3789)
].
Rev: src/las.c:1.357
2:
|| This file is part of Pike. For copyright information see COPYRIGHT. || Pike is distributed under GPL, LGPL and MPL. See the file COPYING || for more information.
-
|| $Id: las.c,v 1.
356
2004
/
12
/
19
16
:
12
:
28
grubba Exp $
+
|| $Id: las.c,v 1.
357
2005
/
02
/
15
18
:
17
:
35
grubba Exp $
*/ #include "global.h"
3614:
fix_type_field(CAR(n)); fix_type_field(CDR(n)); if (!pike_types_le(CAR(n)->type, CDR(n)->type)) {
-
/* a["b"]=c and a->b=c can be valid when a is an array */
-
if (((CDR(n)->token != F_INDEX &&
-
CDR(n)->token != F_ARROW) ||
-
!match_types(array_type_string,
CDR
(n)->type)) &&
+
/* a["b"]=c and a->b=c can be valid when a is an array
.
+
*
+
* FIXME: Exactly what case is the problem?
+
*
/
grubba 2005-02-15
+
*/
+
if (((CDR(n)->token != F_INDEX && CDR(n)->token != F_ARROW) ||
+
!match_types(array_type_string,
CADR
(n)->type)) &&
!match_types(CDR(n)->type,CAR(n)->type)) { yytype_error("Bad type in assignment.", CDR(n)->type, CAR(n)->type, 0);