pike.git/
src/
las.c
Branch:
Tag:
Non-build tags
All tags
No tags
1999-11-21
1999-11-21 00:50:30 by Henrik Grubbström (Grubba) <grubba@grubba.org>
f77d7ec3e1b95c8483b7c659292d8f40fd53af6d (
11
lines) (+
5
/-
6
)
[
Show
|
Annotate
]
Branch:
7.9
Somewhat stricter type-checking of derived types.
Rev: src/las.c:1.122
5:
\*/ /**/ #include "global.h"
-
RCSID("$Id: las.c,v 1.
121
1999/11/
20
21:
16
:
39
grubba Exp $");
+
RCSID("$Id: las.c,v 1.
122
1999/11/
21
00
:
50
:
30
grubba Exp $");
#include "language.h" #include "interpret.h"
2004:
{ copy_shared_string(n->type,CAR(n)->type); }else{
-
/*
FIXME:
Shouldn't it be an
or
? */
-
copy
_
shared
_
string
(n->type,
mixed_
type
_string
);
+
n->type
=
or_
pike
_
types
(
CAR(
n
)
->type,
CDR(n)->
type);
} break;
2023:
my_yyerror("Bad type in assignment."); } }
-
copy
_
shared
_
string
(n->type,
CAR
(n)->type);
+
n->type = and
_
pike
_
types
(
CAR(
n
)
->type,
CDR
(n)->type);
break; case F_INDEX:
2144:
break; }
-
/* FIXME: Should be
type
_a|type_b
*/
-
copy
_
shared
_
string
(n->type,
mixed_
type
_string
);
+
n->
type
=
or
_
pike
_
types
(
CADR(
n
)
->type,
CDDR(n)->
type);
break; case F_RETURN: