From 4173d9bae136a0dae8646e80a0abd1bceab222f4 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Sat, 29 Apr 2017 09:44:05 -0700
Subject: ffi: nicer messages from type compiler.

* ffi.c (ffi_type_compile): Improved error reporting.
---
 ffi.c | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/ffi.c b/ffi.c
index 3159d2d0..1cafae03 100644
--- a/ffi.c
+++ b/ffi.c
@@ -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);
   }
 }
-- 
cgit v1.2.3