Esempi in C++ (Cpp) per scm_call_4

Esempio n. 1

File: scm-safe-call.c Progetto: ajinkya93/netbsd-src

static SCM
scscm_call_4_body (void *argsp)
{
  SCM *args = argsp;

  return scm_call_4 (args[0], args[1], args[2], args[3], args[4]);
}

Esempio n. 2

File: watch.c Progetto: guildhall/guile-avahi

static void
watch_update (AvahiWatch *watch, AvahiWatchEvent events)
{
  scm_call_4 (watch->guile_poll->update_watch_x,
	      watch->watch_smob, scm_from_int (watch->fd),
	      scm_from_avahi_watch_events (events),
	      watch->stuff);

  watch->events = events;
}