diff options
author | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-03-22 17:13:09 +0000 |
---|---|---|
committer | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-03-22 17:13:09 +0000 |
commit | f359257fae481ceaf3bb32cbd2c52f6fe45bcb5a (patch) | |
tree | 5b3bbbdb8fe402b5bc8d6d12ae7f7da6f784d0d0 /contrib | |
parent | 8baac3168953aa0e8cbdb942eb12e8fca8802fc6 (diff) | |
download | gcc-f359257fae481ceaf3bb32cbd2c52f6fe45bcb5a.tar.gz |
2008-03-22 Basile Starynkevitch <basile@starynkevitch.net>
* gcc/basilys.c: (basilysgc_add_strbuf_raw) when growing young strbuf,
call basilysgc_reserve and basilys_allocatereserved to avoid
growing a buffer which has just been promoted to old by the zone
reallocation. (basilysgc_add_strbuf_raw) use a basilys frame.
(basilysgc_put_mapobjects, basilysgc_remove_mapobjects)
(basilysgc_put_mapstrings, basilysgc_remove_mapstrings)
(basilysgc_raw_put_mappointers, basilysgc_raw_remove_mappointers)
call basilysgc_reserve and basilys_allocatereserved likewise.
* gcc/basilys.h: (basilysgc_reserve, basilys_allocatereserved) new functions.
added frameloc when ENABLE_CHECKING in basilys frames.
* gcc/melt/warm-basilys.bysl: added (empty) support for framloe when
ENABLE_CHECKING in generated basilys frames.
* gcc/Makefile.in: remove T_CFLAGS from MELT_CFLAGS.
* contrib/cold-basilys.lisp: added empty framloc support when ENABLE_CHECKING in basilys frame.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/melt-branch@133450 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'contrib')
-rw-r--r-- | contrib/ChangeLog.melt | 3 | ||||
-rw-r--r-- | contrib/cold-basilys.lisp | 6 |
2 files changed, 9 insertions, 0 deletions
diff --git a/contrib/ChangeLog.melt b/contrib/ChangeLog.melt index fa46a65c551..4c26894757e 100644 --- a/contrib/ChangeLog.melt +++ b/contrib/ChangeLog.melt @@ -1,4 +1,7 @@ +2008-03-22 Basile Starynkevitch <basile@starynkevitch.net> + * cold-basilys.lisp: added empty framloc support when ENABLE_CHECKING in basilys frame. + 2008-03-20 Basile Starynkevitch <basile@starynkevitch.net> * cold-basilys.lisp: removed invocation if indent & basilys-gcc programs. (output_ccode) added newline emission after outputting preprocessor directives. diff --git a/contrib/cold-basilys.lisp b/contrib/cold-basilys.lisp index 18402f452d1..eab663cd505 100644 --- a/contrib/cold-basilys.lisp +++ b/contrib/cold-basilys.lisp @@ -3708,6 +3708,9 @@ nil) (format str "#endif~%") (format str " struct {~%") (format str " unsigned nbvar;~%") + (format str "#if ENABLE_CHECKING~%") + (format str " const struct framloc_basilys_st* floc;~%") + (format str "#endif~%") (format str " struct basilysclosure_st* clos;~%") (format str " struct excepth_basilys_st* exh;~%") (format str " struct callframe_basilys_st* prev;~%") @@ -3717,6 +3720,9 @@ nil) (format str " long _spare_;") (format str " } curfram__ = { /*nbvar*/~d,~%" nbptr) (format str " (struct basilysclosure_st*)0,~%") + (format str "#if ENABLE_CHECKING~%") + (format str " (struct framloc_basilys_st*)0,~%") + (format str "#endif~%") (format str " (struct excepth_basilys_st*)0,~%") (format str " (struct callframe_basilys_st*)0, ~%") (progn |