/[mailutils]/mailutils/libmu_scm/mu_message.c
ViewVC logotype

Diff of /mailutils/libmu_scm/mu_message.c

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

revision 1.20 by polak, Sun Dec 29 12:52:07 2002 UTC revision 1.21 by gray, Mon Feb 3 11:31:51 2003 UTC
# Line 167  mu_scm_message_get (SCM MESG) Line 167  mu_scm_message_get (SCM MESG)
167  int  int
168  mu_scm_is_message (SCM scm)  mu_scm_is_message (SCM scm)
169  {  {
170    return SCM_NIMP (scm) && SCM_CAR (scm) == message_tag;    return SCM_NIMP (scm) && (long) SCM_CAR (scm) == message_tag;
171  }  }
172    
173  /* ************************************************************************* */  /* ************************************************************************* */

Legend:
Removed from v.1.20  
changed lines
  Added in v.1.21

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