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

[yamaken at freedesktop.org]

Author: yamaken
Date: 2005-12-15 20:35:23 -0800 (Thu, 15 Dec 2005)
New Revision: 2595

Modified:
   branches/r5rs/sigscheme/strport.c
Log:
* sigscheme/strport.c
  - (ostrport_append): Revert the bad coding. Sorry for the bothering.


Modified: branches/r5rs/sigscheme/strport.c
===================================================================
--- branches/r5rs/sigscheme/strport.c	2005-12-16 04:32:53 UTC (rev 2594)
+++ branches/r5rs/sigscheme/strport.c	2005-12-16 04:35:23 UTC (rev 2595)
@@ -414,7 +414,10 @@
 {
     /* extend the buffer */
     if (port->buf_size - port->cur < len + sizeof((char)'\0')) {
-        port->buf_size += (!port->buf_size) ? len + sizeof((char)'\0') : len;
+        if (!port->buf_size)
+            port->buf_size = sizeof((char)'\0');
+
+        port->buf_size += len;
         port->str = SCM_PORT_REALLOC(port->str, port->buf_size);
     }