pike.git/
src/
builtin.cmod
Branch:
Tag:
Non-build tags
All tags
No tags
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
}