added local entry for this

1 files changed, 2 insertions, 0 deletions

diff --git a/src/jvm/clojure/lang/Compiler.java b/src/jvm/clojure/lang/Compiler.java
index c29179b1..d57b2788 100644
--- a/src/jvm/clojure/lang/Compiler.java
+++ b/src/jvm/clojure/lang/Compiler.java
@@ -1653,6 +1653,7 @@ static class FnMethod{
 			Var.pushThreadBindings(RT.map(LOOP_LABEL, loopLabel));
 			body.emit(C.RETURN, fn, gen);
 			Label end = gen.mark();
+			gen.visitLocalVariable("this", "Ljava/lang/Object;", null, loopLabel, end, 0);
 			for(ISeq lbs = argLocals.seq(); lbs != null; lbs = lbs.rest())
 				{
 				LocalBinding lb = (LocalBinding) lbs.first();
@@ -1860,6 +1861,7 @@ static class LetExpr implements Expr{
 		else
 			body.emit(context, fn, gen);
 		Label end = gen.mark();
+		gen.visitLocalVariable("this", "Ljava/lang/Object;", null, loopLabel, end, 0);
 		for(ISeq bis = bindingInits.seq(); bis != null; bis = bis.rest())
 			{
 			BindingInit bi = (BindingInit) bis.first();