Subversion Repositories Kolibri OS

Rev

Rev 4349 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
4349 Serge 1
 
2
3
 
4
static void __do_global_ctors ()
5
{
6
  extern int __CTOR_LIST__;
7
  int *c = &__CTOR_LIST__;
8
  c++;
9
  while (*c)
10
    {
11
      ctp d = (ctp)*c;
12
      (d)();
13
      c++;
14
    }
15
}
16
17
 
4382 Serge 18
{
4349 Serge 19
    if(reason == 1)
20
    {
21
        _pei386_runtime_relocator();
22
        __do_global_ctors();
23
    };
24
25
 
26
};
27