pike.git/ src/ builtin.cmod

2016-01-17

2016-01-17 19:04:08 by Henrik Grubbström (Grubba) <grubba@grubba.org>

• 4c1102574b9cd04c2aa84f7d72d7ec38e5527d56 (8 lines) (+6/-2) ^{[ Show | Annotate ]}
  Branch: 8.1

RandomSystem [NT]: Fixed compilation issue.

2229:    }   }   #else - static int random_fd; + static int random_fd = -1;   PIKECLASS RandomSystem   {    INHERIT RandomInterface;
6057:    SET_SVAL(gc_destruct_cb, PIKE_T_INT, NUMBER_NUMBER, integer, 0);    SET_SVAL(gc_done_cb, PIKE_T_INT, NUMBER_NUMBER, integer, 0);    INIT; -  random_fd = -1; +    }      void exit_builtin(void)
6080:   #ifndef USE_SETENV    if (env_allocs) free_mapping (env_allocs);   #endif + #ifdef __NT__ +  if (crypto_handle) CloseHandle(crypto_handle); + #else    if (random_fd!=-1) close(random_fd); -  + #endif   }