u3: cleans up whitespace, removes dead code in allocator
@@ -894,7 +894,6 @@ u3a_free2(void* tox_v, size_t siz_i)
return u3a_free(tox_v);
}
-#if 1
/* _me_wash_north(): clean up mug slots after copy.
*/
static void _me_wash_north(u3_noun dog);
@@ -980,9 +979,6 @@ u3a_wash(u3_noun som)
}
}
}
-#endif
-
-extern u3_noun BDA, BDB;
/* _me_gain_use(): increment use count.
*/
@@ -1002,44 +998,10 @@ _me_gain_use(u3_noun dog)
box_u->use_w += 1;
#ifdef U3_MEMORY_DEBUG
+ // enable to (maybe) help track down leaks
+ //
// if ( u3_Code && !box_u->cod_w ) { box_u->cod_w = u3_Code; }
-
-#if 0
- if ( u3r_mug(dog) == 0x15d47649 ) {
- static c3_w bug_w = 0;
-
- u3l_log("bad %x %d %d\r\n", dog, bug_w, box_u->use_w);
- if ( bug_w == 0 ) { abort(); }
- bug_w++;
- }
-#endif
-#if 0
- {
- static c3_w bug_w = 0;
-
- if ( BDA == dog ) {
- u3l_log("BDA %d %d\r\n", bug_w, box_u->use_w);
- // if ( bug_w == 0 ) { abort(); }
- bug_w++;
- }
- }
-#endif
-
-#if 0
- {
- static c3_w bug_w = 0;
-
- if ( FOO && u3a_botox(u3a_to_ptr(dog)) == (void *)0x200dfe3e4 ) {
- u3a_box* box_u = u3a_botox(u3a_to_ptr(dog));
-
- u3l_log("GAIN %d %d\r\n", bug_w, box_u->use_w);
- if ( bug_w == 8 ) { abort(); }
- bug_w++;
- }
- }
-#endif
#endif
-
}
}
