C++ (Cpp) caml_cairo_raise_Error Beispiele

Beispiel #1

Datei: cairo_gtk_stubs.c Projekt: Chris00/ocaml-cairo

CAMLexport value caml_gdk_cairo_create(value vdrawable)
{
  CAMLparam1(vdrawable);
  CAMLlocal1(vcontext);
  cairo_t *cr = gdk_cairo_create(GdkDrawable_val(vdrawable));
  caml_cairo_raise_Error(cairo_status(cr)); /* caml_check_status not exported */
  vcontext = alloc_custom(&caml_cairo_ops, sizeof(void*), 1, 50);
  CAIRO_VAL(vcontext) = cr;
  CAMLreturn(vcontext);
}

Beispiel #2

Datei: cairo_ocaml_types.c Projekt: hcarty/ocaml-cairo

/* For non Raise the corresponding OCaml exception. */
static void caml_check_status(cairo_t *cr)
{
  caml_cairo_raise_Error(cairo_status(cr));
}