static void make_scrnobj_ctx_for_panel(QSP_ARG_DECL Panel_Obj *po)
{
IOS_Item_Context *icp = create_scrnobj_context(PO_NAME(po));
//sprintf(ERROR_STRING,"new_panel %s (0x%lx, qvc = 0x%lx), size is %d x %d, setting context to 0x%lx",
//PO_NAME(po),(long)po,(long)PO_QVC(po),PO_WIDTH(po),PO_HEIGHT(po),(long)icp);
//advise(ERROR_STRING);
SET_PO_CONTEXT(po, icp);
}
static void push_widget_context(QSP_ARG_DECL Screen_Obj *sop)
{
int n;
Item_Context *icp;
char *ctx_name;
icp = current_scrnobj_context(SINGLE_QSP_ARG);
assert( icp != NULL );
n = 2 + strlen( CTX_NAME(icp) ) + strlen( SOB_NAME(sop) );
ctx_name = getbuf(n);
sprintf(ctx_name,"%s.%s",CTX_NAME(icp),SOB_NAME(sop) );
icp = create_scrnobj_context(QSP_ARG ctx_name );
givbuf(ctx_name);
push_scrnobj_context(QSP_ARG icp);
}