vim-55/src/ex_eval.c

1129     int		idx;
1140 	idx = cleanup_conditionals(cstack, CSF_WHILE | CSF_FOR, FALSE);
1141 	if (idx >= 0 && (cstack->cs_flags[idx] & (CSF_WHILE | CSF_FOR)))
1143 	    rewind_conditionals(cstack, idx, CSF_TRY, &cstack->cs_trylevel);
1155 	    cstack->cs_pending[idx] = CSTP_CONTINUE;
1168     int		idx;
1179 	idx = cleanup_conditionals(cstack, CSF_WHILE | CSF_FOR, TRUE);
1180 	if (idx >= 0 && !(cstack->cs_flags[idx] & (CSF_WHILE | CSF_FOR)))
1182 	    cstack->cs_pending[idx] = CSTP_BREAK;
1196     int			idx;
1233 	    for (idx = cstack->cs_idx; idx > 0; --idx)
1235 		fl =  cstack->cs_flags[idx];
1248 	    rewind_conditionals(cstack, idx, CSF_TRY, &cstack->cs_trylevel);
1313     int		idx;
1339     idx = cleanup_conditionals(cstack, 0, inactivate_try);
1340     if (idx >= 0)
1355 	if (!(cstack->cs_flags[idx] & CSF_CAUGHT))
1357 	    if (cstack->cs_flags[idx] & CSF_ACTIVE)
1358 		cstack->cs_flags[idx] |= CSF_THROWN;
1363 		cstack->cs_flags[idx] &= ~CSF_THROWN;
1365 	cstack->cs_flags[idx] &= ~CSF_ACTIVE;
1366 	cstack->cs_exception[idx] = current_exception;
1465     int		idx = 0;
1491 	for (idx = cstack->cs_idx; idx > 0; --idx)
1492 	    if (cstack->cs_flags[idx] & CSF_TRY)
1494 	if (cstack->cs_flags[idx] & CSF_FINALLY)
1502 	    rewind_conditionals(cstack, idx, CSF_WHILE | CSF_FOR,
1525 	if (!did_throw || !(cstack->cs_flags[idx] & CSF_TRUE))
1533 	if (!skip && (cstack->cs_flags[idx] & CSF_THROWN)
1534 		&& !(cstack->cs_flags[idx] & CSF_CAUGHT))
1588 	    cstack->cs_flags[idx] |= CSF_ACTIVE | CSF_CAUGHT;
1590 	    catch_exception((except_T *)cstack->cs_exception[idx]);
1626     int		idx;
1638 	    for (idx = cstack->cs_idx - 1; idx > 0; --idx)
1639 		if (cstack->cs_flags[idx] & CSF_TRY)
1647 	    idx = cstack->cs_idx;
1649 	if (cstack->cs_flags[idx] & CSF_FINALLY)
1655 	rewind_conditionals(cstack, idx, CSF_WHILE | CSF_FOR,
1754     int		idx;
1783 	    idx = cstack->cs_idx;
1785 		--idx;
1786 	    while (idx > 0 && !(cstack->cs_flags[idx] & CSF_TRY));
1787 	    rewind_conditionals(cstack, idx, CSF_WHILE | CSF_FOR,
1803 	    idx = cstack->cs_idx;
1811 	    if (did_throw && (cstack->cs_flags[idx] & CSF_TRUE)
1812 		    && !(cstack->cs_flags[idx] & CSF_FINALLY))
1825 			&& !(cstack->cs_flags[idx] & CSF_FINALLY)
1826 			&& !cstack->cs_pending[idx]))
1837 		 * cstack->cs_pending[idx].*/
1839 		if (did_throw && !(cstack->cs_flags[idx] & CSF_FINALLY))
1852 	    pending = cstack->cs_pending[idx];
1853 	    cstack->cs_pending[idx] = CSTP_NONE;
1855 		rettv = cstack->cs_rettv[idx];
1857 		current_exception = cstack->cs_exception[idx];
2107     int		idx;
2110     for (idx = cstack->cs_idx; idx >= 0; --idx)
2112 	if (cstack->cs_flags[idx] & CSF_TRY)
2120 	    if (did_emsg || got_int || (cstack->cs_flags[idx] & CSF_FINALLY))
2122 		switch (cstack->cs_pending[idx])
2130 			report_discard_pending(cstack->cs_pending[idx], NULL);
2131 			cstack->cs_pending[idx] = CSTP_NONE;
2136 						      cstack->cs_rettv[idx]);
2137 			discard_pending_return(cstack->cs_rettv[idx]);
2138 			cstack->cs_pending[idx] = CSTP_NONE;
2142 			if (cstack->cs_flags[idx] & CSF_FINALLY)
2144 			    if (cstack->cs_pending[idx] & CSTP_THROW)
2150 					cstack->cs_exception[idx],
2154 				report_discard_pending(cstack->cs_pending[idx],
2156 			    cstack->cs_pending[idx] = CSTP_NONE;
2167 	    if (!(cstack->cs_flags[idx] & CSF_FINALLY))
2169 		if ((cstack->cs_flags[idx] & CSF_ACTIVE)
2170 			&& (cstack->cs_flags[idx] & CSF_CAUGHT))
2171 		    finish_exception((except_T *)cstack->cs_exception[idx]);
2176 		if (cstack->cs_flags[idx] & CSF_TRUE)
2189 	if (cstack->cs_flags[idx] & searched_cond)
2195 	cstack->cs_flags[idx] &= ~CSF_ACTIVE;
2204 	if ((cstack->cs_flags[idx] & CSF_TRY)
2205 		&& (cstack->cs_flags[idx] & CSF_SILENT))
2213 	    cstack->cs_flags[idx] &= ~CSF_SILENT;
2218     return idx;
2237  * Rewind conditionals until index "idx" is reached.  "cond_type" and
2244 rewind_conditionals(cstack, idx, cond_type, cond_level)
2246     int		idx;
2250     while (cstack->cs_idx > idx)