/[guile]/guile/guile-core/libguile/eval.c
ViewVC logotype

Diff of /guile/guile-core/libguile/eval.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.254 by ossau, Tue Jan 22 23:31:38 2002 UTC revision 1.255 by dirk, Fri Mar 1 00:19:20 2002 UTC
# Line 3836  scm_closure (SCM code, SCM env) Line 3836  scm_closure (SCM code, SCM env)
3836  {  {
3837    SCM z;    SCM z;
3838    SCM closcar = scm_cons (code, SCM_EOL);    SCM closcar = scm_cons (code, SCM_EOL);
3839    z = scm_alloc_cell (SCM_UNPACK (closcar) + scm_tc3_closure,    z = scm_cell (SCM_UNPACK (closcar) + scm_tc3_closure, (scm_t_bits) env);
                       (scm_t_bits) env);  
3840    scm_remember_upto_here (closcar);    scm_remember_upto_here (closcar);
3841    return z;    return z;
3842  }  }

Legend:
Removed from v.1.254  
changed lines
  Added in v.1.255

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26