{

va_list f;

static char buf[1024*50];

va_start(f, str);

_vsnprintf(buf, sizeof(buf), str, f);

va_end(f);

// The native version of OutputDebugString, unlike most others,

// is OutputDebugStringA.

OutputDebugStringA(buf);

OutputDebugStringA("\n");

#ifndef NDEBUG

// Duplicate to stderr in debug builds, but not in release; this is slow.

fputs(buf, stderr);

fputc('\n', stderr);

#endif

const char *condition, const char *message) {

dbp("File %s, line %u, function %s:", file, line, function);

dbp("Assertion '%s' failed: ((%s) == false).", message, condition);

#ifdef NDEBUG

_exit(1);

#else

abort();

#endif

{

std::string out;

DWORD len = WideCharToMultiByte(CP_UTF8, 0, in, -1, NULL, 0, NULL, NULL);

out.resize(len - 1);

ssassert(WideCharToMultiByte(CP_UTF8, 0, in, -1, &out[0], len, NULL, NULL),

"Invalid UTF-16");

return out;

{

if(in == L"") return "";

std::string out;

out.resize(WideCharToMultiByte(CP_UTF8, 0, &in[0], in.length(), NULL, 0, NULL, NULL));

ssassert(WideCharToMultiByte(CP_UTF8, 0, &in[0], in.length(),

&out[0], out.length(), NULL, NULL),

"Invalid UTF-16");

return out;

{

std::wstring out;

DWORD len = MultiByteToWideChar(CP_UTF8, 0, in, -1, NULL, 0);

out.resize(len - 1);

ssassert(MultiByteToWideChar(CP_UTF8, 0, in, -1, &out[0], len),

"Invalid UTF-8");

return out;

{

if(in == "") return L"";

std::wstring out;

out.resize(MultiByteToWideChar(CP_UTF8, 0, &in[0], in.length(), NULL, 0));

ssassert(MultiByteToWideChar(CP_UTF8, 0, &in[0], in.length(), &out[0], out.length()),

"Invalid UTF-8");

return out;

{

// Case-sensitivity is actually per-volume on Windows,

// but it is tedious to implement and test for little benefit.

std::wstring wa = Widen(a), wb = Widen(b);

return std::equal(wa.begin(), wa.end(), wb.begin(), /*wb.end(),*/

[](wchar_t wca, wchar_t wcb) { return towlower(wca) == towlower(wcb); });

{

std::string result = filename;

for(size_t i = 0; i < result.length(); i++) {

if(result[i] == '\\')

result[i] = '/';

}

return result;

{

std::string result = filename;

for(size_t i = 0; i < result.length(); i++) {

if(result[i] == '/')

result[i] = '\\';

}

return result;

{

// Prepend \\?\ UNC prefix unless already an UNC path.

// We never try to fopen paths that are not absolute or

// contain separators inappropriate for the platform;

// thus, it is always safe to prepend this prefix.

std::string uncFilename = filename;

if(uncFilename.substr(0, 2) != "\\\\")

uncFilename = "\\\\?\\" + uncFilename;

return uncFilename;

{

ssassert(filename.length() == strlen(filename.c_str()),

"Unexpected null byte in middle of a path");

_wremove(Widen(filename).c_str());

{

if(TempHeap) HeapDestroy(TempHeap);

TempHeap = HeapCreate(HEAP_NO_SERIALIZE, 1024*1024*20, 0);

// This is a good place to validate, because it gets called fairly

// often.

vl();

// Create the heap used for long-lived stuff (that gets freed piecewise).

PermHeap = HeapCreate(HEAP_NO_SERIALIZE, 1024*1024*20, 0);

// Create the heap that we use to store Exprs and other temp stuff.

FreeAllTemporary();