# HG changeset patch
# User lindquist
# Date 1193537669 -3600
# Node ID c4b3f5d2cd9bccc804bad918cc0114199da280db
# Parent  f918f3e2e99eddc4a9864f014380885a17124fe5
[svn r72] Calling a nested function that is not a delegate was not working.

diff -r f918f3e2e99e -r c4b3f5d2cd9b gen/toir.c
--- a/gen/toir.c	Sun Oct 28 02:46:06 2007 +0200
+++ b/gen/toir.c	Sun Oct 28 03:14:29 2007 +0100
@@ -1036,6 +1036,7 @@
     if (fn->arg || delegateCall) n++;
     if (retinptr) n++;
     if (tf->linkage == LINKd && tf->varargs == 1) n+=2;
+    if (fn->funcdecl && fn->funcdecl->isNested()) n++;
 
     llvm::Value* funcval = fn->getValue();
     assert(funcval != 0);
@@ -1127,6 +1128,15 @@
         ++j;
         ++argiter;
     }
+    // nested call
+    else if (fn->funcdecl && fn->funcdecl->isNested()) {
+        Logger::println("Nested Call");
+        llvm::Value* contextptr = p->func().decl->llvmNested;
+        assert(contextptr);
+        llargs[j] = p->ir->CreateBitCast(contextptr, llvm::PointerType::get(llvm::Type::Int8Ty), "tmp");
+        ++j;
+        ++argiter;
+    }
 
     // va arg function special argument passing
     if (va_magic) {
diff -r f918f3e2e99e -r c4b3f5d2cd9b gen/toobj.c
--- a/gen/toobj.c	Sun Oct 28 02:46:06 2007 +0200
+++ b/gen/toobj.c	Sun Oct 28 03:14:29 2007 +0100
@@ -789,6 +789,7 @@
                         VarDeclaration* vd = *i;
                         if (vd->isParameter()) {
                             gIR->ir->CreateStore(vd->llvmValue, LLVM_DtoGEPi(llvmNested, 0, vd->llvmNestedIndex, "tmp"));
+                            vd->llvmValue = llvmNested;
                         }
                     }
                 }
diff -r f918f3e2e99e -r c4b3f5d2cd9b test/nested3.d
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/test/nested3.d	Sun Oct 28 03:14:29 2007 +0100
@@ -0,0 +1,12 @@
+module nested3;
+
+void main()
+{
+    int i;
+    void test()
+    {
+        i = 3;
+    }
+    test();
+    assert(i == 3);
+}