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 | 5560b099353711ece32b11660a4e92c819ddf34e (patch) | |
tree | b0dbde2bc1d2ae5dbb6ea7f4f189f82207f53634 /ffi.c | |
parent | 30be092e6bd3e80c50186d74f66f19189a184777 (diff) | |
download | txr-5560b099353711ece32b11660a4e92c819ddf34e.tar.gz txr-5560b099353711ece32b11660a4e92c819ddf34e.tar.bz2 txr-5560b099353711ece32b11660a4e92c819ddf34e.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.
Diffstat (limited to 'ffi.c')
-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); |