[SOLVED] strange INITFINAL generation

[Key-Real]

Finaly, I found it!

if I have no initialization in system.pp
he compiles me:

Code: ASM  [Select][+][-]

1. .section .data.n_INITFINAL
2.         .balign 4
3. .globl  INITFINAL
4. INITFINAL:
5.         .long   1,0,0
6.         .long   FINALIZE$_$OBJPAS
7.  

If i have in system.pp:

Code: Pascal  [Select][+][-]

1. ....
2. begin
3.   { Reset IO Error }
4.   InOutRes:=0;
5. end.
6.  

he compiles me:

Code: ASM  [Select][+][-]

1. .section .data.n_INITFINAL
2.         .balign 4
3. .globl  INITFINAL
4. INITFINAL:
5.         .long   2,0
6.         .long   INIT$_$SYSTEM
7.         .long   0,0
8.         .long   FINALIZE$_$OBJPAS
9.  

btw. I had another Read After Write Issue, I corrected it, now random() works as expected

[Key-Real]

ups,

perhaps it was to late yesterday. This was not the issue. Sorry for spam.

[Key-Real]

!!!!!   
never do something in the system unit at initialization!
(between the final begin and end. )

[PascalDragon]

!!!!!   
never do something in the system unit at initialization!
(between the final begin and end. )

That is wrong. The whole System unit is supposed to be initialized there (parameter parsing, I/O, heap, etc.). Just look at what the initialization-section (which is equivalent to begin … end in units) does in other targets.