static tree make_value_handle (tree type) { static unsigned int id = 0; tree vh; vh = build0 (VALUE_HANDLE, type); VALUE_HANDLE_ID (vh) = id++; return vh; }
tree build_exc_ptr (void) { return build0 (EXC_PTR_EXPR, ptr_type_node); }