|
@@ -1689,7 +1689,8 @@ begin
|
|
def_symbol('NOCLASSHELPERS');
|
|
def_symbol('NOCLASSHELPERS');
|
|
if pocall_default = pocall_register then
|
|
if pocall_default = pocall_register then
|
|
def_symbol('REGCALL');
|
|
def_symbol('REGCALL');
|
|
-
|
|
|
|
|
|
+ def_symbol('DECRREFNOTNIL');
|
|
|
|
+
|
|
{ using a case is pretty useless here (FK) }
|
|
{ using a case is pretty useless here (FK) }
|
|
{ some stuff for TP compatibility }
|
|
{ some stuff for TP compatibility }
|
|
{$ifdef i386}
|
|
{$ifdef i386}
|
|
@@ -1994,7 +1995,10 @@ finalization
|
|
end.
|
|
end.
|
|
{
|
|
{
|
|
$Log$
|
|
$Log$
|
|
- Revision 1.120 2004-01-10 00:16:21 jonas
|
|
|
|
|
|
+ Revision 1.121 2004-01-21 22:13:20 peter
|
|
|
|
+ * decrrefcount resets temps to nil
|
|
|
|
+
|
|
|
|
+ Revision 1.120 2004/01/10 00:16:21 jonas
|
|
* fixed mtfsb0 instruction for assembler reader/writer
|
|
* fixed mtfsb0 instruction for assembler reader/writer
|
|
* fixed initialisation of fpscr register to avoid spurious SIGPFE's
|
|
* fixed initialisation of fpscr register to avoid spurious SIGPFE's
|
|
(uses mtfsb0 instruction, so added extra define in options.pas to avoid
|
|
(uses mtfsb0 instruction, so added extra define in options.pas to avoid
|