Branch: Tag:

2016-01-17

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

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   }