1 2 3 4 5 6 7 8 9 10 11 12 13 | ss_scope_t *
ss_file_topscope(ss_file_t *file, /* File for which to obtain a link to a top scope. */
ss_scope_t *buf /* Optional buffer in which to store the resulting link. */
)
{
SS_ENTER(ss_file_topscope, ss_scope_tP);
ss_scope_t *retval=NULL;
SS_ASSERT_TYPE(file, ss_file_t);
if (NULL==(retval=ss_pers_topscope((ss_pers_t*)file, buf))) SS_ERROR(FAILED);
SS_CLEANUP:
SS_LEAVE(retval);
}
|