diff --git a/src/c/cfun.d b/src/c/cfun.d
index 6c2942a2b..c111880a5 100644
--- a/src/c/cfun.d
+++ b/src/c/cfun.d
@@ -89,7 +89,7 @@ si_compiled_function_name(cl_object fun)
 
 	switch(type_of(fun)) {
 	case t_bclosure:
-		output = fun->bclosure.code;
+		fun = fun->bclosure.code;
 	case t_bytecodes:
 		output = fun->bytecodes.name; break;
 	case t_cfun: