diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2017-04-29 09:44:05 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2017-04-29 09:44:05 -0700 |
commit | 6828981bba93db9fa7267f68516a6b3a0ecc157e (patch) | |
tree | 82202ccac79a8451e15b7222124ce55e1b3329ed | |
parent | 8a20c4af0ae40dd28fb351a49e14892070c1eae1 (diff) | |
download | txr-6828981bba93db9fa7267f68516a6b3a0ecc157e.tar.gz txr-6828981bba93db9fa7267f68516a6b3a0ecc157e.tar.bz2 txr-6828981bba93db9fa7267f68516a6b3a0ecc157e.zip |
ffi: nicer messages from type compiler.
* ffi.c (ffi_type_compile): Improved error reporting.
-rw-r--r-- | ffi.c | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -1174,7 +1174,8 @@ val ffi_type_compile(val syntax) return type; } - uw_throwf(error_s, lit("~a: unimplemented case"), self, nao); + uw_throwf(error_s, lit("~a: unrecognized type operator: ~s"), + self, sym, nao); #if HAVE_I8 } else if (syntax == uint8_s) { return make_ffi_type_builtin(syntax, integer_s, sizeof (i8_t), @@ -1302,7 +1303,7 @@ val ffi_type_compile(val syntax) return make_ffi_type_builtin(syntax, null_s, 0, &ffi_type_void, ffi_void_put, ffi_void_get); } else { - uw_throwf(error_s, lit("~a: bad type syntax: ~!~s"), + uw_throwf(error_s, lit("~a: unrecognized type specifier: ~!~s"), self, syntax, nao); } } |