static long current_CurFontCache(i_ctx_t *i_ctx_p) { uint cstat[7]; gs_cachestatus(ifont_dir, cstat); return cstat[0]; }
/* - cachestatus <mark> <bsize> <bmax> <msize> <mmax> <csize> <cmax> <blimit> */ static int zcachestatus(i_ctx_t *i_ctx_p) { os_ptr op = osp; uint status[7]; gs_cachestatus(ifont_dir, status); push(7); make_uint_array(op - 6, status, 7); return 0; }