/* the code for Type 1 halftones in sethalftone. */
int
zscreen_enum_init(i_ctx_t *i_ctx_p, const gx_ht_order * porder,
gs_screen_halftone * psp, ref * pproc, int npop,
int (*finish_proc)(i_ctx_t *), int space_index)
{
gs_screen_enum *penum;
gs_memory_t * mem = (gs_memory_t *)idmemory->spaces_indexed[space_index];
int code;
check_estack(snumpush + 1);
penum = gs_screen_enum_alloc(mem, "setscreen");
if (penum == 0)
return_error(e_VMerror);
make_struct(esp + snumpush, space_index << r_space_shift, penum); /* do early for screen_cleanup in case of error */
code = gs_screen_enum_init_memory(penum, porder, igs, psp, mem);
if (code < 0) {
screen_cleanup(i_ctx_p);
return code;
}
/* Push everything on the estack */
make_mark_estack(esp + 1, es_other, screen_cleanup);
esp += snumpush;
make_op_estack(esp - 2, finish_proc);
sproc = *pproc;
push_op_estack(screen_sample);
pop(npop);
return o_push_estack;
}
int
gs_screen_init_memory(gs_screen_enum * penum, gs_state * pgs,
gs_screen_halftone * phsp, bool accurate, gs_memory_t * mem)
{
int code =
gs_screen_order_init_memory(&penum->order, pgs, phsp, accurate, mem);
if (code < 0)
return code;
return
gs_screen_enum_init_memory(penum, &penum->order, pgs, phsp, mem);
}
