diff --git a/tools/qfcc/source/qp-parse.y b/tools/qfcc/source/qp-parse.y
index 14d9484b2..664ba649a 100644
--- a/tools/qfcc/source/qp-parse.y
+++ b/tools/qfcc/source/qp-parse.y
@@ -242,6 +242,7 @@ subprogram_declaration
 		}
 	  declarations compound_statement ';'
 		{
+			append_expr ($5, new_unary_expr ('r', 0));
 			build_code_function ($1, 0, $5);
 			current_symtab = current_symtab->parent;
 			current_storage = $<storage>3;