diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2021-10-09 09:45:32 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2021-10-09 09:45:32 -0700 |
commit | b8689dbc7446e11c84dfbbf851e49d72859296ac (patch) | |
tree | b0dbde2bc1d2ae5dbb6ea7f4f189f82207f53634 | |
parent | 35a8cfbfd30ebc588ca904c111e87e27723ee385 (diff) | |
download | txr-b8689dbc7446e11c84dfbbf851e49d72859296ac.tar.gz txr-b8689dbc7446e11c84dfbbf851e49d72859296ac.tar.bz2 txr-b8689dbc7446e11c84dfbbf851e49d72859296ac.zip |
ffi: insufficient format args in enum error handling.
* ffi.c (make_ffi_type_enum): Add missing argument to two
uw_throwf calls. Reported by Paul A. Patience.
-rw-r--r-- | ffi.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -3663,13 +3663,13 @@ static val make_ffi_type_enum(val syntax, val enums, if (!integerp(n)) { uw_throwf(error_s, lit("~a: ~s member ~s value ~s not integer"), - self, syntax, n, nao); + self, syntax, sym, n, nao); } cur = c_num(n, self); if (cur > INT_MAX) uw_throwf(error_s, lit("~a: ~s member ~s value ~s too large"), - self, syntax, n, nao); + self, syntax, sym, n, nao); sethash(num_sym, sym, nn = num(cur)); sethash(sym_num, nn, sym); env_vbind(enum_env, sym, nn); |