* moved the EXCEPT_BUF_SIZE const to be local to ncgutils.get_exception_temps,

because that's the only place where it's used

git-svn-id: trunk@27369 -
This commit is contained in:
nickysn 2014-03-30 11:27:07 +00:00
parent 1f98dfc3b4
commit 5ae9443d66

View File

@ -110,8 +110,6 @@ interface
routine has been called, therefore on machines where the stack cannot routine has been called, therefore on machines where the stack cannot
be modified, all temps should be allocated on the heap instead of the be modified, all temps should be allocated on the heap instead of the
stack. } stack. }
const
EXCEPT_BUF_SIZE = 3*sizeof(pint);
type type
texceptiontemps=record texceptiontemps=record
jmpbuf, jmpbuf,
@ -384,6 +382,8 @@ implementation
*****************************************************************************} *****************************************************************************}
procedure get_exception_temps(list:TAsmList;var t:texceptiontemps); procedure get_exception_temps(list:TAsmList;var t:texceptiontemps);
const
EXCEPT_BUF_SIZE = 3*sizeof(pint);
begin begin
get_jumpbuf_size; get_jumpbuf_size;
tg.GetTemp(list,EXCEPT_BUF_SIZE,sizeof(pint),tt_persistent,t.envbuf); tg.GetTemp(list,EXCEPT_BUF_SIZE,sizeof(pint),tt_persistent,t.envbuf);