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

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

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

revision 1.38 by ossau, Tue Jan 22 23:31:38 2002 UTC revision 1.39 by dirk, Fri Mar 1 00:19:20 2002 UTC
# Line 59  SCM_DEFINE (scm_acons, "acons", 3, 0, 0, Line 59  SCM_DEFINE (scm_acons, "acons", 3, 0, 0,
59              "function is @emph{not} destructive; @var{alist} is not modified.")              "function is @emph{not} destructive; @var{alist} is not modified.")
60  #define FUNC_NAME s_scm_acons  #define FUNC_NAME s_scm_acons
61  {  {
62    return scm_alloc_cell (SCM_UNPACK (scm_alloc_cell (SCM_UNPACK (key),    return scm_cell (SCM_UNPACK (scm_cell (SCM_UNPACK (key),
63                                                       SCM_UNPACK (value))),                                           SCM_UNPACK (value))),
64                           SCM_UNPACK (alist));                     SCM_UNPACK (alist));
65  }  }
66  #undef FUNC_NAME  #undef FUNC_NAME
67    

Legend:
Removed from v.1.38  
changed lines
  Added in v.1.39

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