[uim-commit] r1909 - branches/r5rs/sigscheme

[yamaken at freedesktop.org]

Author: yamaken
Date: 2005-10-31 10:30:32 -0800 (Mon, 31 Oct 2005)
New Revision: 1909

Modified:
   branches/r5rs/sigscheme/strport.c
   branches/r5rs/sigscheme/strport.h
Log:
* sigscheme/strport.h
  - (ScmInputStrPort_new_copying): Make the arg const
* sigscheme/strport.c
  - (ScmInputStrPort_new_copying): Ditto


Modified: branches/r5rs/sigscheme/strport.c
===================================================================
--- branches/r5rs/sigscheme/strport.c	2005-10-31 15:54:03 UTC (rev 1908)
+++ branches/r5rs/sigscheme/strport.c	2005-10-31 18:30:32 UTC (rev 1909)
@@ -183,7 +183,7 @@
 }
 
 ScmBytePort *
-ScmInputStrPort_new_copying(char *str)
+ScmInputStrPort_new_copying(const char *str)
 {
     return istrport_new(strdup(str), TRUE);
 }

Modified: branches/r5rs/sigscheme/strport.h
===================================================================
--- branches/r5rs/sigscheme/strport.h	2005-10-31 15:54:03 UTC (rev 1908)
+++ branches/r5rs/sigscheme/strport.h	2005-10-31 18:30:32 UTC (rev 1909)
@@ -69,7 +69,7 @@
 void Scm_strport_init(void);
 
 ScmBytePort *ScmInputStrPort_new(char *str);
-ScmBytePort *ScmInputStrPort_new_copying(char *str);
+ScmBytePort *ScmInputStrPort_new_copying(const char *str);
 ScmBytePort *ScmInputStrPort_new_const(const char *str);
 void **ScmInputStrPort_ref_opaque(ScmBytePort *bport);