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

[yamaken at freedesktop.org]

Author: yamaken
Date: 2005-09-11 22:39:00 -0700 (Sun, 11 Sep 2005)
New Revision: 1479

Modified:
   branches/r5rs/sigscheme/read.c
Log:
* sigscheme/read.c
  - (read_char):
    * Comment out #\Space interpretation since it will introduce
      portability problem
    * Add a FIXME comment about memory leak


Modified: branches/r5rs/sigscheme/read.c
===================================================================
--- branches/r5rs/sigscheme/read.c	2005-09-12 05:38:08 UTC (rev 1478)
+++ branches/r5rs/sigscheme/read.c	2005-09-12 05:39:00 UTC (rev 1479)
@@ -324,14 +324,18 @@
     if (strcmp(ch, "space") == 0) {
         ch[0] = ' ';
         ch[1] = '\0';
+#if 0
+    /* to avoid portability problem, we should not support #\Space and so on */
     } else if (strcmp(ch, "Space") == 0) {
         ch[0] = ' ';
         ch[1] = '\0';
+#endif
     } else if (strcmp(ch, "newline") == 0) {
         ch[0] = '\n';
         ch[1] = '\0';
     }
 
+    /* FIXME: memory leak */
     return Scm_NewChar(ch);
 }