679 #define BC_SIG_EXC(vm) \  argument
680 	BC_UNLIKELY((vm)->status != (sig_atomic_t) BC_STATUS_SUCCESS || (vm)->sig)
683 #define BC_NO_SIG_EXC(vm) \  argument
684 	BC_LIKELY((vm)->status == (sig_atomic_t) BC_STATUS_SUCCESS && !(vm)->sig)
687 #define BC_SIG_INTERRUPT(vm) \  argument
688 	BC_UNLIKELY((vm)->sig != 0 && (vm)->sig != SIGWINCH)
690 #define BC_SIG_INTERRUPT(vm) BC_UNLIKELY((vm)->sig != 0)  argument
702 		assert(vm->sig_lock); \
713 		assert(vm->sig_lock == 0); \
738 		vm->sig_lock = 1;         \
747 		vm->sig_lock = 0;     \
748 		if (vm->sig) BC_JMP;  \
759 		vm->sig_lock = 1; \
768 		vm->sig_lock = 0;    \
769 		if (vm->sig) BC_JMP; \
781 		v = vm->sig_lock; \
782 		vm->sig_lock = 1; \
794 		vm->sig_lock = (v);          \
795 		if (!(v) && vm->sig) BC_JMP; \
805 		vm->sig_pop = 0; \
806 		vm->sig = 0;     \
817 #define BC_SETJMP_LOCKED(vm, l)           \  argument
824 			assert(BC_SIG_EXC(vm));       \
827 		bc_vec_push(&vm->jmp_bufs, &sjb); \
835 #define BC_LONGJMP_CONT(vm)                          \  argument
839 		if (!vm->sig_pop) bc_vec_pop(&vm->jmp_bufs); \
840 		vm->sig_lock = 0;                            \
841 		if (BC_SIG_EXC(vm)) BC_JMP;                  \
855 #define BC_SIG_EXC(vm) \  argument
856 	BC_UNLIKELY(vm->status != (sig_atomic_t) BC_STATUS_SUCCESS)
859 #define BC_NO_SIG_EXC(vm) \  argument
860 	BC_LIKELY(vm->status == (sig_atomic_t) BC_STATUS_SUCCESS)
866 #define BC_LONGJMP_CONT(vm)         \  argument
869 		bc_vec_pop(&vm->jmp_bufs);  \
870 		if (BC_SIG_EXC(vm)) BC_JMP; \
886 #define BC_SETJMP(vm, l)                  \  argument
891 		bc_vec_grow(&vm->jmp_bufs, 1);    \
894 			assert(BC_SIG_EXC(vm));       \
897 		bc_vec_push(&vm->jmp_bufs, &sjb); \
906 #define BC_UNSETJMP(vm)            \  argument
910 		bc_vec_pop(&vm->jmp_bufs); \
916 #define BC_SETJMP_LOCKED(vm, l) BC_SETJMP(vm, l)  argument
995 		for (bc_func_enter_i = 0; bc_func_enter_i < vm->func_depth; \
998 			bc_file_puts(&vm->ferr, bc_flush_none, "  ");           \
1000 		vm->func_depth += 1;                                        \
1001 		bc_file_printf(&vm->ferr, "Entering %s\n", __func__);       \
1002 		bc_file_flush(&vm->ferr, bc_flush_none);                    \
1010 		vm->func_depth -= 1;                                        \
1011 		for (bc_func_enter_i = 0; bc_func_enter_i < vm->func_depth; \
1014 			bc_file_puts(&vm->ferr, bc_flush_none, "  ");           \
1016 		bc_file_printf(&vm->ferr, "Leaving %s\n", __func__);        \
1017 		bc_file_flush(&vm->ferr, bc_flush_none);                    \