summaryrefslogtreecommitdiff
path: root/MLKLLVMCompiler.mm
diff options
context:
space:
mode:
authorMatthias Andreas Benkard <matthias@benkard.de>2008-08-18 14:05:58 +0200
committerMatthias Andreas Benkard <matthias@benkard.de>2008-08-18 14:05:58 +0200
commit1e2602cbd46ab6587aa80f82661e6145e018d05f (patch)
tree0b3d1abcf1df6bfe190f723c43422cbd4dc21e19 /MLKLLVMCompiler.mm
parentff954858e055bc58c18502eb3d0aac5ad99c1cb1 (diff)
Add a couple of disabled debugging messages.
Diffstat (limited to 'MLKLLVMCompiler.mm')
-rw-r--r--MLKLLVMCompiler.mm5
1 files changed, 5 insertions, 0 deletions
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];
}