2475 - allow addresses to be converted to numbers

It's just the other direction we want to avoid.

1 files changed, 2 insertions, 2 deletions

diff --git a/032array.cc b/032array.cc
index 81bfbe18..d1fec2f5 100644
--- a/032array.cc
+++ b/032array.cc
@@ -160,7 +160,7 @@ case INDEX: {
   canonize_type(product);
   reagent element;
   element.type = new type_tree(*array_element(base.type));
-  if (!types_match(product, element)) {
+  if (!types_coercible(product, element)) {
     raise_error << maybe(get(Recipe, r).name) << "'index' on " << base.original_string << " can't be saved in " << product.original_string << "; type should be " << debug_string(element.type) << '\n' << end();
     break;
   }
@@ -300,7 +300,7 @@ case INDEX_ADDRESS: {
   reagent element;
   element.type = new type_tree(*array_element(base.type));
   element.type = new type_tree(get(Type_ordinal, "address"), element.type);
-  if (!types_match(product, element)) {
+  if (!types_coercible(product, element)) {
     raise_error << maybe(get(Recipe, r).name) << "'index' on " << base.original_string << " can't be saved in " << product.original_string << "; type should be " << debug_string(element.type) << '\n' << end();
     break;
   }