diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2009-11-03 07:56:53 -0800 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2009-11-03 07:56:53 -0800 |
commit | e39f2236ea3f1b2b50bbed65ec33ad4f56f409cb (patch) | |
tree | 3dffdfa3f6fda78c37f48170f1f04a1c1cf989a4 /stream.c | |
parent | ca9d02bcb0db425218734d5434f124be7a66b3b3 (diff) | |
download | txr-e39f2236ea3f1b2b50bbed65ec33ad4f56f409cb.tar.gz txr-e39f2236ea3f1b2b50bbed65ec33ad4f56f409cb.tar.bz2 txr-e39f2236ea3f1b2b50bbed65ec33ad4f56f409cb.zip |
Version 019txr-019
Regexps can be bound to variables.
New freeform directive.
Diffstat (limited to 'stream.c')
-rw-r--r-- | stream.c | 12 |
1 files changed, 6 insertions, 6 deletions
@@ -300,7 +300,7 @@ static void string_out_stream_destroy(obj_t *stream) static obj_t *string_out_put_string(obj_t *stream, const char *s) { struct string_output *so = (struct string_output *) stream->co.handle; - + if (so == 0) { return nil; } else { @@ -335,12 +335,12 @@ static obj_t *string_out_put_char(obj_t *stream, int ch) obj_t *string_out_vcformat(obj_t *stream, const char *fmt, va_list vl) { struct string_output *so = (struct string_output *) stream->co.handle; - + if (so == 0) { return nil; } else { int nchars, nchars2; - char dummy_buf[1]; + char dummy_buf[1]; size_t old_size = so->size; size_t required_size; va_list vl_copy; @@ -353,7 +353,7 @@ obj_t *string_out_vcformat(obj_t *stream, const char *fmt, va_list vl) vl_copy = vl; #endif - nchars = vsnprintf(dummy_buf, 0, fmt, vl_copy); + nchars = vsnprintf(dummy_buf, 0, fmt, vl_copy); #if defined va_copy || defined __va_copy va_end (vl_copy); @@ -373,11 +373,11 @@ obj_t *string_out_vcformat(obj_t *stream, const char *fmt, va_list vl) } so->buf = chk_realloc(so->buf, so->size); - nchars2 = vsnprintf(so->buf + so->fill, so->size-so->fill, fmt, vl); + nchars2 = vsnprintf(so->buf + so->fill, so->size-so->fill, fmt, vl); bug_unless (nchars == nchars2); so->fill += nchars; return t; - } + } } static struct strm_ops string_out_ops = { |