Fix the bogus missing return warning.

Pascal's return mechanism is such that void return is always used.
This commit is contained in:
Bill Currie 2012-10-26 20:11:38 +09:00
parent 3f351a5c88
commit 7519ec7bbd

View file

@ -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;