@@ -669,7 +669,7 @@ generate_two_op(cctx_T *cctx, char_u *op)
669669 * Return ISN_DROP when failed.
670670 */
671671 static isntype_T
672- get_compare_isn (exptype_T exptype , vartype_T type1 , vartype_T type2 )
672+ get_compare_isn (exprtype_T exprtype , vartype_T type1 , vartype_T type2 )
673673{
674674 isntype_T isntype = ISN_DROP ;
675675
@@ -699,22 +699,22 @@ get_compare_isn(exptype_T exptype, vartype_T type1, vartype_T type2)
699699 && (type2 == VAR_NUMBER || type2 == VAR_FLOAT )))
700700 isntype = ISN_COMPAREANY ;
701701
702- if ((exptype == EXPR_IS || exptype == EXPR_ISNOT )
702+ if ((exprtype == EXPR_IS || exprtype == EXPR_ISNOT )
703703 && (isntype == ISN_COMPAREBOOL
704704 || isntype == ISN_COMPARESPECIAL
705705 || isntype == ISN_COMPARENR
706706 || isntype == ISN_COMPAREFLOAT ))
707707 {
708708 semsg (_ (e_cannot_use_str_with_str ),
709- exptype == EXPR_IS ? "is" : "isnot" , vartype_name (type1 ));
709+ exprtype == EXPR_IS ? "is" : "isnot" , vartype_name (type1 ));
710710 return ISN_DROP ;
711711 }
712712 if (isntype == ISN_DROP
713- || ((exptype != EXPR_EQUAL && exptype != EXPR_NEQUAL
713+ || ((exprtype != EXPR_EQUAL && exprtype != EXPR_NEQUAL
714714 && (type1 == VAR_BOOL || type1 == VAR_SPECIAL
715715 || type2 == VAR_BOOL || type2 == VAR_SPECIAL )))
716- || ((exptype != EXPR_EQUAL && exptype != EXPR_NEQUAL
717- && exptype != EXPR_IS && exptype != EXPR_ISNOT
716+ || ((exprtype != EXPR_EQUAL && exprtype != EXPR_NEQUAL
717+ && exprtype != EXPR_IS && exprtype != EXPR_ISNOT
718718 && (type1 == VAR_BLOB || type2 == VAR_BLOB
719719 || type1 == VAR_LIST || type2 == VAR_LIST ))))
720720 {
@@ -726,7 +726,7 @@ get_compare_isn(exptype_T exptype, vartype_T type1, vartype_T type2)
726726}
727727
728728 int
729- check_compare_types (exptype_T type , typval_T * tv1 , typval_T * tv2 )
729+ check_compare_types (exprtype_T type , typval_T * tv1 , typval_T * tv2 )
730730{
731731 if (get_compare_isn (type , tv1 -> v_type , tv2 -> v_type ) == ISN_DROP )
732732 return FAIL ;
@@ -737,7 +737,7 @@ check_compare_types(exptype_T type, typval_T *tv1, typval_T *tv2)
737737 * Generate an ISN_COMPARE* instruction with a boolean result.
738738 */
739739 static int
740- generate_COMPARE (cctx_T * cctx , exptype_T exptype , int ic )
740+ generate_COMPARE (cctx_T * cctx , exprtype_T exprtype , int ic )
741741{
742742 isntype_T isntype ;
743743 isn_T * isn ;
@@ -752,13 +752,13 @@ generate_COMPARE(cctx_T *cctx, exptype_T exptype, int ic)
752752 // checking.
753753 type1 = ((type_T * * )stack -> ga_data )[stack -> ga_len - 2 ]-> tt_type ;
754754 type2 = ((type_T * * )stack -> ga_data )[stack -> ga_len - 1 ]-> tt_type ;
755- isntype = get_compare_isn (exptype , type1 , type2 );
755+ isntype = get_compare_isn (exprtype , type1 , type2 );
756756 if (isntype == ISN_DROP )
757757 return FAIL ;
758758
759759 if ((isn = generate_instr (cctx , isntype )) == NULL )
760760 return FAIL ;
761- isn -> isn_arg .op .op_type = exptype ;
761+ isn -> isn_arg .op .op_type = exprtype ;
762762 isn -> isn_arg .op .op_ic = ic ;
763763
764764 // takes two arguments, puts one bool back
@@ -3348,10 +3348,10 @@ get_vim_constant(char_u **arg, typval_T *rettv)
33483348 }
33493349}
33503350
3351- exptype_T
3351+ exprtype_T
33523352get_compare_type (char_u * p , int * len , int * type_is )
33533353{
3354- exptype_T type = EXPR_UNKNOWN ;
3354+ exprtype_T type = EXPR_UNKNOWN ;
33553355 int i ;
33563356
33573357 switch (p [0 ])
@@ -4346,7 +4346,7 @@ compile_expr5(char_u **arg, cctx_T *cctx, ppconst_T *ppconst)
43464346 static int
43474347compile_expr4 (char_u * * arg , cctx_T * cctx , ppconst_T * ppconst )
43484348{
4349- exptype_T type = EXPR_UNKNOWN ;
4349+ exprtype_T type = EXPR_UNKNOWN ;
43504350 char_u * p ;
43514351 char_u * next ;
43524352 int len = 2 ;
0 commit comments