pike.git/
src/
las.c
Branch:
Tag:
Non-build tags
All tags
No tags
1999-08-17
1999-08-17 01:06:58 by Martin Stjernholm <mast@lysator.liu.se>
5d81870f68e5e3e221b781685c2bbb28ec8a9034 (
6
lines) (+
4
/-
2
)
[
Show
|
Annotate
]
Branch:
7.9
Relaxed assignment type check to allow array->foo = bar.
Rev: src/las.c:1.83
5:
\*/ /**/ #include "global.h"
-
RCSID("$Id: las.c,v 1.
82
1999/
07
/
07
01:
02
:
38
hubbe
Exp $");
+
RCSID("$Id: las.c,v 1.
83
1999/
08
/
17
01:
06
:
58
mast
Exp $");
#include "language.h" #include "interpret.h"
1608:
case F_ASSIGN: if(CAR(n) && CDR(n) &&
+
CDR(n)->token != F_ARROW && /* a->b=c can be valid when a is an array */
!match_types(CDR(n)->type,CAR(n)->type)) my_yyerror("Bad type in assignment."); copy_shared_string(n->type, CAR(n)->type);