Hi, Attached is a patch to fix the call to barf when handling u8vector-set! out-of-range errors. Reported by puck in #chicken.
All the best. Mario -- http://parenteses.org/mario
>From d7c875ba164e2a9bff21e4419a7e70dfcfabec3d Mon Sep 17 00:00:00 2001 From: Mario Domenech Goulart <[email protected]> Date: Fri, 27 Sep 2024 22:35:57 +0200 Subject: [PATCH] Fix missing argument for barf on out-of-range error (u8vector-set!) Reported by puck in #chicken. --- manual/Acknowledgements | 2 +- runtime.c | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/manual/Acknowledgements b/manual/Acknowledgements index 8e6ac12b..3e7dd0cd 100644 --- a/manual/Acknowledgements +++ b/manual/Acknowledgements @@ -37,7 +37,7 @@ Fadi Moukayed, Chris Moline, Eric E. Moore, Julian Morrison, Dan Muresan, David N. Murray, Timo Myyrä, "nicktick", Lars Nilsson, Ian Oversby, "o.t.", Gene Pavlovsky, Levi Pearson, Jeronimo Pellegrini, Nicolas Pelletier, Derrell Piper, Carlos Pita, "Pluijzer", -Robin Lee Powell, Alan Post, "Pupeno", Davide Puricelli, "presto", +Robin Lee Powell, Alan Post, "puck", "Pupeno", Davide Puricelli, "presto", Doug Quale, Imran Rafique, Eric Raible, Ivan Raikov, Santosh Rajan, Peder Refnes, Joel Reymont, Kay Rhodes, "rivo", Chris Roberts, Eric Rochester, Paul Romanchenko, diff --git a/runtime.c b/runtime.c index 29dbcb00..5322cfbd 100644 --- a/runtime.c +++ b/runtime.c @@ -6112,7 +6112,7 @@ C_regparm C_word C_fcall C_i_u8vector_set(C_word v, C_word i, C_word x) if(x & C_FIXNUM_BIT) { if (!(x & C_INT_SIGN_BIT) && C_ilen(C_unfix(x)) <= 8) n = C_unfix(x); - else barf(C_OUT_OF_RANGE_ERROR, "u8vector-set!", x); + else barf(C_OUT_OF_RANGE_ERROR, "u8vector-set!", x, i); } else barf(C_BAD_ARGUMENT_TYPE_ERROR, "u8vector-set!", x); } -- 2.39.5
