2399 - consistent debug_string vocabulary

1 files changed, 1 insertions, 2 deletions

diff --git a/031address.cc b/031address.cc
index 79c951d0..ebbc4e95 100644
--- a/031address.cc
+++ b/031address.cc
@@ -78,8 +78,7 @@ void lookup_memory(reagent& x) {
 bool canonize_type(reagent& r) {
   while (has_property(r, "lookup")) {
     if (!r.type || r.type->value != get(Type_ordinal, "address")) {
-      raise_error << "can't lookup non-address: " << r.to_string() << '\n' << end();
-      dump_types(r.type, cerr);  cerr << '\n';
+      raise_error << "can't lookup non-address: " << r.to_string() << ": " << debug_string(r.type) << '\n' << end();
       return false;
     }
     drop_address_from_type(r);