Add a couple of disabled debugging messages.

2 files changed, 6 insertions, 0 deletions

diff --git a/MLKForm.m b/MLKForm.m
index ee5139f..c8a5416 100644
--- a/MLKForm.m
+++ b/MLKForm.m
@@ -209,6 +209,7 @@
                 forCompiler:compiler];
 
   id <MLKFuncallable> macrofun = [context macroForSymbol:_head];
+  //NSLog (@"Expanding: %@", MLKPrintToString (_form));
   id expansion = denullify ([[macrofun
                                applyToArray:
                                  [NSArray arrayWithObjects:
diff --git a/MLKLLVMCompiler.mm b/MLKLLVMCompiler.mm
index c5e463c..cf7cf29 100644
--- a/MLKLLVMCompiler.mm
+++ b/MLKLLVMCompiler.mm
@@ -379,8 +379,12 @@ static Constant
 {
   Value *value;
 
+  //NSLog (@"Symbol: %@", MLKPrintToString (_form));
+  //[_compiler insertTrace:[NSString stringWithFormat:@"Symbol: %@", _form]];
+
   if (![_context variableIsLexical:_form])
     {
+      //[_compiler insertTrace:@"Dynamic."];
       Value *mlkdynamiccontext = [_compiler insertClassLookup:@"MLKCons"];
       Value *dynctx = [_compiler insertMethodCall:@"currentContext"
                                  onObject:mlkdynamiccontext];
@@ -398,6 +402,7 @@ static Constant
     }
   else if ([_context variableHeapAllocationForSymbol:_form])
     {
+      //[_compiler insertTrace:@"Global."];
       Value *binding = builder.CreateLoad (builder.Insert ([_context bindingCellValueForSymbol:_form]));
       value = [_compiler insertMethodCall:@"value" onObject:binding];
     }