|
@@ -190,7 +190,7 @@ interface
|
|
|
ttempinfoflags = set of ttempinfoflag;
|
|
|
|
|
|
const
|
|
|
- tempinfostoreflags = [ti_may_be_in_reg,ti_addr_taken,ti_reference,ti_readonly,ti_no_final_regsync];
|
|
|
+ tempinfostoreflags = [ti_may_be_in_reg,ti_addr_taken,ti_reference,ti_readonly,ti_no_final_regsync,ti_nofini];
|
|
|
|
|
|
type
|
|
|
{ to allow access to the location by temp references even after the temp has }
|