about summary refs log tree commit diff stats
path: root/032array.cc
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2016-08-18 07:59:41 -0700
committerKartik K. Agaram <vc@akkartik.com>2016-08-18 07:59:41 -0700
commit9393ccc8598bbecc6a6e7f61f1a28a3bf5d5a2e6 (patch)
tree7898dc49b23fe10486cecd3c41fcabdb43c8740b /032array.cc
parent47e0f0c56d4a4d158bbdd592ac7b16553e81a5bc (diff)
downloadmu-9393ccc8598bbecc6a6e7f61f1a28a3bf5d5a2e6.tar.gz
3221
Diffstat (limited to '032array.cc')
-rw-r--r--032array.cc6
1 files changed, 3 insertions, 3 deletions
diff --git a/032array.cc b/032array.cc
index 6c78fda6..2a4f83ae 100644
--- a/032array.cc
+++ b/032array.cc
@@ -406,7 +406,7 @@ case PUT_INDEX: {
   // Update PUT_INDEX index in Run
   vector<double> index_val(read_memory(index));
   if (index_val.at(0) < 0 || index_val.at(0) >= get_or_insert(Memory, base_address)) {
-    raise << maybe(current_recipe_name()) << "invalid index " << no_scientific(index_val.at(0)) << '\n' << end();
+    raise << maybe(current_recipe_name()) << "invalid index " << no_scientific(index_val.at(0)) << " in '" << to_original_string(current_instruction()) << "'\n" << end();
     break;
   }
   reagent element;
@@ -438,7 +438,7 @@ def main [
   8:point <- merge 34, 35
   1:array:point <- put-index 1:array:point, 4, 8:point  # '4' is less than size of array in locations, but larger than its length in elements
 ]
-+error: main: invalid index 4
++error: main: invalid index 4 in '1:array:point <- put-index 1:array:point, 4, 8:point'
 
 :(scenario put_index_out_of_bounds_2)
 % Hide_errors = true;
@@ -453,7 +453,7 @@ def main [
   8:point <- merge 34, 35
   1:array:point <- put-index 1:array:point, -1, 8:point
 ]
-+error: main: invalid index -1
++error: main: invalid index -1 in '1:array:point <- put-index 1:array:point, -1, 8:point'
 
 :(scenario put_index_product_error)
 % Hide_errors = true;