about summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorKartik K. Agaram <vc@akkartik.com>2016-03-23 13:48:38 -0700
committerKartik K. Agaram <vc@akkartik.com>2016-03-23 13:52:10 -0700
commit6bed086e87f6bc5d90699e8ddad97eb8bf05371a (patch)
treed39de2ba9ac2cf95a056c2d08382d0ed32942c7b
parentd698b13f993a4af2f830bb128ad8c8652de62591 (diff)
downloadmu-6bed086e87f6bc5d90699e8ddad97eb8bf05371a.tar.gz
2809
-rw-r--r--037new.cc2
1 files changed, 2 insertions, 0 deletions
diff --git a/037new.cc b/037new.cc
index 0e32c1a2..edf9a548 100644
--- a/037new.cc
+++ b/037new.cc
@@ -349,6 +349,7 @@ void abandon(int address, int size) {
 if (get_or_insert(Current_routine->free_list, size)) {
   trace(9999, "abandon") << "picking up space from free-list of size " << size << end();
   int result = get_or_insert(Current_routine->free_list, size);
+  trace(9999, "mem") << "new alloc from free list: " << result << end();
   put(Current_routine->free_list, size, get_or_insert(Memory, result));
   for (int curr = result+1; curr < result+size; ++curr) {
     if (get_or_insert(Memory, curr) != 0) {
@@ -562,6 +563,7 @@ if (inst.name == "new" && is_literal_string(inst.ingredients.at(0))) continue;
   if (is_literal_string(current_instruction().ingredients.at(0))) {
     products.resize(1);
     products.at(0).push_back(new_mu_string(current_instruction().ingredients.at(0).name));
+    trace(9999, "mem") << "new string alloc: " << products.at(0).at(0) << end();
     break;
   }