diff options
author | Andy Wingo <wingo@pobox.com> | 2018-06-21 08:39:03 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2018-06-21 20:18:54 +0200 |
commit | 16879cabed0e9bf218986bc886c3336a5f5a21c0 (patch) | |
tree | 3864d5f4926d4141b2ca0a0d378ca7b854aa6cc8 /libguile/print.c | |
parent | 5e5afde06fd9dd0992294d6c7dc9f9966c0caa37 (diff) | |
download | guile-16879cabed0e9bf218986bc886c3336a5f5a21c0.tar.gz |
Replace uses of scm_t_int8, scm_t_uintmax, etc with stdint types
* libguile/bitvectors.c:
* libguile/bitvectors.h:
* libguile/bytevectors.c:
* libguile/bytevectors.h:
* libguile/chars.c:
* libguile/continuations.c:
* libguile/control.c:
* libguile/conv-integer.i.c:
* libguile/conv-uinteger.i.c:
* libguile/dynstack.c:
* libguile/dynstack.h:
* libguile/foreign.c:
* libguile/frames.c:
* libguile/frames.h:
* libguile/gc-inline.h:
* libguile/gc.h:
* libguile/gsubr.c:
* libguile/gsubr.h:
* libguile/hash.c:
* libguile/i18n.c:
* libguile/instructions.c:
* libguile/intrinsics.c:
* libguile/intrinsics.h:
* libguile/loader.c:
* libguile/loader.h:
* libguile/numbers.c:
* libguile/numbers.h:
* libguile/pairs.c:
* libguile/ports-internal.h:
* libguile/ports.c:
* libguile/ports.h:
* libguile/posix.c:
* libguile/print.c:
* libguile/print.h:
* libguile/programs.c:
* libguile/programs.h:
* libguile/r6rs-ports.c:
* libguile/random.c:
* libguile/random.h:
* libguile/scm.h:
* libguile/socket.c:
* libguile/srfi-4.c:
* libguile/srfi-4.h:
* libguile/stacks.c:
* libguile/stime.c:
* libguile/strings.c:
* libguile/struct.c:
* libguile/struct.h:
* libguile/symbols.c:
* libguile/threads.c:
* libguile/threads.h:
* libguile/uniform.c:
* libguile/vm-engine.c:
* libguile/vm.c:
* libguile/vm.h:
* libguile/vports.c:
* test-suite/standalone/test-conversion.c:
* test-suite/standalone/test-ffi-lib.c:
* test-suite/standalone/test-scm-take-u8vector.c:
* test-suite/standalone/test-srfi-4.c: Replace e.g. scm_t_uint8 with
uint8_t.
Diffstat (limited to 'libguile/print.c')
-rw-r--r-- | libguile/print.c | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/libguile/print.c b/libguile/print.c index 0f34e7e7b..a68b99643 100644 --- a/libguile/print.c +++ b/libguile/print.c @@ -437,12 +437,12 @@ print_normal_symbol (SCM sym, SCM port) if (scm_i_is_narrow_symbol (sym)) { const char *ptr = scm_i_symbol_chars (sym); - scm_c_put_latin1_chars (port, (const scm_t_uint8 *) ptr, len); + scm_c_put_latin1_chars (port, (const uint8_t *) ptr, len); } else { const scm_t_wchar *ptr = scm_i_symbol_wide_chars (sym); - scm_c_put_utf32_chars (port, (const scm_t_uint32 *) ptr, len); + scm_c_put_utf32_chars (port, (const uint32_t *) ptr, len); } } @@ -848,7 +848,7 @@ write_string (const void *str, int narrow_p, size_t len, SCM port) { size_t i; - scm_c_put_char (port, (scm_t_uint8) '"'); + scm_c_put_char (port, (uint8_t) '"'); for (i = 0; i < len; ++i) { @@ -862,11 +862,11 @@ write_string (const void *str, int narrow_p, size_t len, SCM port) representable in PORT's encoding. If CH needs to be escaped, it is escaped using the in-string escape syntax. */ if (ch == '"') - scm_c_put_latin1_chars (port, (const scm_t_uint8 *) "\\\"", 2); + scm_c_put_latin1_chars (port, (const uint8_t *) "\\\"", 2); else if (ch == '\\') - scm_c_put_latin1_chars (port, (const scm_t_uint8 *) "\\\\", 2); + scm_c_put_latin1_chars (port, (const uint8_t *) "\\\\", 2); else if (ch == '\n' && SCM_PRINT_ESCAPE_NEWLINES_P) - scm_c_put_latin1_chars (port, (const scm_t_uint8 *) "\\n", 2); + scm_c_put_latin1_chars (port, (const uint8_t *) "\\n", 2); else if (ch == ' ' || ch == '\n' || (uc_is_general_category_withtable (ch, UC_CATEGORY_MASK_L | @@ -880,7 +880,7 @@ write_string (const void *str, int narrow_p, size_t len, SCM port) scm_c_put_escaped_char (port, ch); } - scm_c_put_char (port, (scm_t_uint8) '"'); + scm_c_put_char (port, (uint8_t) '"'); } /* Write CH to PORT, escaping it if it's non-graphic or not @@ -933,14 +933,14 @@ write_character (scm_t_wchar ch, SCM port) */ void -scm_intprint (scm_t_intmax n, int radix, SCM port) +scm_intprint (intmax_t n, int radix, SCM port) { char num_buf[SCM_INTBUFLEN]; scm_lfwrite (num_buf, scm_iint2str (n, radix, num_buf), port); } void -scm_uintprint (scm_t_uintmax n, int radix, SCM port) +scm_uintprint (uintmax_t n, int radix, SCM port) { char num_buf[SCM_INTBUFLEN]; scm_lfwrite (num_buf, scm_iuint2str (n, radix, num_buf), port); |