EXTERN type_T t_bool INIT6(VAR_BOOL, 0, 0, TTFLAG_STATIC, NULL, NULL);
EXTERN type_T t_special INIT6(VAR_SPECIAL, 0, 0, TTFLAG_STATIC, NULL, NULL);
EXTERN type_T t_number INIT6(VAR_NUMBER, 0, 0, TTFLAG_STATIC, NULL, NULL);
+EXTERN type_T t_number_bool INIT6(VAR_NUMBER, 0, 0, TTFLAG_STATIC|TTFLAG_BOOL_OK, NULL, NULL);
EXTERN type_T t_float INIT6(VAR_FLOAT, 0, 0, TTFLAG_STATIC, NULL, NULL);
EXTERN type_T t_string INIT6(VAR_STRING, 0, 0, TTFLAG_STATIC, NULL, NULL);
EXTERN type_T t_blob INIT6(VAR_BLOB, 0, 0, TTFLAG_STATIC, NULL, NULL);
isn->isn_arg.number = number;
if (number == 0 || number == 1)
- {
- type_T *type = get_type_ptr(cctx->ctx_type_list);
-
// A 0 or 1 number can also be used as a bool.
- if (type != NULL)
- {
- type->tt_type = VAR_NUMBER;
- type->tt_flags = TTFLAG_BOOL_OK;
- ((type_T **)stack->ga_data)[stack->ga_len - 1] = type;
- }
- }
+ ((type_T **)stack->ga_data)[stack->ga_len - 1] = &t_number_bool;
return OK;
}
if (type != NULL && type != &t_bool
&& (tv->v_type == VAR_NUMBER
&& (tv->vval.v_number == 0 || tv->vval.v_number == 1)))
- {
- type_T *newtype = get_type_ptr(type_gap);
-
- // Number 0 and 1 and expression with "&&" or "||" can also be used
- // for bool.
- if (newtype != NULL)
- {
- *newtype = *type;
- newtype->tt_flags = TTFLAG_BOOL_OK;
- type = newtype;
- }
- }
+ // Number 0 and 1 and expression with "&&" or "||" can also be used for
+ // bool.
+ type = &t_number_bool;
return type;
}