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

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

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

revision 1.68 by ttn, Thu Mar 14 03:47:41 2002 UTC revision 1.69 by xxhanwen, Sat Jul 20 14:08:33 2002 UTC
# Line 168  SCM_DEFINE (scm_strerror, "strerror", 1, Line 168  SCM_DEFINE (scm_strerror, "strerror", 1,
168              "must be an integer value.")              "must be an integer value.")
169  #define FUNC_NAME s_scm_strerror  #define FUNC_NAME s_scm_strerror
170  {  {
171    SCM_VALIDATE_INUM (1,err);    SCM_VALIDATE_INUM (1, err);
172    return scm_makfrom0str (SCM_I_STRERROR (SCM_INUM (err)));    return scm_makfrom0str (SCM_I_STRERROR (SCM_INUM (err)));
173  }  }
174  #undef FUNC_NAME  #undef FUNC_NAME
# Line 224  scm_out_of_range_pos (const char *subr, Line 224  scm_out_of_range_pos (const char *subr,
224    scm_error (scm_out_of_range_key,    scm_error (scm_out_of_range_key,
225               subr,               subr,
226               "Argument ~S out of range: ~S",               "Argument ~S out of range: ~S",
227               scm_list_2 (pos,bad_value),               scm_list_2 (pos, bad_value),
228               SCM_BOOL_F);               SCM_BOOL_F);
229  }  }
230    

Legend:
Removed from v.1.68  
changed lines
  Added in v.1.69

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