diff options
author | Daniel Llorens <daniel.llorens@bluewin.ch> | 2017-02-21 12:23:35 +0100 |
---|---|---|
committer | Daniel Llorens <daniel.llorens@bluewin.ch> | 2017-10-31 13:23:44 +0100 |
commit | e0bcda4ad940c4e15679cc2b229838b33acdd36c (patch) | |
tree | dd80936c215d1e4bf0ade19c8080707a8b0539c0 /libguile/random.c | |
parent | f52fc0566feabe4f1d3ba630287a418606ac30f9 (diff) | |
download | guile-e0bcda4ad940c4e15679cc2b229838b33acdd36c.tar.gz |
Fix bitvectors and non-zero lower bound arrays in truncated-print
* module/ice-9/arrays.scm (array-print-prefix): New private function.
* libguile/arrays.c (scm_i_print_array): Reuse (array-print-prefix) from
(ice-9 arrays). Make sure to release the array handle.
* module/ice-9/pretty-print.scm (truncated-print): Support
bitvectors.
Don't try to guess the array prefix but call array-print-prefix from
(ice-9 arrays) instead.
Fix call to print-sequence to support non-zero lower bound arrays.
* test-suite/tests/arrays.test: Test that arrays print properly.
* test-suite/tests/print.test: Test truncated-print with bitvectors,
non-zero lower bound arrays.
Diffstat (limited to 'libguile/random.c')
0 files changed, 0 insertions, 0 deletions