c9ef28574c0fa17a1d55d9f4c4e76c3cd105edf50dfb604901fec99489a9cdab

Download raw

Created: 2023-12-19 03:40:10.302489 UTC

Size: 837

Preview (limited to 512 bytes)

"#include <stdint.h>\n\n#include <windows.h>\n\nuint64_t splitmix_init() {\n /* Handy list at https://stackoverflow.com/a/3487338/1308058 */\n\n uint64_t a = GetCurrentProcessId(); /* DWORD */\n uint64_t b = GetCurrentThreadId(); /* DWORD */\n uint64_t c = GetTickCount(); /* DWORD */\n\n SYSTEMTIME t = {0,0,0,0,0,0,0,0};\n GetSystemTime(&t);\n\n LARGE_INTEGER i;\n QueryPerformanceCounter(&i);\n\n return a ^ (b << 32) ^ (c << 16)\n ^ ((uint64_t) t.wYear << 56)\n ^ ((uint64_t) t.w"

Casa is a service provided by the Haskell Foundation │ Originally developed by FP Complete