[uim-commit] r1542 - branches/r5rs/sigscheme
yamaken at freedesktop.org
yamaken at freedesktop.org
Fri Sep 23 02:05:29 PDT 2005
Author: yamaken
Date: 2005-09-23 02:05:26 -0700 (Fri, 23 Sep 2005)
New Revision: 1542
Modified:
branches/r5rs/sigscheme/io.c
Log:
* sigscheme/io.c
- (ScmOp_require): Fix inappopriate error message printing to
stdout, and disable it by default
Modified: branches/r5rs/sigscheme/io.c
===================================================================
--- branches/r5rs/sigscheme/io.c 2005-09-23 08:35:51 UTC (rev 1541)
+++ branches/r5rs/sigscheme/io.c 2005-09-23 09:05:26 UTC (rev 1542)
@@ -559,7 +559,9 @@
#if SCM_COMPAT_SIOD
retsym_name = (char*)malloc(sizeof(char) * (strlen(SCM_STRING_STR(filename)) + strlen("*-loaded*") + 1));
sprintf(retsym_name, "*%s-loaded*", SCM_STRING_STR(filename));
- printf("retsym_name = %s\n", retsym_name);
+#if 0
+ fprintf(stderr, "retsym_name = %s\n", retsym_name);
+#endif
retsym = Scm_Intern(retsym_name);
free(retsym_name);
return retsym;
More information about the uim-commit
mailing list