remove debug message from BUGGY_MAXIMUM_SSCANF_LENGTH code - gcl.git - GNU Common Lisp

index : gcl.git
GNU Common Lisp
summary refs log tree commit diff
diff options
context:
space:
mode:
authorCamm Maguire <camm@debian.org>2014年09月05日 11:03:51 -0400
committerCamm Maguire <camm@debian.org>2014年09月05日 11:03:51 -0400
commitc5e10d7e73a26e4fab79f87ef036dc618a9db0b4 (patch)
treebe2ab66dc46a8819b46837c399ebaca79daecb41
parent9d29d4a59066ec7b7bf9d356fe470cf6ce52e76c (diff)
downloadgcl-c5e10d7e73a26e4fab79f87ef036dc618a9db0b4.tar.gz
remove debug message from BUGGY_MAXIMUM_SSCANF_LENGTH code
Diffstat
-rwxr-xr-xgcl/o/read.d 1
1 files changed, 0 insertions, 1 deletions
diff --git a/gcl/o/read.d b/gcl/o/read.d
index be079d896..f00a77af9 100755
--- a/gcl/o/read.d
+++ b/gcl/o/read.d
@@ -145,7 +145,6 @@ parse_number(char *s,int radix) {
#ifdef BUGGY_MAXIMUM_SSCANF_LENGTH
if (strlen(s)>BUGGY_MAXIMUM_SSCANF_LENGTH) {
char *q1=s+BUGGY_MAXIMUM_SSCANF_LENGTH-strlen(q);
- fprintf(stderr,"Chopping\n");fflush(stderr);
memmove(q1,q,strlen(q)+1);
q=q1;
}
generated by cgit v1.2.3 (git 2.39.1) at 2025年09月05日 12:26:07 +0000

AltStyle によって変換されたページ (->オリジナル) /