trace.cpp

Shorthand是一个强大的脚本语言

///////////////////////////////////////////////////////////////////////////////
// $Header: /shorthand/src/trace.cpp 3     8/28/02 6:27a Arm $
//-----------------------------------------------------------------------------
// Project: ShortHand interpreter
// Author: Andrei Remenchuk <[e-mail]>
//-----------------------------------------------------------------------------
// trace.cpp: ShortHand debug diagnostics
///////////////////////////////////////////////////////////////////////////////
#include <stdio.h>
#include <malloc.h>
#include <string.h>

#include "shorthand.h"
#include "utils.h"

#ifndef WIN32
#include <stdlib.h>
#include <unistd.h>
#endif


#ifdef _DEBUG

static FILE* trace_file = NULL;
int trace_level = 0;

void trace(int level, const char* format, ...)
{
    if (trace_level >= level)
    {
        if (trace_file == NULL) {
            const char* home = get_home_dir();
            char* name = (char*) alloca(strlen(home) + 20);
            sprintf(name, "%sshorthand.trace", home);
            trace_file = fopen(name, "w");
        }
        if (trace_file != NULL)
        {
            va_list args; va_start(args, format);
            vfprintf(trace_file, format, args);
            fflush(trace_file);
        }
    }
}


#endif