Be more informative with ext/def internal errors.

This commit is contained in:
Bill Currie 2011-03-07 20:52:31 +09:00
parent 6312ccba81
commit 8dbf8a97ea

View file

@ -245,10 +245,18 @@ linker_add_string (const char *str)
static void static void
resolve_external_def (defref_t *ext, defref_t *def) resolve_external_def (defref_t *ext, defref_t *def)
{ {
if (!(REF (ext)->flags & QFOD_EXTERNAL)) if (!(REF (ext)->flags & QFOD_EXTERNAL)) {
internal_error (0, "ext is not an external def"); def_error (REF (ext), "%s %x", WORKSTR (REF (ext)->name),
if (!(REF (def)->flags & QFOD_GLOBAL)) REF (ext)->flags);
internal_error (0, "def is not a global def"); linker_error ("ext is not an external def");
abort ();
}
if (!(REF (def)->flags & QFOD_GLOBAL)) {
def_error (REF (ext), "%s %x", WORKSTR (REF (ext)->name),
REF (ext)->flags);
linker_error ("def is not a global def");
abort ();
}
if (REF (ext)->type != REF (def)->type) { if (REF (ext)->type != REF (def)->type) {
linker_type_mismatch (REF (ext), REF (def)); linker_type_mismatch (REF (ext), REF (def));
return; return;