diff options
| author | Marius Vollmer <mvo@zagadka.de> | 2004-08-10 15:59:31 +0000 |
|---|---|---|
| committer | Marius Vollmer <mvo@zagadka.de> | 2004-08-10 15:59:31 +0000 |
| commit | 214195e127847a83fe44d2d8d698c820b868ec07 (patch) | |
| tree | 4e07ae3fc5c88924e276d04aa4179d54d17313b8 | |
| parent | c88453e881a4d67fb93675f7fc8327dfc120371e (diff) | |
| download | guile-214195e127847a83fe44d2d8d698c820b868ec07.tar.gz | |
Removed commented out debugging fprintfs.
| -rw-r--r-- | libguile/load.c | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/libguile/load.c b/libguile/load.c index 3cc48b969..938a86c94 100644 --- a/libguile/load.c +++ b/libguile/load.c @@ -240,7 +240,6 @@ stringbuf_grow (struct stringbuf *buf) { size_t ptroff = buf->ptr - buf->buf; buf->buf_len *= 2; - // fprintf (stderr, "growing to %u\n", buf->buf_len); buf->buf = scm_realloc (buf->buf, buf->buf_len); buf->ptr = buf->buf + ptroff; } @@ -409,8 +408,6 @@ SCM_DEFINE (scm_search_path, "search-path", 2, 1, 0, /* If the file exists at all, we should return it. If the file is inaccessible, then that's an error. */ - // fprintf (stderr, "trying: %s\n", buf.buf); - if (stat (buf.buf, &mode) == 0 && ! (mode.st_mode & S_IFDIR)) { |