Fix the bogus missing return warning.
Pascal's return mechanism is such that void return is always used.
This commit is contained in:
parent
3f351a5c88
commit
7519ec7bbd
|
@ -242,6 +242,7 @@ subprogram_declaration
|
||||||
}
|
}
|
||||||
declarations compound_statement ';'
|
declarations compound_statement ';'
|
||||||
{
|
{
|
||||||
|
append_expr ($5, new_unary_expr ('r', 0));
|
||||||
build_code_function ($1, 0, $5);
|
build_code_function ($1, 0, $5);
|
||||||
current_symtab = current_symtab->parent;
|
current_symtab = current_symtab->parent;
|
||||||
current_storage = $<storage>3;
|
current_storage = $<storage>3;
|
||||||
|
|
Loading…
Reference in New Issue