C++ (Cpp) scm_gc_markの例

コード例 #1

ファイル: postgres.c プロジェクト: pmyadlowsky/gusher

static SCM mark_pg_res(SCM smob) {
	struct pg_res *pgr;
	pgr = (struct pg_res *)SCM_SMOB_DATA(smob);
	scm_gc_mark(pgr->fields);
	scm_gc_mark(pgr->types);
	return SCM_BOOL_F;
	}

コード例 #2

ファイル: board.c プロジェクト: bradfordbarr/Flatland

static SCM mark_board (SCM board_smob) {
	struct board *board = (struct board *) SCM_SMOB_DATA(board_smob);

	scm_gc_mark(board->update_func);
	scm_gc_mark(board->cell_list);

	return SCM_BOOL_F;
}

コード例 #3

ファイル: cache.c プロジェクト: pmyadlowsky/gusher

static SCM mark_node(SCM smob) {
	MAKE_NODE *node;
	node = (MAKE_NODE *)SCM_SMOB_DATA(smob);
	scm_gc_mark(node->callback);
	scm_gc_mark(node->payload);
	scm_gc_mark(node->ascendants);
	scm_gc_mark(node->mutex);
	return SCM_UNSPECIFIED;
	}

コード例 #4

ファイル: scm-pretty-print.c プロジェクト: embecosm/binutils-gdb

static SCM
ppscm_mark_pretty_printer_smob (SCM self)
{
  pretty_printer_smob *pp_smob = (pretty_printer_smob *) SCM_SMOB_DATA (self);

  scm_gc_mark (pp_smob->name);
  scm_gc_mark (pp_smob->enabled);
  scm_gc_mark (pp_smob->lookup);
  /* Do this last.  */
  return gdbscm_mark_gsmob (&pp_smob->base);
}

コード例 #5

ファイル: scm-pretty-print.c プロジェクト: embecosm/binutils-gdb

static SCM
ppscm_mark_pretty_printer_worker_smob (SCM self)
{
  pretty_printer_worker_smob *w_smob
    = (pretty_printer_worker_smob *) SCM_SMOB_DATA (self);

  scm_gc_mark (w_smob->display_hint);
  scm_gc_mark (w_smob->to_string);
  scm_gc_mark (w_smob->children);
  /* Do this last.  */
  return gdbscm_mark_gsmob (&w_smob->base);
}

コード例 #6

ファイル: game.c プロジェクト: davidgomes/gnumaku

static SCM
mark_game (SCM game_smob)
{
    Game *game = (Game *) SCM_SMOB_DATA (game_smob);

    // Mark callbacks
    scm_gc_mark (game->on_start);
    scm_gc_mark (game->on_update);
    scm_gc_mark (game->on_draw);
    scm_gc_mark (game->on_key_pressed);
    scm_gc_mark (game->on_key_released);

    return game->on_draw;
}

コード例 #7

ファイル: cell.c プロジェクト: bradfordbarr/Flatland

static SCM mark_cell (SCM cell_smob) {
	struct cell *cell = (struct cell *) SCM_SMOB_DATA(cell_smob);

	scm_gc_mark(cell->update_func);

	return SCM_BOOL_F;
}

コード例 #8

ファイル: sdlenums.c プロジェクト: guildhall/guile-sdl

static
SCM
mark_enum (SCM enumstash)
{
  enum_struct *enum_smob = UNPACK_ENUM (enumstash);

  scm_gc_mark (enum_smob->table);
  RETURN_FALSE;
}

コード例 #9

ファイル: test-smob-mark.c プロジェクト: AtomicKity/guile

static SCM
mark_x (SCM x)
{
  x_t *c_x;
  c_x = (x_t *) SCM_SMOB_DATA (x);
  scm_gc_mark (c_x->scm_value);
  mark_call_count++;
  return SCM_BOOL_F;
}

コード例 #10

ファイル: scm-symtab.c プロジェクト: embecosm/binutils-gdb

static SCM
stscm_mark_sal_smob (SCM self)
{
  sal_smob *s_smob = (sal_smob *) SCM_SMOB_DATA (self);

  scm_gc_mark (s_smob->symtab_scm);

  /* Do this last.  */
  return gdbscm_mark_gsmob (&s_smob->base);
}

コード例 #11

ファイル: watch.c プロジェクト: guildhall/guile-avahi

/* Mark the user data associated with TIMEOUT.  */
SCM_SMOB_MARK (scm_tc16_avahi_timeout, mark_avahi_timeout, timeout)
{
  AvahiTimeout *c_timeout;

  c_timeout = scm_to_avahi_timeout (timeout, 1, __FUNCTION__);

  scm_gc_mark (c_timeout->stuff);

  return (c_timeout->guile_poll->poll_smob);
}

コード例 #12

ファイル: watch.c プロジェクト: guildhall/guile-avahi

/* Mark the user data associated with WATCH.  */
SCM_SMOB_MARK (scm_tc16_avahi_watch, mark_avahi_watch, watch)
{
  AvahiWatch *c_watch;

  c_watch = scm_to_avahi_watch (watch, 1, __FUNCTION__);

  scm_gc_mark (c_watch->stuff);

  return (c_watch->guile_poll->poll_smob);
}

コード例 #13

ファイル: postgres.c プロジェクト: pmyadlowsky/gusher

static SCM mark_pg_conn(SCM smob) {
	struct pg_conn *pgc;
	pgc = (struct pg_conn *)SCM_SMOB_DATA(smob);
	scm_gc_mark(pgc->mutex);
	return SCM_BOOL_F;
	}