diff options
| author | Andy Wingo <wingo@pobox.com> | 2021-03-03 22:59:27 +0100 |
|---|---|---|
| committer | Andy Wingo <wingo@pobox.com> | 2021-03-03 22:59:27 +0100 |
| commit | eb5ffda6cedef823afc4a5b2fdddcee58e46df19 (patch) | |
| tree | 4eb9b7de2402db7e5aff5180a5a91d45ec062e4d | |
| parent | ea86a5c6d2f22e331751a685fd6b2c3e2b4d7f8e (diff) | |
| download | guile-eb5ffda6cedef823afc4a5b2fdddcee58e46df19.tar.gz | |
Fix reading #c32 vectors
* module/ice-9/read.scm (%read): Fix a wee typo.
| -rw-r--r-- | module/ice-9/read.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/module/ice-9/read.scm b/module/ice-9/read.scm index ee39dfd60..8ed4ea6c3 100644 --- a/module/ice-9/read.scm +++ b/module/ice-9/read.scm @@ -595,7 +595,7 @@ (case ch ((#\\) (read-character)) ((#\() (read-vector)) - ((#\s #\u \c) (read-srfi-4-vector ch)) + ((#\s #\u #\c) (read-srfi-4-vector ch)) ((#\f) (read-false-or-srfi-4-vector)) ((#\v) (read-bytevector)) ((#\*) (read-bitvector)) |