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

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

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

revision 1.60.2.4 by ttn, Thu Mar 14 05:26:16 2002 UTC revision 1.60.2.5 by ossau, Fri Mar 15 09:23:19 2002 UTC
# Line 58  Line 58 
58    
59  SCM_DEFINE (scm_string_p, "string?", 1, 0, 0,  SCM_DEFINE (scm_string_p, "string?", 1, 0, 0,
60              (SCM obj),              (SCM obj),
61              "Return @code{#t} iff @var{obj} is a string, else returns\n"              "Return @code{#t} if @var{obj} is a string, else @code{#f}.")
             "@code{#f}.")  
62  #define FUNC_NAME s_scm_string_p  #define FUNC_NAME s_scm_string_p
63  {  {
64    return SCM_BOOL (SCM_STRINGP (obj));    return SCM_BOOL (SCM_STRINGP (obj));
# Line 88  SCM_REGISTER_PROC (s_scm_list_to_string, Line 87  SCM_REGISTER_PROC (s_scm_list_to_string,
87    
88  SCM_DEFINE (scm_string, "string", 0, 0, 1,  SCM_DEFINE (scm_string, "string", 0, 0, 1,
89              (SCM chrs),              (SCM chrs),
90              "@deffnx primitive list->string chrs\n"              "@deffnx {Scheme Procedure} list->string chrs\n"
91              "Return a newly allocated string composed of the arguments,\n"              "Return a newly allocated string composed of the arguments,\n"
92              "@var{chrs}.")              "@var{chrs}.")
93  #define FUNC_NAME s_scm_string  #define FUNC_NAME s_scm_string

Legend:
Removed from v.1.60.2.4  
changed lines
  Added in v.1.60.2.5

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