Esempi in C++ (Cpp) per scm_gc_protect

Esempio n. 1

File: read.c Progetto: troter/thesis

void symbols_of_read_initialize(void)
{
    _scm_symbol_quote = intern("quote");
    scm_gc_protect(_scm_symbol_quote);
}

Esempio n. 2

File: storage-gc.c Progetto: barak/sigscheme

SCM_EXPORT void
scm_gc_protect_with_init(ScmObj *var, ScmObj init_val)
{
    *var = init_val;
    scm_gc_protect(var);
}