Mercurial > hg > index.cgi
view lwbasic/attic/emit.c @ 258:ebda5c96665e
Improved stack handling for os9 target in lwlink
Added "stack" as a valid symbol in the __os9 section. All instances of __os9
are now polled for "stack" symobls and the values added to the stack size
set in the linker script. The stack size is then added to the final data
size of the module. Also set a default minimum stack size of 32 bytes.
author | William Astle <lost@l-w.ca> |
---|---|
date | Thu, 31 Jan 2013 19:34:54 -0700 |
parents | cca933d32298 |
children |
line wrap: on
line source
/* emit.c Copyright © 2011 William Astle This file is part of LWTOOLS. LWTOOLS is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see <http://www.gnu.org/licenses/>. */ /* This is the actual compiler bit; it drives the parser and code generation */ #include <stdio.h> #define __emit_c_seen__ #include "lwbasic.h" void emit_prolog(cstate *state, int vis) { if (vis) { printf("\texport _%s\n", state -> currentsub); } printf("_%s\n", state -> currentsub); if (state -> framesize > 0) { printf("\tleas %d,s\n", -(state -> framesize)); } } void emit_epilog(cstate *state) { if (state -> framesize > 0) { printf("\tleas %d,s\n", state -> framesize); } printf("\trts\n"); }