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

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

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

revision 1.46 by ttn, Thu Mar 14 03:47:43 2002 UTC revision 1.47 by xxhanwen, Sat Jul 20 14:08:34 2002 UTC
# Line 121  SCM_DEFINE (scm_primitive_exit, "primiti Line 121  SCM_DEFINE (scm_primitive_exit, "primiti
121    int cstatus = 0;    int cstatus = 0;
122    if (!SCM_UNBNDP (status))    if (!SCM_UNBNDP (status))
123      {      {
124        SCM_VALIDATE_INUM (1,status);        SCM_VALIDATE_INUM (1, status);
125        cstatus = SCM_INUM (status);        cstatus = SCM_INUM (status);
126      }      }
127    exit (cstatus);    exit (cstatus);

Legend:
Removed from v.1.46  
changed lines
  Added in v.1.47

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