예제 #1
0
파일: init.c 프로젝트: medici/Scheme-1
void init_global_environment(env_hashtable *env)
{
    init_primitive_procedures(env);
    define_pair_procedures(env);

    /* Preload file */
    run_file(PRELOAD_FILE, env);
}
예제 #2
0
파일: init.c 프로젝트: Nafanya/Scheme
void init_global_environment(env_hashtable *env)
{
    init_primitive_procedures(env);
    define_pair_procedures(env);
    
    /* Parser determines empty brackets as null_object */
    eval_str("(define null '())", env);
}