pike.git/
src/
pike_types.cmod
Branch:
Tag:
Non-build tags
All tags
No tags
2020-01-19
2020-01-19 18:47:07 by Henrik Grubbström (Grubba) <grubba@grubba.org>
e9aa7d97ad3376626dc1eda01492cc427f15f411 (
4
lines) (+
3
/-
1
)
[
Show
|
Annotate
]
Branch:
master
Compiler
[Typechecker]
: Type-check the length field.
3895:
case T_STRING: if(!low_match_types(a->cdr, b->cdr, flags & ~(A_EXACT|B_EXACT))) return 0;
-
break;
+
/* FALLTHRU */
case T_PROGRAM: case T_TYPE:
4712:
case T_ARRAY: case T_STRING: if (flags & LE_TYPE_SVALUE) return 1;
+
if (!low_pike_types_le(a->car, b->car, 0, flags)) return 0;
a = a->cdr; b = b->cdr; array_cnt = 0;