coroutines: Support for debugging implementation state.
Some of the state that is associated with the implementation is of interest to a user debugging a coroutine. In particular items such as the suspend point, promise object, and current suspend point. These variables live in the coroutine frame, but we can inject proxies for them into the outermost bind expression of the coroutine. Such variables are automatically moved into the coroutine frame (if they need to persist across a suspend expression). PLacing the proxies thus allows the user to inspect them by name in the debugger. To implement this, we ensure that (at the outermost scope) the frame entries are not mangled (coroutine frame variables are usually mangled with scope nesting information so that they do not clash). We can safely avoid doing this for the outermost scope so that we can map frame entries directly to the variables. This is partial contribution to debug support (PR 99215). Signed-off-by: Iain Sandoe <iain@sandoe.co.uk> gcc/cp/ChangeLog: * coroutines.cc (register_local_var_uses): Do not mangle frame entries for the outermost scope. Record the outer scope as nesting depth 0.
This commit is contained in:
parent
a45a7ecdf3
commit
addf167a23
@ -3885,8 +3885,6 @@ register_local_var_uses (tree *stmt, int *do_subtree, void *d)
|
|||||||
|
|
||||||
if (TREE_CODE (*stmt) == BIND_EXPR)
|
if (TREE_CODE (*stmt) == BIND_EXPR)
|
||||||
{
|
{
|
||||||
lvd->bind_indx++;
|
|
||||||
lvd->nest_depth++;
|
|
||||||
tree lvar;
|
tree lvar;
|
||||||
for (lvar = BIND_EXPR_VARS (*stmt); lvar != NULL;
|
for (lvar = BIND_EXPR_VARS (*stmt); lvar != NULL;
|
||||||
lvar = DECL_CHAIN (lvar))
|
lvar = DECL_CHAIN (lvar))
|
||||||
@ -3925,11 +3923,17 @@ register_local_var_uses (tree *stmt, int *do_subtree, void *d)
|
|||||||
continue;
|
continue;
|
||||||
|
|
||||||
/* Make names depth+index unique, so that we can support nested
|
/* Make names depth+index unique, so that we can support nested
|
||||||
scopes with identically named locals. */
|
scopes with identically named locals and still be able to
|
||||||
|
identify them in the coroutine frame. */
|
||||||
tree lvname = DECL_NAME (lvar);
|
tree lvname = DECL_NAME (lvar);
|
||||||
char *buf;
|
char *buf;
|
||||||
if (lvname != NULL_TREE)
|
/* The outermost bind scope contains the artificial variables that
|
||||||
buf = xasprintf ("__%s.%u.%u", IDENTIFIER_POINTER (lvname),
|
we inject to implement the coro state machine. We want to be able
|
||||||
|
to inspect these in debugging. */
|
||||||
|
if (lvname != NULL_TREE && lvd->nest_depth == 0)
|
||||||
|
buf = xasprintf ("%s", IDENTIFIER_POINTER (lvname));
|
||||||
|
else if (lvname != NULL_TREE)
|
||||||
|
buf = xasprintf ("%s_%u_%u", IDENTIFIER_POINTER (lvname),
|
||||||
lvd->nest_depth, lvd->bind_indx);
|
lvd->nest_depth, lvd->bind_indx);
|
||||||
else
|
else
|
||||||
buf = xasprintf ("_D%u.%u.%u", DECL_UID (lvar), lvd->nest_depth,
|
buf = xasprintf ("_D%u.%u.%u", DECL_UID (lvar), lvd->nest_depth,
|
||||||
@ -3942,6 +3946,8 @@ register_local_var_uses (tree *stmt, int *do_subtree, void *d)
|
|||||||
/* We don't walk any of the local var sub-trees, they won't contain
|
/* We don't walk any of the local var sub-trees, they won't contain
|
||||||
any bind exprs. */
|
any bind exprs. */
|
||||||
}
|
}
|
||||||
|
lvd->bind_indx++;
|
||||||
|
lvd->nest_depth++;
|
||||||
cp_walk_tree (&BIND_EXPR_BODY (*stmt), register_local_var_uses, d, NULL);
|
cp_walk_tree (&BIND_EXPR_BODY (*stmt), register_local_var_uses, d, NULL);
|
||||||
*do_subtree = 0; /* We've done this. */
|
*do_subtree = 0; /* We've done this. */
|
||||||
lvd->nest_depth--;
|
lvd->nest_depth--;
|
||||||
|
Loading…
Reference in New Issue
Block a user